Last change
on this file was 88, checked in by chronos, 3 months ago |
- Fixed: Fullscreen mode was not working on start.
- Added: Step button in AI form to do single step.
|
File size:
1.1 KB
|
Line | |
---|
1 | object FormComputer: TFormComputer
|
---|
2 | Left = 1040
|
---|
3 | Height = 360
|
---|
4 | Top = 540
|
---|
5 | Width = 480
|
---|
6 | Caption = 'AI'
|
---|
7 | ClientHeight = 360
|
---|
8 | ClientWidth = 480
|
---|
9 | DesignTimePPI = 144
|
---|
10 | OnClose = FormClose
|
---|
11 | OnCreate = FormCreate
|
---|
12 | OnDestroy = FormDestroy
|
---|
13 | LCLVersion = '3.4.0.0'
|
---|
14 | object ButtonStart: TButton
|
---|
15 | Left = 40
|
---|
16 | Height = 38
|
---|
17 | Top = 24
|
---|
18 | Width = 113
|
---|
19 | Caption = 'Start'
|
---|
20 | TabOrder = 0
|
---|
21 | OnClick = ButtonStartClick
|
---|
22 | end
|
---|
23 | object ButtonEnd: TButton
|
---|
24 | Left = 296
|
---|
25 | Height = 38
|
---|
26 | Top = 24
|
---|
27 | Width = 113
|
---|
28 | Caption = 'End'
|
---|
29 | Enabled = False
|
---|
30 | TabOrder = 1
|
---|
31 | OnClick = ButtonEndClick
|
---|
32 | end
|
---|
33 | object TrackBar1: TTrackBar
|
---|
34 | Left = 24
|
---|
35 | Height = 58
|
---|
36 | Top = 104
|
---|
37 | Width = 430
|
---|
38 | Max = 1000
|
---|
39 | Position = 0
|
---|
40 | Anchors = [akTop, akLeft, akRight]
|
---|
41 | TabOrder = 2
|
---|
42 | end
|
---|
43 | object Label1: TLabel
|
---|
44 | Left = 21
|
---|
45 | Height = 26
|
---|
46 | Top = 76
|
---|
47 | Width = 126
|
---|
48 | Caption = 'Delay per step:'
|
---|
49 | ParentColor = False
|
---|
50 | end
|
---|
51 | object ButtonStep: TButton
|
---|
52 | Left = 168
|
---|
53 | Height = 38
|
---|
54 | Top = 24
|
---|
55 | Width = 113
|
---|
56 | Caption = 'Step'
|
---|
57 | Enabled = False
|
---|
58 | TabOrder = 3
|
---|
59 | OnClick = ButtonStepClick
|
---|
60 | end
|
---|
61 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.