close Warning: Can't synchronize with repository "(default)" (No changeset 184 in the repository). Look in the Trac log for more information.

source: trunk/Forms/UFormMove.lfm

Last change on this file was 124, checked in by chronos, 7 years ago
  • Fixed: Do not allow to move from single cell more units when available.
File size: 2.8 KB
Line 
1object FormMove: TFormMove
2 Left = 435
3 Height = 257
4 Top = 165
5 Width = 367
6 ActiveControl = ButtonOk
7 Caption = 'Move'
8 ClientHeight = 257
9 ClientWidth = 367
10 Constraints.MinHeight = 257
11 Constraints.MinWidth = 367
12 OnCreate = FormCreate
13 OnKeyPress = FormKeyPress
14 OnShow = FormShow
15 Position = poMainFormCenter
16 LCLVersion = '1.6.0.4'
17 object SpinEditOnce: TSpinEdit
18 Left = 208
19 Height = 34
20 Top = 40
21 Width = 98
22 OnChange = SpinEditOnceChange
23 OnKeyPress = FormKeyPress
24 TabOrder = 0
25 end
26 object Label1: TLabel
27 Left = 16
28 Height = 24
29 Top = 40
30 Width = 49
31 Caption = 'Once:'
32 ParentColor = False
33 end
34 object ButtonOk: TButton
35 Left = 189
36 Height = 25
37 Top = 224
38 Width = 75
39 Caption = 'Ok'
40 Default = True
41 ModalResult = 1
42 TabOrder = 1
43 end
44 object ButtonCancel: TButton
45 Left = 72
46 Height = 25
47 Top = 224
48 Width = 75
49 Caption = 'Cancel'
50 ModalResult = 2
51 TabOrder = 2
52 end
53 object Label2: TLabel
54 Left = 24
55 Height = 24
56 Top = 136
57 Width = 91
58 Caption = 'Every turn:'
59 ParentColor = False
60 end
61 object SpinEditRepeat: TSpinEdit
62 Left = 208
63 Height = 34
64 Top = 128
65 Width = 98
66 OnChange = SpinEditRepeatChange
67 OnKeyPress = FormKeyPress
68 TabOrder = 3
69 end
70 object TrackBarOnce: TTrackBar
71 Left = 56
72 Height = 46
73 Top = 80
74 Width = 255
75 OnChange = TrackBarOnceChange
76 PageSize = 1
77 Position = 0
78 TickStyle = tsNone
79 Anchors = [akTop, akLeft, akRight]
80 OnKeyPress = FormKeyPress
81 TabOrder = 4
82 end
83 object TrackBarRepeat: TTrackBar
84 Left = 56
85 Height = 46
86 Top = 168
87 Width = 255
88 OnChange = TrackBarRepeatChange
89 PageSize = 1
90 Position = 0
91 TickStyle = tsNone
92 Anchors = [akTop, akLeft, akRight]
93 OnKeyPress = FormKeyPress
94 TabOrder = 5
95 end
96 object ButtonOnceMin: TButton
97 Left = 8
98 Height = 25
99 Top = 88
100 Width = 48
101 Caption = 'Min'
102 OnClick = ButtonOnceMinClick
103 TabOrder = 6
104 end
105 object ButtonOnceMax: TButton
106 Left = 311
107 Height = 25
108 Top = 88
109 Width = 48
110 Anchors = [akTop, akRight]
111 Caption = 'Max'
112 OnClick = ButtonOnceMaxClick
113 TabOrder = 7
114 end
115 object ButtonRepeatMin: TButton
116 Left = 8
117 Height = 25
118 Top = 176
119 Width = 48
120 Caption = 'Min'
121 OnClick = ButtonRepeatMinClick
122 TabOrder = 8
123 end
124 object ButtonRepeatMax: TButton
125 Left = 311
126 Height = 25
127 Top = 176
128 Width = 48
129 Anchors = [akTop, akRight]
130 Caption = 'Max'
131 OnClick = ButtonRepeatMaxClick
132 TabOrder = 9
133 end
134 object Label3: TLabel
135 Left = 16
136 Height = 24
137 Top = 8
138 Width = 135
139 Caption = 'Win probability:'
140 ParentColor = False
141 end
142 object LabelWinProbability: TLabel
143 Left = 264
144 Height = 24
145 Top = 8
146 Width = 15
147 Caption = ' '
148 ParentColor = False
149 end
150end
Note: See TracBrowser for help on using the repository browser.