|
Last change
on this file was 576, checked in by chronos, 6 months ago |
- Added: Move tech tree form with pressed arrow keys for longer time.
|
|
File size:
1.1 KB
|
| Line | |
|---|
| 1 | object TechTreeDlg: TTechTreeDlg
|
|---|
| 2 | Cursor = 3
|
|---|
| 3 | Left = 1162
|
|---|
| 4 | Height = 482
|
|---|
| 5 | Top = 481
|
|---|
| 6 | Width = 611
|
|---|
| 7 | BorderIcons = []
|
|---|
| 8 | BorderStyle = bsNone
|
|---|
| 9 | ClientHeight = 482
|
|---|
| 10 | ClientWidth = 611
|
|---|
| 11 | Color = clBtnFace
|
|---|
| 12 | Font.Charset = DEFAULT_CHARSET
|
|---|
| 13 | Font.Color = clWindowText
|
|---|
| 14 | Font.Height = -13
|
|---|
| 15 | Font.Name = 'MS Sans Serif'
|
|---|
| 16 | Font.Style = []
|
|---|
| 17 | FormStyle = fsStayOnTop
|
|---|
| 18 | OldCreateOrder = False
|
|---|
| 19 | Position = poDefault
|
|---|
| 20 | Scaled = False
|
|---|
| 21 | OnClose = FormClose
|
|---|
| 22 | OnCreate = FormCreate
|
|---|
| 23 | OnDestroy = FormDestroy
|
|---|
| 24 | OnKeyDown = FormKeyDown
|
|---|
| 25 | OnKeyUp = FormKeyUp
|
|---|
| 26 | OnMouseDown = FormMouseDown
|
|---|
| 27 | OnMouseMove = FormMouseMove
|
|---|
| 28 | OnMouseUp = FormMouseUp
|
|---|
| 29 | OnPaint = FormPaint
|
|---|
| 30 | OnShow = FormShow
|
|---|
| 31 | PixelsPerInch = 96
|
|---|
| 32 | TextHeight = 16
|
|---|
| 33 | object CloseBtn: TButtonB
|
|---|
| 34 | Cursor = crArrow
|
|---|
| 35 | Left = 568
|
|---|
| 36 | Height = 25
|
|---|
| 37 | Top = 16
|
|---|
| 38 | Width = 25
|
|---|
| 39 | Down = False
|
|---|
| 40 | Permanent = False
|
|---|
| 41 | OnClick = CloseBtnClick
|
|---|
| 42 | ButtonIndex = 0
|
|---|
| 43 | end
|
|---|
| 44 | object TimerKeyPressed: TTimer
|
|---|
| 45 | Enabled = False
|
|---|
| 46 | Interval = 250
|
|---|
| 47 | OnTimer = TimerKeyPressedTimer
|
|---|
| 48 | Left = 177
|
|---|
| 49 | Top = 180
|
|---|
| 50 | end
|
|---|
| 51 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
