UnitCreatePrefix: Limit the new prefix name to 40 characters.
[WineLauncher.git] / UnitMain.lfm
bloba4b4f1d7817921e69c5e1324aecbc38e97629e83
1 object Form1: TForm1\r
2   Left = 0\r
3   Height = 951\r
4   Top = 25\r
5   Width = 1280\r
6   ActiveControl = PageControl1\r
7   Caption = 'WineLauncher'\r
8   ClientHeight = 951\r
9   ClientWidth = 1280\r
10   Constraints.MinHeight = 600\r
11   Constraints.MinWidth = 600\r
12   OnClose = FormClose\r
13   OnCreate = FormCreate\r
14   Position = poDefault\r
15   LCLVersion = '0.9.26.3'\r
16   WindowState = wsMaximized\r
17   object Label_WinePreFix: TLabel\r
18     AnchorSideTop.Control = Owner\r
19     Left = 200\r
20     Height = 16\r
21     Top = 5\r
22     Width = 79\r
23     BorderSpacing.Top = 5\r
24     Caption = 'Wine Prefix''s'\r
25     ParentColor = False\r
26   end\r
27   object Label_ProgramsList: TLabel\r
28     AnchorSideTop.Control = ComboBox_PreFix\r
29     AnchorSideTop.Side = asrBottom\r
30     Left = 9\r
31     Height = 16\r
32     Top = 53\r
33     Width = 95\r
34     BorderSpacing.Top = 3\r
35     Caption = 'Pick a Program'\r
36     ParentColor = False\r
37   end\r
38   object Label_ProgramPath: TLabel\r
39     AnchorSideTop.Control = ComboBox_ProgramsList\r
40     AnchorSideTop.Side = asrBottom\r
41     Left = 9\r
42     Height = 16\r
43     Top = 101\r
44     Width = 87\r
45     BorderSpacing.Top = 3\r
46     Caption = 'Program Path'\r
47     ParentColor = False\r
48   end\r
49   object Label_Flags: TLabel\r
50     AnchorSideTop.Control = EditBox_ProgramPath\r
51     AnchorSideTop.Side = asrBottom\r
52     Left = 241\r
53     Height = 16\r
54     Top = 145\r
55     Width = 127\r
56     BorderSpacing.Top = 5\r
57     Caption = 'Set Programs Flags:'\r
58     ParentColor = False\r
59   end\r
60   object Label_WineVersion: TLabel\r
61     AnchorSideTop.Control = Owner\r
62     Left = 9\r
63     Height = 16\r
64     Top = 5\r
65     Width = 80\r
66     BorderSpacing.Top = 5\r
67     Caption = 'Wine version'\r
68     ParentColor = False\r
69   end\r
70   object CheckListBox_Flags: TCheckListBox\r
71     AnchorSideLeft.Control = ComboBox_TerminalName\r
72     AnchorSideLeft.Side = asrBottom\r
73     AnchorSideTop.Control = Label_Flags\r
74     AnchorSideTop.Side = asrBottom\r
75     AnchorSideRight.Control = Button_Winecfg\r
76     Left = 241\r
77     Height = 147\r
78     Top = 161\r
79     Width = 958\r
80     Anchors = [akTop, akLeft, akRight]\r
81     BorderSpacing.Left = 13\r
82     ItemHeight = 0\r
83     TabOrder = 10\r
84     TopIndex = -1\r
85   end\r
86   object Btn_Run: TButton\r
87     AnchorSideLeft.Control = Owner\r
88     AnchorSideTop.Control = Btn_Settings\r
89     AnchorSideTop.Side = asrBottom\r
90     Left = 9\r
91     Height = 27\r
92     Top = 282\r
93     Width = 75\r
94     BorderSpacing.Left = 9\r
95     BorderSpacing.Top = 3\r
96     Caption = 'Run'\r
97     OnClick = Btn_RunClick\r
98     TabOrder = 0\r
99   end\r
100   object Check_Terminal: TCheckBox\r
101     AnchorSideTop.Control = EditBox_ProgramPath\r
102     AnchorSideTop.Side = asrBottom\r
103     Left = 9\r
104     Height = 22\r
105     Top = 144\r
106     Width = 119\r
107     BorderSpacing.Top = 4\r
108     Caption = 'Run in Terminal'\r
109     TabOrder = 1\r
110   end\r
111   object Btn_DebugChannelsConfig: TButton\r
112     AnchorSideLeft.Control = Btn_Run\r
113     AnchorSideLeft.Side = asrCenter\r
114     AnchorSideRight.Control = Owner\r
115     Left = 46\r
116     Height = 22\r
117     Top = 519\r
118     Width = 1\r
119     Anchors = [akLeft]\r
120     Caption = 'Config'\r
121     OnClick = Btn_DebugChannelsConfigClick\r
122     TabOrder = 2\r
123     Visible = False\r
124   end\r
125   object CheckBox_DebugChannelUse: TCheckBox\r
126     Left = 868\r
127     Height = 22\r
128     Top = 351\r
129     Width = 147\r
130     Caption = 'Use Debug channel'\r
131     TabOrder = 3\r
132     TabStop = False\r
133     Visible = False\r
134   end\r
135   object ComboBox_SoundWrapper: TComboBox\r
136     AnchorSideLeft.Control = ComboBox_TerminalName\r
137     AnchorSideTop.Control = CheckBox_UseSoundWrapper\r
138     AnchorSideTop.Side = asrBottom\r
139     Left = 27\r
140     Height = 27\r
141     Top = 220\r
142     Width = 131\r
143     AutoComplete = False\r
144     Ctl3D = False\r
145     ItemHeight = 0\r
146     Items.Strings = (\r
147       '/usr/bin/aoss'\r
148     )\r
149     ItemWidth = 0\r
150     MaxLength = 65535\r
151     TabOrder = 4\r
152     Text = 'ComboBox_SoundWrapper'\r
153   end\r
154   object CheckBox_UseSoundWrapper: TCheckBox\r
155     AnchorSideTop.Control = ComboBox_TerminalName\r
156     AnchorSideTop.Side = asrBottom\r
157     Left = 9\r
158     Height = 22\r
159     Top = 198\r
160     Width = 149\r
161     BorderSpacing.Top = 3\r
162     Caption = 'Use Sound Wrapper'\r
163     TabOrder = 5\r
164   end\r
165   object Btn_Settings: TButton\r
166     AnchorSideLeft.Control = Owner\r
167     AnchorSideTop.Control = ComboBox_SoundWrapper\r
168     AnchorSideTop.Side = asrBottom\r
169     Left = 9\r
170     Height = 27\r
171     Top = 252\r
172     Width = 75\r
173     BorderSpacing.Left = 9\r
174     BorderSpacing.Top = 5\r
175     Caption = 'Settings'\r
176     OnClick = Btn_SettingsClick\r
177     TabOrder = 6\r
178   end\r
179   object ComboBox_TerminalName: TComboBox\r
180     AnchorSideLeft.Control = Check_Terminal\r
181     AnchorSideTop.Control = Check_Terminal\r
182     AnchorSideTop.Side = asrBottom\r
183     Left = 27\r
184     Height = 29\r
185     Top = 166\r
186     Width = 201\r
187     AutoComplete = False\r
188     BorderSpacing.Left = 18\r
189     Ctl3D = False\r
190     ItemHeight = 0\r
191     ItemIndex = 0\r
192     Items.Strings = (\r
193       '/usr/bin/gnome-terminal'\r
194       '/usr/bin/konsole'\r
195     )\r
196     ItemWidth = 0\r
197     MaxLength = 65535\r
198     Style = csDropDownList\r
199     TabOrder = 7\r
200     Text = '/usr/bin/gnome-terminal'\r
201   end\r
202   object ComboBox_PreFix: TComboBox\r
203     AnchorSideTop.Control = Label_WinePreFix\r
204     AnchorSideTop.Side = asrBottom\r
205     AnchorSideRight.Control = TogBtn_Listdrive\r
206     Left = 201\r
207     Height = 29\r
208     Top = 21\r
209     Width = 883\r
210     Anchors = [akTop, akLeft, akRight]\r
211     AutoComplete = False\r
212     Ctl3D = False\r
213     DropDownCount = 30\r
214     ItemHeight = 0\r
215     ItemWidth = 0\r
216     MaxLength = 65535\r
217     OnChange = ComboBox_PreFixChange\r
218     Style = csDropDownList\r
219     TabOrder = 8\r
220   end\r
221   object ComboBox_ProgramsList: TComboBox\r
222     AnchorSideTop.Control = Label_ProgramsList\r
223     AnchorSideTop.Side = asrBottom\r
224     AnchorSideRight.Control = Owner\r
225     AnchorSideRight.Side = asrBottom\r
226     Left = 9\r
227     Height = 29\r
228     Top = 69\r
229     Width = 1268\r
230     Anchors = [akTop, akLeft, akRight]\r
231     AutoComplete = False\r
232     BorderSpacing.Right = 3\r
233     Ctl3D = False\r
234     ItemHeight = 0\r
235     ItemWidth = 0\r
236     MaxLength = 65535\r
237     OnChange = ComboBox_ProgramsListChange\r
238     Style = csDropDownList\r
239     TabOrder = 9\r
240   end\r
241   object EditBox_ProgramPath: TEdit\r
242     AnchorSideTop.Control = Label_ProgramPath\r
243     AnchorSideTop.Side = asrBottom\r
244     AnchorSideRight.Control = Owner\r
245     AnchorSideRight.Side = asrBottom\r
246     Left = 9\r
247     Height = 23\r
248     Top = 117\r
249     Width = 1268\r
250     Anchors = [akTop, akLeft, akRight]\r
251     BorderSpacing.Right = 3\r
252     OnChange = EditBox_ProgramPathChange\r
253     ReadOnly = True\r
254     TabOrder = 11\r
255     Text = 'EditBox_ProgramPath'\r
256   end\r
257   object Button_Winecfg: TButton\r
258     AnchorSideLeft.Control = CheckListBox_Flags\r
259     AnchorSideLeft.Side = asrBottom\r
260     AnchorSideTop.Control = CheckListBox_Flags\r
261     AnchorSideRight.Control = Owner\r
262     AnchorSideRight.Side = asrBottom\r
263     Left = 1202\r
264     Height = 27\r
265     Top = 161\r
266     Width = 75\r
267     Anchors = [akTop, akRight]\r
268     BorderSpacing.Left = 3\r
269     BorderSpacing.Right = 3\r
270     Caption = 'Winecfg'\r
271     OnClick = Button_WinecfgClick\r
272     TabOrder = 12\r
273   end\r
274   object Button_Regedit: TButton\r
275     AnchorSideLeft.Control = Button_Winecfg\r
276     AnchorSideTop.Control = Button_Winecfg\r
277     AnchorSideTop.Side = asrBottom\r
278     Left = 1202\r
279     Height = 27\r
280     Top = 191\r
281     Width = 75\r
282     BorderSpacing.Top = 3\r
283     Caption = 'Regedit'\r
284     OnClick = Button_RegeditClick\r
285     TabOrder = 13\r
286   end\r
287   object TogBtn_Listdrive: TToggleBox\r
288     AnchorSideTop.Control = Label_WinePreFix\r
289     AnchorSideTop.Side = asrBottom\r
290     AnchorSideRight.Control = Owner\r
291     AnchorSideRight.Side = asrBottom\r
292     AnchorSideBottom.Control = ComboBox_PreFix\r
293     AnchorSideBottom.Side = asrBottom\r
294     Left = 1087\r
295     Height = 29\r
296     Top = 21\r
297     Width = 190\r
298     Anchors = [akTop, akRight, akBottom]\r
299     BorderSpacing.Left = 3\r
300     BorderSpacing.Right = 3\r
301     Caption = 'List programs on drive D'\r
302     OnChange = TogBtn_ListdriveChange\r
303     TabOrder = 14\r
304   end\r
305   object ComboBox_WineVersion: TComboBox\r
306     AnchorSideTop.Control = Label_WineVersion\r
307     AnchorSideTop.Side = asrBottom\r
308     Left = 9\r
309     Height = 29\r
310     Top = 22\r
311     Width = 188\r
312     AutoComplete = False\r
313     BorderSpacing.Top = 1\r
314     Ctl3D = False\r
315     ItemHeight = 0\r
316     ItemWidth = 0\r
317     Style = csDropDownList\r
318     TabOrder = 16\r
319   end\r
320   object PageControl1: TPageControl\r
321     AnchorSideLeft.Control = Owner\r
322     AnchorSideTop.Control = Btn_Run\r
323     AnchorSideTop.Side = asrBottom\r
324     AnchorSideRight.Control = Owner\r
325     AnchorSideRight.Side = asrBottom\r
326     AnchorSideBottom.Control = Owner\r
327     AnchorSideBottom.Side = asrBottom\r
328     Left = 0\r
329     Height = 637\r
330     Top = 314\r
331     Width = 1280\r
332     ActivePage = Tab_Log\r
333     Anchors = [akTop, akLeft, akRight, akBottom]\r
334     BorderSpacing.Top = 5\r
335     TabIndex = 0\r
336     TabOrder = 17\r
337     object Tab_Log: TTabSheet\r
338       Caption = 'Log'\r
339       ClientHeight = 604\r
340       ClientWidth = 1274\r
341       object Memo_LogOutPut: TMemo\r
342         AnchorSideTop.Side = asrBottom\r
343         Left = 0\r
344         Height = 599\r
345         Top = 5\r
346         Width = 1274\r
347         Align = alClient\r
348         Anchors = []\r
349         BorderSpacing.Top = 5\r
350         TabOrder = 0\r
351       end\r
352     end\r
353   end\r
354   object Btn_StopScan: TButton\r
355     AnchorSideLeft.Control = Btn_Settings\r
356     AnchorSideLeft.Side = asrBottom\r
357     AnchorSideTop.Control = Btn_Settings\r
358     AnchorSideRight.Control = CheckListBox_Flags\r
359     AnchorSideBottom.Control = Btn_Run\r
360     AnchorSideBottom.Side = asrBottom\r
361     Left = 84\r
362     Height = 57\r
363     Top = 252\r
364     Width = 144\r
365     Anchors = [akTop, akLeft, akRight, akBottom]\r
366     Caption = 'Stop Scan'\r
367     Font.Height = -18\r
368     Font.Name = 'Sans'\r
369     OnClick = Btn_StopScanClick\r
370     ParentFont = False\r
371     TabOrder = 15\r
372     Visible = False\r
373   end\r
374 end\r