source: trunk/Forms/FormNew.lfm

Last change on this file was 89, checked in by chronos, 3 months ago
  • Added: Allow to select color palette in new game dialog.
  • Fixed: Use scrollboxes in options dialogs.
File size: 2.5 KB
Line 
1object FormNew: TFormNew
2 Left = 1029
3 Height = 322
4 Top = 587
5 Width = 514
6 Caption = 'New game'
7 ClientHeight = 322
8 ClientWidth = 514
9 DesignTimePPI = 144
10 OnCreate = FormCreate
11 LCLVersion = '3.4.0.0'
12 object ButtonCancel: TButton
13 Left = 255
14 Height = 38
15 Top = 271
16 Width = 116
17 Anchors = [akRight, akBottom]
18 Caption = 'Cancel'
19 ModalResult = 2
20 TabOrder = 0
21 end
22 object ButtonOk: TButton
23 Left = 391
24 Height = 38
25 Top = 271
26 Width = 116
27 Anchors = [akRight, akBottom]
28 Caption = 'OK'
29 ModalResult = 1
30 TabOrder = 1
31 end
32 object ScrollBox1: TScrollBox
33 Left = 8
34 Height = 247
35 Top = 8
36 Width = 497
37 HorzScrollBar.Page = 435
38 VertScrollBar.Page = 214
39 Anchors = [akTop, akLeft, akRight, akBottom]
40 ClientHeight = 245
41 ClientWidth = 495
42 TabOrder = 2
43 object Label1: TLabel
44 Left = 16
45 Height = 26
46 Top = 16
47 Width = 93
48 Caption = 'Board size:'
49 ParentColor = False
50 end
51 object ComboBoxSize: TComboBox
52 Left = 173
53 Height = 38
54 Top = 11
55 Width = 262
56 ItemHeight = 0
57 Items.Strings = (
58 '2 x 2'
59 '3 x 3'
60 '4 x 4'
61 '5 x 5'
62 '6 x 6'
63 '7 x 7'
64 '8 x 8'
65 '9 x 9'
66 '10 x 10 '
67 '11 x 11'
68 '12 x 12'
69 )
70 Style = csDropDownList
71 TabOrder = 0
72 end
73 object CheckBoxUndoEnabled: TCheckBox
74 Left = 16
75 Height = 30
76 Top = 56
77 Width = 145
78 Caption = 'Undo enabled'
79 TabOrder = 1
80 end
81 object CheckBoxRecordHistory: TCheckBox
82 Left = 16
83 Height = 30
84 Top = 88
85 Width = 209
86 Caption = 'Record moves history'
87 TabOrder = 2
88 end
89 object Label2: TLabel
90 Left = 16
91 Height = 26
92 Top = 133
93 Width = 75
94 Caption = 'Tile skin:'
95 ParentColor = False
96 end
97 object ComboBoxSkin: TComboBox
98 Left = 173
99 Height = 38
100 Top = 128
101 Width = 262
102 ItemHeight = 0
103 Items.Strings = (
104 ''
105 )
106 Style = csDropDownList
107 TabOrder = 3
108 end
109 object Label3: TLabel
110 Left = 16
111 Height = 26
112 Top = 181
113 Width = 113
114 Caption = 'Color palette:'
115 ParentColor = False
116 end
117 object ComboBoxColorPalette: TComboBox
118 Left = 173
119 Height = 38
120 Top = 176
121 Width = 262
122 ItemHeight = 0
123 Items.Strings = (
124 'RGB'
125 'RBG'
126 'GRB'
127 'GBR'
128 'BGR'
129 'BRG'
130 )
131 Style = csDropDownList
132 TabOrder = 4
133 end
134 end
135end
Note: See TracBrowser for help on using the repository browser.