UnitMain.lfm

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