source: trunk/Forms/UFormPlayer.lfm@ 236

Last change on this file since 236 was 188, checked in by chronos, 7 years ago
  • Fixed: Translate during form creation to not affect player mode combobox.
File size: 2.7 KB
Line 
1object FormPlayer: TFormPlayer
2 Left = 470
3 Height = 344
4 Top = 219
5 Width = 522
6 Caption = 'Player'
7 ClientHeight = 344
8 ClientWidth = 522
9 Constraints.MinHeight = 344
10 Constraints.MinWidth = 522
11 OnClose = FormClose
12 OnCreate = FormCreate
13 OnShow = FormShow
14 Position = poMainFormCenter
15 LCLVersion = '1.8.0.4'
16 object Label1: TLabel
17 Left = 24
18 Height = 26
19 Top = 27
20 Width = 56
21 Caption = 'Name:'
22 ParentColor = False
23 end
24 object EditName: TEdit
25 Left = 168
26 Height = 36
27 Top = 27
28 Width = 339
29 Anchors = [akTop, akLeft, akRight]
30 TabOrder = 0
31 end
32 object ButtonCancel: TButton
33 Left = 278
34 Height = 25
35 Top = 307
36 Width = 75
37 Anchors = [akRight, akBottom]
38 Caption = 'Cancel'
39 ModalResult = 2
40 TabOrder = 1
41 end
42 object ButtonOk: TButton
43 Left = 403
44 Height = 25
45 Top = 307
46 Width = 75
47 Anchors = [akRight, akBottom]
48 Caption = 'Ok'
49 Default = True
50 ModalResult = 1
51 TabOrder = 2
52 end
53 object ComboBoxMode: TComboBox
54 Left = 168
55 Height = 36
56 Top = 72
57 Width = 339
58 Anchors = [akTop, akLeft, akRight]
59 ItemHeight = 0
60 ItemIndex = 0
61 Items.Strings = (
62 'Human'
63 'Computer'
64 )
65 OnChange = ComboBoxModeChange
66 Style = csDropDownList
67 TabOrder = 3
68 Text = 'Human'
69 end
70 object Label2: TLabel
71 Left = 24
72 Height = 26
73 Top = 72
74 Width = 53
75 Caption = 'Mode:'
76 ParentColor = False
77 end
78 object Label3: TLabel
79 Left = 24
80 Height = 26
81 Top = 128
82 Width = 50
83 Caption = 'Color:'
84 ParentColor = False
85 end
86 object ColorBox1: TColorBox
87 Left = 168
88 Height = 40
89 Top = 120
90 Width = 339
91 Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames]
92 Anchors = [akTop, akLeft, akRight]
93 ItemHeight = 20
94 TabOrder = 4
95 end
96 object Label4: TLabel
97 Left = 24
98 Height = 26
99 Top = 168
100 Width = 98
101 Caption = 'Agressivity:'
102 ParentColor = False
103 end
104 object ComboBoxAgressivity: TComboBox
105 Left = 168
106 Height = 40
107 Top = 168
108 Width = 339
109 Anchors = [akTop, akLeft, akRight]
110 ItemHeight = 0
111 Items.Strings = (
112 'Low'
113 'Medium'
114 'High'
115 ''
116 )
117 Style = csDropDownList
118 TabOrder = 5
119 end
120 object CheckBoxDefensive: TCheckBox
121 Left = 24
122 Height = 30
123 Top = 208
124 Width = 107
125 Caption = 'Defensive'
126 TabOrder = 6
127 end
128 object Label5: TLabel
129 Left = 24
130 Height = 26
131 Top = 248
132 Width = 94
133 Caption = 'Start units:'
134 ParentColor = False
135 end
136 object SpinEditStartUnits: TSpinEdit
137 Left = 224
138 Height = 36
139 Top = 240
140 Width = 112
141 MaxValue = 99
142 TabOrder = 7
143 end
144end
Note: See TracBrowser for help on using the repository browser.