home *** CD-ROM | disk | FTP | other *** search
- object dlgFolder: TdlgFolder
- Left = 245
- Top = 129
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- ClientHeight = 219
- ClientWidth = 267
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object tedFolder: TEdit
- Left = 8
- Top = 8
- Width = 253
- Height = 21
- TabOrder = 0
- Text = 'tedFolder'
- OnChange = tedFolderChange
- end
- object lboDirectory: TDirectoryListBox
- Left = 8
- Top = 36
- Width = 169
- Height = 148
- Ctl3D = True
- IntegralHeight = True
- ItemHeight = 16
- ParentCtl3D = False
- TabOrder = 1
- OnChange = lboDirectoryChange
- end
- object cboDrive: TDriveComboBox
- Left = 8
- Top = 192
- Width = 169
- Height = 19
- DirList = lboDirectory
- TabOrder = 2
- end
- object btnOK: TBitBtn
- Left = 184
- Top = 36
- Width = 77
- Height = 23
- Caption = 'OK'
- Default = True
- Enabled = False
- ModalResult = 1
- TabOrder = 3
- NumGlyphs = 2
- Style = bsNew
- end
- object btnCancel: TBitBtn
- Left = 184
- Top = 68
- Width = 77
- Height = 23
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 4
- NumGlyphs = 2
- Style = bsNew
- end
- object btnHelp: TBitBtn
- Left = 184
- Top = 108
- Width = 77
- Height = 23
- Caption = ' &Help'
- Enabled = False
- TabOrder = 5
- Visible = False
- Kind = bkHelp
- Margin = 4
- Style = bsNew
- end
- end
-