home *** CD-ROM | disk | FTP | other *** search
/ Gambler 34 A / GAMBLERCD34A.BIN / Utils / GP / Progs / GHP / HMMHACK.DLL / 0 / RCDATA / TCDIRDLG / TCDIRDLG.txt < prev   
Text File  |  1997-11-09  |  2KB  |  127 lines
  1. object CDirDlg: TCDirDlg
  2.   Left = 146
  3.   Top = 379
  4.   ActiveControl = OKBtn
  5.   BorderStyle = bsDialog
  6.   Caption = 'Open File'
  7.   ClientHeight = 241
  8.   ClientWidth = 393
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clBlack
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   Icon.Data = {<image000.ico>}
  15.   Position = poScreenCenter
  16.   OnCreate = FormCreate
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object Label1: TLabel
  20.     Left = 4
  21.     Top = 4
  22.     Width = 277
  23.     Height = 13
  24.     AutoSize = False
  25.     Caption = 'Please choose file to open.'
  26.   end
  27.   object Label2: TLabel
  28.     Left = 4
  29.     Top = 20
  30.     Width = 19
  31.     Height = 13
  32.     Caption = 'File:'
  33.   end
  34.   object Label3: TLabel
  35.     Left = 4
  36.     Top = 60
  37.     Width = 53
  38.     Height = 13
  39.     Caption = 'Directories:'
  40.   end
  41.   object Label4: TLabel
  42.     Left = 4
  43.     Top = 192
  44.     Width = 33
  45.     Height = 13
  46.     Caption = 'Drives:'
  47.   end
  48.   object OKBtn: TBitBtn
  49.     Left = 300
  50.     Top = 4
  51.     Width = 87
  52.     Height = 23
  53.     TabOrder = 0
  54.     OnClick = OKBtnClick
  55.     Kind = bkOK
  56.     Margin = 2
  57.     Spacing = -1
  58.     IsControl = True
  59.   end
  60.   object CancelBtn: TBitBtn
  61.     Left = 300
  62.     Top = 32
  63.     Width = 87
  64.     Height = 23
  65.     TabOrder = 1
  66.     Kind = bkCancel
  67.     Margin = 2
  68.     Spacing = -1
  69.     IsControl = True
  70.   end
  71.   object PathEd: TEdit
  72.     Left = 4
  73.     Top = 38
  74.     Width = 277
  75.     Height = 21
  76.     TabOrder = 2
  77.     Text = '*.cg*'
  78.   end
  79.   object DirList: TDirectoryListBox
  80.     Left = 4
  81.     Top = 76
  82.     Width = 181
  83.     Height = 113
  84.     FileList = FileList
  85.     ItemHeight = 16
  86.     TabOrder = 3
  87.   end
  88.   object DriveComb: TDriveComboBox
  89.     Left = 4
  90.     Top = 208
  91.     Width = 181
  92.     Height = 19
  93.     DirList = DirList
  94.     TabOrder = 4
  95.   end
  96.   object FileList: TFileListBox
  97.     Left = 192
  98.     Top = 76
  99.     Width = 193
  100.     Height = 113
  101.     FileEdit = PathEd
  102.     ItemHeight = 16
  103.     Mask = '*.cg*'
  104.     ShowGlyphs = True
  105.     TabOrder = 5
  106.     OnChange = FileListChange
  107.   end
  108.   object RadioStd: TRadioButton
  109.     Left = 36
  110.     Top = 20
  111.     Width = 113
  112.     Height = 15
  113.     Caption = 'Standard'
  114.     TabOrder = 6
  115.     OnClick = RadioStdClick
  116.   end
  117.   object RadioCmg: TRadioButton
  118.     Left = 154
  119.     Top = 20
  120.     Width = 113
  121.     Height = 15
  122.     Caption = 'Campaign'
  123.     TabOrder = 7
  124.     OnClick = RadioCmgClick
  125.   end
  126. end
  127.