UnitMain.lfm

   1 object Form1: TForm1\r
   2   Left = 0\r
   3   Height = 951\r
   4   Top = 25\r
   5   Width = 1280\r
   6   HelpContext = 0\r
   7   ActiveControl = TogBtn_Listdrive\r
   8   Align = alNone\r
   9   Caption = 'WineLauncher'\r
  10   ChildSizing.LeftRightSpacing = 0\r
  11   ChildSizing.TopBottomSpacing = 0\r
  12   ChildSizing.HorizontalSpacing = 0\r
  13   ChildSizing.VerticalSpacing = 0\r
  14   ChildSizing.ControlsPerLine = 0\r
  15   ClientHeight = 951\r
  16   ClientWidth = 1280\r
  17   Constraints.MinHeight = 600\r
  18   Constraints.MinWidth = 600\r
  19   Font.Height = 0\r
  20   Font.Style = []\r
  21   OnClose = FormClose\r
  22   OnCreate = FormCreate\r
  23   OnResize = FormResize\r
  24   ParentFont = False\r
  25   Position = poDefault\r
  26   LCLVersion = '0.9.26'\r
  27   WindowState = wsMaximized\r
  28   object Label_WinePreFix: TLabel\r
  29     AnchorSideTop.Control = Owner\r
  30     Left = 241\r
  31     Height = 16\r
  32     Top = 5\r
  33     Width = 79\r
  34     HelpContext = 0\r
  35     Align = alNone\r
  36     Alignment = taLeftJustify\r
  37     BorderSpacing.Left = 0\r
  38     BorderSpacing.Top = 5\r
  39     BorderSpacing.Right = 0\r
  40     BorderSpacing.Bottom = 0\r
  41     BorderSpacing.Around = 0\r
  42     BorderSpacing.CellAlignHorizontal = ccaFill\r
  43     BorderSpacing.CellAlignVertical = ccaFill\r
  44     Caption = 'Wine Prefix''s'\r
  45     ParentColor = False\r
  46   end\r
  47   object Label_ProgramsList: TLabel\r
  48     AnchorSideTop.Control = ComboBox_PreFix\r
  49     AnchorSideTop.Side = asrBottom\r
  50     Left = 241\r
  51     Height = 16\r
  52     Top = 53\r
  53     Width = 95\r
  54     HelpContext = 0\r
  55     Align = alNone\r
  56     Alignment = taLeftJustify\r
  57     BorderSpacing.Left = 0\r
  58     BorderSpacing.Top = 3\r
  59     BorderSpacing.Right = 0\r
  60     BorderSpacing.Bottom = 0\r
  61     BorderSpacing.Around = 0\r
  62     BorderSpacing.CellAlignHorizontal = ccaFill\r
  63     BorderSpacing.CellAlignVertical = ccaFill\r
  64     Caption = 'Pick a Program'\r
  65     ParentColor = False\r
  66   end\r
  67   object Label_ProgramPath: TLabel\r
  68     AnchorSideTop.Control = ComboBox_ProgramsList\r
  69     AnchorSideTop.Side = asrBottom\r
  70     Left = 241\r
  71     Height = 16\r
  72     Top = 101\r
  73     Width = 87\r
  74     HelpContext = 0\r
  75     Align = alNone\r
  76     Alignment = taLeftJustify\r
  77     BorderSpacing.Left = 0\r
  78     BorderSpacing.Top = 3\r
  79     BorderSpacing.Right = 0\r
  80     BorderSpacing.Bottom = 0\r
  81     BorderSpacing.Around = 0\r
  82     BorderSpacing.CellAlignHorizontal = ccaFill\r
  83     BorderSpacing.CellAlignVertical = ccaFill\r
  84     Caption = 'Program Path'\r
  85     ParentColor = False\r
  86   end\r
  87   object Label_Flags: TLabel\r
  88     AnchorSideTop.Control = EditBox_ProgramPath\r
  89     AnchorSideTop.Side = asrBottom\r
  90     Left = 241\r
  91     Height = 16\r
  92     Top = 145\r
  93     Width = 127\r
  94     HelpContext = 0\r
  95     Align = alNone\r
  96     Alignment = taLeftJustify\r
  97     BorderSpacing.Left = 0\r
  98     BorderSpacing.Top = 5\r
  99     BorderSpacing.Right = 0\r
 100     BorderSpacing.Bottom = 0\r
 101     BorderSpacing.Around = 0\r
 102     BorderSpacing.CellAlignHorizontal = ccaFill\r
 103     BorderSpacing.CellAlignVertical = ccaFill\r
 104     Caption = 'Set Programs Flags:'\r
 105     ParentColor = False\r
 106   end\r
 107   object Label_WineVersion: TLabel\r
 108     Left = 9\r
 109     Height = 16\r
 110     Top = 8\r
 111     Width = 80\r
 112     HelpContext = 0\r
 113     Align = alNone\r
 114     Alignment = taLeftJustify\r
 115     BorderSpacing.Left = 0\r
 116     BorderSpacing.Top = 0\r
 117     BorderSpacing.Right = 0\r
 118     BorderSpacing.Bottom = 0\r
 119     BorderSpacing.Around = 0\r
 120     BorderSpacing.CellAlignHorizontal = ccaFill\r
 121     BorderSpacing.CellAlignVertical = ccaFill\r
 122     Caption = 'Wine version'\r
 123     ParentColor = False\r
 124   end\r
 125   object Memo_LogOutPut: TMemo\r
 126     AnchorSideTop.Control = Btn_Run\r
 127     AnchorSideTop.Side = asrBottom\r
 128     Left = 0\r
 129     Height = 593\r
 130     Top = 358\r
 131     Width = 1280\r
 132     HelpContext = 0\r
 133     Align = alBottom\r
 134     Anchors = [akTop, akLeft, akRight, akBottom]\r
 135     BorderSpacing.Left = 0\r
 136     BorderSpacing.Top = 5\r
 137     BorderSpacing.Right = 0\r
 138     BorderSpacing.Bottom = 0\r
 139     BorderSpacing.Around = 0\r
 140     BorderSpacing.CellAlignHorizontal = ccaFill\r
 141     BorderSpacing.CellAlignVertical = ccaFill\r
 142     ScrollBars = ssNone\r
 143     TabOrder = 1\r
 144   end\r
 145   object Btn_Run: TButton\r
 146     AnchorSideTop.Control = Btn_Settings\r
 147     AnchorSideTop.Side = asrBottom\r
 148     Left = 7\r
 149     Height = 25\r
 150     Top = 328\r
 151     Width = 75\r
 152     HelpContext = 0\r
 153     Align = alNone\r
 154     BorderSpacing.Left = 0\r
 155     BorderSpacing.Top = 3\r
 156     BorderSpacing.Right = 0\r
 157     BorderSpacing.Bottom = 0\r
 158     BorderSpacing.Around = 0\r
 159     BorderSpacing.CellAlignHorizontal = ccaFill\r
 160     BorderSpacing.CellAlignVertical = ccaFill\r
 161     Caption = 'Run'\r
 162     OnClick = Btn_RunClick\r
 163     TabOrder = 0\r
 164   end\r
 165   object Check_Terminal: TCheckBox\r
 166     AnchorSideTop.Side = asrBottom\r
 167     Left = 9\r
 168     Height = 22\r
 169     Top = 192\r
 170     Width = 119\r
 171     HelpContext = 0\r
 172     Align = alNone\r
 173     BorderSpacing.Left = 0\r
 174     BorderSpacing.Top = 14\r
 175     BorderSpacing.Right = 0\r
 176     BorderSpacing.Bottom = 0\r
 177     BorderSpacing.Around = 0\r
 178     BorderSpacing.CellAlignHorizontal = ccaFill\r
 179     BorderSpacing.CellAlignVertical = ccaFill\r
 180     Caption = 'Run in Terminal'\r
 181     State = cbUnchecked\r
 182     TabOrder = 2\r
 183     UseOnChange = False\r
 184   end\r
 185   object Btn_DebugChannelsConfig: TButton\r
 186     AnchorSideLeft.Control = Btn_Run\r
 187     AnchorSideLeft.Side = asrCenter\r
 188     AnchorSideTop.Control = Memo_LogOutPut\r
 189     AnchorSideRight.Control = Owner\r
 190     Left = 44\r
 191     Height = 22\r
 192     Top = 519\r
 193     Width = 1\r
 194     HelpContext = 0\r
 195     Align = alNone\r
 196     Anchors = [akLeft]\r
 197     BorderSpacing.Left = 0\r
 198     BorderSpacing.Top = 0\r
 199     BorderSpacing.Right = 0\r
 200     BorderSpacing.Bottom = 0\r
 201     BorderSpacing.Around = 0\r
 202     BorderSpacing.CellAlignHorizontal = ccaFill\r
 203     BorderSpacing.CellAlignVertical = ccaFill\r
 204     Caption = 'Config'\r
 205     OnClick = Btn_DebugChannelsConfigClick\r
 206     TabOrder = 3\r
 207     Visible = False\r
 208   end\r
 209   object CheckBox_DebugChannelUse: TCheckBox\r
 210     Left = 868\r
 211     Height = 22\r
 212     Top = 351\r
 213     Width = 147\r
 214     HelpContext = 0\r
 215     Align = alNone\r
 216     BorderSpacing.Left = 0\r
 217     BorderSpacing.Top = 0\r
 218     BorderSpacing.Right = 0\r
 219     BorderSpacing.Bottom = 0\r
 220     BorderSpacing.Around = 0\r
 221     BorderSpacing.CellAlignHorizontal = ccaFill\r
 222     BorderSpacing.CellAlignVertical = ccaFill\r
 223     Caption = 'Use Debug channel'\r
 224     State = cbUnchecked\r
 225     TabOrder = 4\r
 226     TabStop = False\r
 227     UseOnChange = False\r
 228     Visible = False\r
 229   end\r
 230   object Btn_About: TButton\r
 231     AnchorSideRight.Control = Owner\r
 232     AnchorSideRight.Side = asrBottom\r
 233     Left = 1186\r
 234     Height = 25\r
 235     Top = 326\r
 236     Width = 91\r
 237     HelpContext = 0\r
 238     Align = alNone\r
 239     Anchors = [akTop, akRight]\r
 240     BorderSpacing.Left = 0\r
 241     BorderSpacing.Top = 0\r
 242     BorderSpacing.Right = 3\r
 243     BorderSpacing.Bottom = 0\r
 244     BorderSpacing.Around = 0\r
 245     BorderSpacing.CellAlignHorizontal = ccaFill\r
 246     BorderSpacing.CellAlignVertical = ccaFill\r
 247     Caption = 'About'\r
 248     OnClick = Btn_AboutClick\r
 249     TabOrder = 5\r
 250   end\r
 251   object ComboBox_SoundWrapper: TComboBox\r
 252     AnchorSideLeft.Control = ComboBox_TerminalName\r
 253     AnchorSideTop.Control = CheckBox_UseSoundWrapper\r
 254     AnchorSideTop.Side = asrBottom\r
 255     Left = 27\r
 256     Height = 27\r
 257     Top = 268\r
 258     Width = 131\r
 259     HelpContext = 0\r
 260     Align = alNone\r
 261     AutoComplete = False\r
 262     BorderSpacing.Left = 0\r
 263     BorderSpacing.Top = 0\r
 264     BorderSpacing.Right = 0\r
 265     BorderSpacing.Bottom = 0\r
 266     BorderSpacing.Around = 0\r
 267     BorderSpacing.CellAlignHorizontal = ccaFill\r
 268     BorderSpacing.CellAlignVertical = ccaFill\r
 269     CharCase = ecNormal\r
 270     Ctl3D = False\r
 271     ItemHeight = 0\r
 272     Items.Strings = (\r
 273       '/usr/bin/aoss'\r
 274     )\r
 275     ItemWidth = 0\r
 276     MaxLength = 65535\r
 277     Sorted = False\r
 278     Style = csDropDown\r
 279     TabOrder = 6\r
 280     Text = 'ComboBox_SoundWrapper'\r
 281   end\r
 282   object CheckBox_UseSoundWrapper: TCheckBox\r
 283     AnchorSideTop.Control = ComboBox_TerminalName\r
 284     AnchorSideTop.Side = asrBottom\r
 285     Left = 9\r
 286     Height = 22\r
 287     Top = 246\r
 288     Width = 149\r
 289     HelpContext = 0\r
 290     Align = alNone\r
 291     BorderSpacing.Left = 0\r
 292     BorderSpacing.Top = 3\r
 293     BorderSpacing.Right = 0\r
 294     BorderSpacing.Bottom = 0\r
 295     BorderSpacing.Around = 0\r
 296     BorderSpacing.CellAlignHorizontal = ccaFill\r
 297     BorderSpacing.CellAlignVertical = ccaFill\r
 298     Caption = 'Use Sound Wrapper'\r
 299     State = cbUnchecked\r
 300     TabOrder = 7\r
 301     UseOnChange = False\r
 302   end\r
 303   object Btn_Settings: TButton\r
 304     AnchorSideLeft.Control = Owner\r
 305     AnchorSideTop.Control = ComboBox_SoundWrapper\r
 306     AnchorSideTop.Side = asrBottom\r
 307     Left = 9\r
 308     Height = 25\r
 309     Top = 300\r
 310     Width = 75\r
 311     HelpContext = 0\r
 312     Align = alNone\r
 313     BorderSpacing.Left = 9\r
 314     BorderSpacing.Top = 5\r
 315     BorderSpacing.Right = 0\r
 316     BorderSpacing.Bottom = 0\r
 317     BorderSpacing.Around = 0\r
 318     BorderSpacing.CellAlignHorizontal = ccaFill\r
 319     BorderSpacing.CellAlignVertical = ccaFill\r
 320     Caption = 'Settings'\r
 321     OnClick = Btn_SettingsClick\r
 322     TabOrder = 8\r
 323   end\r
 324   object ComboBox_TerminalName: TComboBox\r
 325     AnchorSideLeft.Control = Check_Terminal\r
 326     AnchorSideTop.Control = Check_Terminal\r
 327     AnchorSideTop.Side = asrBottom\r
 328     Left = 27\r
 329     Height = 29\r
 330     Top = 214\r
 331     Width = 201\r
 332     HelpContext = 0\r
 333     Align = alNone\r
 334     AutoComplete = False\r
 335     BorderSpacing.Left = 18\r
 336     BorderSpacing.Top = 0\r
 337     BorderSpacing.Right = 0\r
 338     BorderSpacing.Bottom = 0\r
 339     BorderSpacing.Around = 0\r
 340     BorderSpacing.CellAlignHorizontal = ccaFill\r
 341     BorderSpacing.CellAlignVertical = ccaFill\r
 342     CharCase = ecNormal\r
 343     Ctl3D = False\r
 344     ItemHeight = 0\r
 345     ItemIndex = 0\r
 346     Items.Strings = (\r
 347       '/usr/bin/gnome-terminal'\r
 348       '/usr/bin/konsole'\r
 349     )\r
 350     ItemWidth = 0\r
 351     MaxLength = 65535\r
 352     Sorted = False\r
 353     Style = csDropDownList\r
 354     TabOrder = 9\r
 355     Text = '/usr/bin/gnome-terminal'\r
 356   end\r
 357   object ComboBox_PreFix: TComboBox\r
 358     AnchorSideTop.Control = Label_WinePreFix\r
 359     AnchorSideTop.Side = asrBottom\r
 360     AnchorSideRight.Control = TogBtn_Listdrive\r
 361     Left = 241\r
 362     Height = 29\r
 363     Top = 21\r
 364     Width = 843\r
 365     HelpContext = 0\r
 366     Align = alNone\r
 367     Anchors = [akTop, akLeft, akRight]\r
 368     AutoComplete = False\r
 369     BorderSpacing.Left = 0\r
 370     BorderSpacing.Top = 0\r
 371     BorderSpacing.Right = 0\r
 372     BorderSpacing.Bottom = 0\r
 373     BorderSpacing.Around = 0\r
 374     BorderSpacing.CellAlignHorizontal = ccaFill\r
 375     BorderSpacing.CellAlignVertical = ccaFill\r
 376     CharCase = ecNormal\r
 377     Ctl3D = False\r
 378     DropDownCount = 30\r
 379     ItemHeight = 0\r
 380     ItemWidth = 0\r
 381     MaxLength = 65535\r
 382     OnChange = ComboBox_PreFixChange\r
 383     Sorted = False\r
 384     Style = csDropDownList\r
 385     TabOrder = 10\r
 386   end\r
 387   object ComboBox_ProgramsList: TComboBox\r
 388     AnchorSideTop.Control = Label_ProgramsList\r
 389     AnchorSideTop.Side = asrBottom\r
 390     AnchorSideRight.Control = Owner\r
 391     AnchorSideRight.Side = asrBottom\r
 392     Left = 241\r
 393     Height = 29\r
 394     Top = 69\r
 395     Width = 1036\r
 396     HelpContext = 0\r
 397     Align = alNone\r
 398     Anchors = [akTop, akLeft, akRight]\r
 399     AutoComplete = False\r
 400     BorderSpacing.Left = 0\r
 401     BorderSpacing.Top = 0\r
 402     BorderSpacing.Right = 3\r
 403     BorderSpacing.Bottom = 0\r
 404     BorderSpacing.Around = 0\r
 405     BorderSpacing.CellAlignHorizontal = ccaFill\r
 406     BorderSpacing.CellAlignVertical = ccaFill\r
 407     CharCase = ecNormal\r
 408     Ctl3D = False\r
 409     ItemHeight = 0\r
 410     ItemWidth = 0\r
 411     MaxLength = 65535\r
 412     OnChange = ComboBox_ProgramsListChange\r
 413     Sorted = False\r
 414     Style = csDropDownList\r
 415     TabOrder = 11\r
 416   end\r
 417   object CheckListBox_Flags: TCheckListBox\r
 418     AnchorSideLeft.Control = ComboBox_TerminalName\r
 419     AnchorSideLeft.Side = asrBottom\r
 420     AnchorSideTop.Control = Label_Flags\r
 421     AnchorSideTop.Side = asrBottom\r
 422     AnchorSideRight.Control = Button_Winecfg\r
 423     Left = 241\r
 424     Height = 147\r
 425     Top = 161\r
 426     Width = 958\r
 427     HelpContext = 0\r
 428     Align = alNone\r
 429     Anchors = [akTop, akLeft, akRight]\r
 430     BorderSpacing.Left = 13\r
 431     BorderSpacing.Top = 0\r
 432     BorderSpacing.Right = 0\r
 433     BorderSpacing.Bottom = 0\r
 434     BorderSpacing.Around = 0\r
 435     BorderSpacing.CellAlignHorizontal = ccaFill\r
 436     BorderSpacing.CellAlignVertical = ccaFill\r
 437     IntegralHeight = False\r
 438     ItemHeight = 0\r
 439     MultiSelect = False\r
 440     Sorted = False\r
 441     Style = lbStandard\r
 442     TabOrder = 12\r
 443     TopIndex = -1\r
 444   end\r
 445   object EditBox_ProgramPath: TEdit\r
 446     AnchorSideTop.Control = Label_ProgramPath\r
 447     AnchorSideTop.Side = asrBottom\r
 448     AnchorSideRight.Control = Owner\r
 449     AnchorSideRight.Side = asrBottom\r
 450     Left = 241\r
 451     Height = 23\r
 452     Top = 117\r
 453     Width = 1036\r
 454     HelpContext = 0\r
 455     Align = alNone\r
 456     Anchors = [akTop, akLeft, akRight]\r
 457     BorderSpacing.Left = 0\r
 458     BorderSpacing.Top = 0\r
 459     BorderSpacing.Right = 3\r
 460     BorderSpacing.Bottom = 0\r
 461     BorderSpacing.Around = 0\r
 462     BorderSpacing.CellAlignHorizontal = ccaFill\r
 463     BorderSpacing.CellAlignVertical = ccaFill\r
 464     OnChange = EditBox_ProgramPathChange\r
 465     ReadOnly = True\r
 466     TabOrder = 13\r
 467     Text = 'EditBox_ProgramPath'\r
 468   end\r
 469   object Button_Winecfg: TButton\r
 470     AnchorSideLeft.Control = CheckListBox_Flags\r
 471     AnchorSideLeft.Side = asrBottom\r
 472     AnchorSideTop.Control = CheckListBox_Flags\r
 473     AnchorSideRight.Control = Owner\r
 474     AnchorSideRight.Side = asrBottom\r
 475     Left = 1202\r
 476     Height = 25\r
 477     Top = 161\r
 478     Width = 75\r
 479     HelpContext = 0\r
 480     Align = alNone\r
 481     Anchors = [akTop, akRight]\r
 482     BorderSpacing.Left = 3\r
 483     BorderSpacing.Top = 0\r
 484     BorderSpacing.Right = 3\r
 485     BorderSpacing.Bottom = 0\r
 486     BorderSpacing.Around = 0\r
 487     BorderSpacing.CellAlignHorizontal = ccaFill\r
 488     BorderSpacing.CellAlignVertical = ccaFill\r
 489     Caption = 'Winecfg'\r
 490     OnClick = Button_WinecfgClick\r
 491     TabOrder = 14\r
 492   end\r
 493   object Button_Regedit: TButton\r
 494     AnchorSideLeft.Control = Button_Winecfg\r
 495     AnchorSideTop.Control = Button_Winecfg\r
 496     AnchorSideTop.Side = asrBottom\r
 497     Left = 1202\r
 498     Height = 25\r
 499     Top = 189\r
 500     Width = 75\r
 501     HelpContext = 0\r
 502     Align = alNone\r
 503     BorderSpacing.Left = 0\r
 504     BorderSpacing.Top = 3\r
 505     BorderSpacing.Right = 0\r
 506     BorderSpacing.Bottom = 0\r
 507     BorderSpacing.Around = 0\r
 508     BorderSpacing.CellAlignHorizontal = ccaFill\r
 509     BorderSpacing.CellAlignVertical = ccaFill\r
 510     Caption = 'Regedit'\r
 511     OnClick = Button_RegeditClick\r
 512     TabOrder = 15\r
 513   end\r
 514   object TogBtn_Listdrive: TToggleBox\r
 515     AnchorSideTop.Control = Label_WinePreFix\r
 516     AnchorSideTop.Side = asrBottom\r
 517     AnchorSideRight.Control = Owner\r
 518     AnchorSideRight.Side = asrBottom\r
 519     Left = 1087\r
 520     Height = 23\r
 521     Top = 21\r
 522     Width = 190\r
 523     HelpContext = 0\r
 524     Anchors = [akTop, akRight]\r
 525     BorderSpacing.Left = 3\r
 526     BorderSpacing.Top = 0\r
 527     BorderSpacing.Right = 3\r
 528     BorderSpacing.Bottom = 0\r
 529     BorderSpacing.Around = 0\r
 530     BorderSpacing.CellAlignHorizontal = ccaFill\r
 531     BorderSpacing.CellAlignVertical = ccaFill\r
 532     Caption = 'List programs on drive D'\r
 533     OnChange = TogBtn_ListdriveChange\r
 534     State = cbUnchecked\r
 535     TabOrder = 16\r
 536     UseOnChange = False\r
 537   end\r
 538   object Btn_StopScan: TButton\r
 539     AnchorSideBottom.Control = Memo_LogOutPut\r
 540     Left = 464\r
 541     Height = 41\r
 542     Top = 312\r
 543     Width = 120\r
 544     HelpContext = 0\r
 545     Align = alCustom\r
 546     Anchors = [akTop, akLeft, akBottom]\r
 547     BorderSpacing.Left = 0\r
 548     BorderSpacing.Top = 0\r
 549     BorderSpacing.Right = 0\r
 550     BorderSpacing.Bottom = 0\r
 551     BorderSpacing.Around = 0\r
 552     BorderSpacing.CellAlignHorizontal = ccaFill\r
 553     BorderSpacing.CellAlignVertical = ccaFill\r
 554     Caption = 'Stop Scan'\r
 555     Font.Height = -18\r
 556     Font.Name = 'Sans'\r
 557     Font.Style = []\r
 558     OnClick = Btn_StopScanClick\r
 559     ParentFont = False\r
 560     TabOrder = 17\r
 561     Visible = False\r
 562   end\r
 563   object ComboBox_WineVersion: TComboBox\r
 564     Left = 9\r
 565     Height = 29\r
 566     Top = 24\r
 567     Width = 188\r
 568     HelpContext = 0\r
 569     Align = alNone\r
 570     AutoComplete = False\r
 571     BorderSpacing.Left = 0\r
 572     BorderSpacing.Top = 0\r
 573     BorderSpacing.Right = 0\r
 574     BorderSpacing.Bottom = 0\r
 575     BorderSpacing.Around = 0\r
 576     BorderSpacing.CellAlignHorizontal = ccaFill\r
 577     BorderSpacing.CellAlignVertical = ccaFill\r
 578     CharCase = ecNormal\r
 579     Ctl3D = False\r
 580     ItemHeight = 0\r
 581     ItemWidth = 0\r
 582     MaxLength = -1\r
 583     Sorted = False\r
 584     Style = csDropDownList\r
 585     TabOrder = 18\r
 586   end\r
 587 end\r