home *** CD-ROM | disk | FTP | other *** search
/ Screen - 100 Snelle Screensavers / ScreenSaver.iso / aquascape / setup.exe / 0 / RCDATA / TCHOOSEDIR / TCHOOSEDIR.txt
Text File  |  1997-06-29  |  2KB  |  122 lines
  1. object ChooseDir: TChooseDir
  2.   Left = 283
  3.   Top = 186
  4.   ActiveControl = Path
  5.   BorderIcons = []
  6.   BorderStyle = bsDialog
  7.   Caption = 'Choose Directory'
  8.   ClientHeight = 269
  9.   ClientWidth = 250
  10.   Font.Color = clBlack
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = [fsBold]
  14.   FormStyle = fsStayOnTop
  15.   Position = poScreenCenter
  16.   OnCreate = FormCreate
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object Label1: TLabel
  20.     Left = 13
  21.     Top = 10
  22.     Width = 201
  23.     Height = 13
  24.     Caption = 'Please choose the directory for installation:'
  25.     Font.Color = clBlack
  26.     Font.Height = -12
  27.     Font.Name = 'MS Sans Serif'
  28.     Font.Style = []
  29.     ParentFont = False
  30.   end
  31.   object PathLabel: TLabel
  32.     Left = 13
  33.     Top = 34
  34.     Width = 25
  35.     Height = 13
  36.     Caption = '&Path:'
  37.     Font.Color = clBlack
  38.     Font.Height = -12
  39.     Font.Name = 'MS Sans Serif'
  40.     Font.Style = []
  41.     ParentFont = False
  42.   end
  43.   object Label3: TLabel
  44.     Left = 13
  45.     Top = 218
  46.     Width = 33
  47.     Height = 13
  48.     Caption = 'Dri&ves:'
  49.     Font.Color = clBlack
  50.     Font.Height = -12
  51.     Font.Name = 'MS Sans Serif'
  52.     Font.Style = []
  53.     ParentFont = False
  54.   end
  55.   object Label4: TLabel
  56.     Left = 13
  57.     Top = 86
  58.     Width = 53
  59.     Height = 13
  60.     Caption = '&Directories:'
  61.     Font.Color = clBlack
  62.     Font.Height = -12
  63.     Font.Name = 'MS Sans Serif'
  64.     Font.Style = []
  65.     ParentFont = False
  66.   end
  67.   object OKBtn: TBitBtn
  68.     Left = 158
  69.     Top = 104
  70.     Width = 81
  71.     Height = 27
  72.     Font.Color = clBlack
  73.     Font.Height = -12
  74.     Font.Name = 'MS Sans Serif'
  75.     Font.Style = [fsBold]
  76.     ParentFont = False
  77.     TabOrder = 0
  78.     OnClick = OKBtnClick
  79.     Kind = bkOK
  80.     Margin = 4
  81.     Spacing = -1
  82.     IsControl = True
  83.   end
  84.   object CancelBtn: TBitBtn
  85.     Left = 158
  86.     Top = 138
  87.     Width = 81
  88.     Height = 27
  89.     TabOrder = 1
  90.     OnClick = CancelBtnClick
  91.     Kind = bkCancel
  92.     Margin = 4
  93.     Spacing = -1
  94.     IsControl = True
  95.   end
  96.   object Path: TEdit
  97.     Left = 13
  98.     Top = 52
  99.     Width = 225
  100.     Height = 21
  101.     TabOrder = 2
  102.     Text = 'C:\Program Files\AquaScape'
  103.   end
  104.   object DirectoryListBox1: TDirectoryListBox
  105.     Left = 13
  106.     Top = 105
  107.     Width = 133
  108.     Height = 101
  109.     ItemHeight = 16
  110.     TabOrder = 3
  111.     OnChange = DirectoryListBox1Change
  112.   end
  113.   object DriveComboBox1: TDriveComboBox
  114.     Left = 13
  115.     Top = 236
  116.     Width = 133
  117.     Height = 19
  118.     DirList = DirectoryListBox1
  119.     TabOrder = 4
  120.   end
  121. end
  122.