home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi 4 Bible
/
Delphi_4_Bible_Tom_Swan_IDG_Books_1998.iso
/
source
/
DIREXEC
/
Direxec.exe
/
0
/
RCDATA
/
TDIRDLGFORM
/
TDIRDLGFORM.txt
Wrap
Text File
|
1998-05-14
|
3KB
|
157 lines
object DirDlgForm: TDirDlgForm
Left = 203
Top = 109
ActiveControl = FileNameEdit
BorderStyle = bsDialog
Caption = 'Directory Dialog'
ClientHeight = 220
ClientWidth = 482
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
Position = poDefault
PixelsPerInch = 96
TextHeight = 14
object FileNameLabel: TLabel
Left = 8
Top = 8
Width = 53
Height = 14
Caption = 'File &Name'
FocusControl = FileNameEdit
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object DirectoriesLabel: TLabel
Left = 200
Top = 8
Width = 61
Height = 14
Caption = '&Directories'
FocusControl = DirectoryListBox
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object DirLabel: TLabel
Left = 200
Top = 27
Width = 169
Height = 14
AutoSize = False
Caption = 'D:\Delphi 4 Bible\SOURCE\DIREX'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object ListFilesLabel: TLabel
Left = 8
Top = 176
Width = 95
Height = 14
Caption = 'List files of &Type:'
FocusControl = FilterComboBox
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object DrivesLabel: TLabel
Left = 200
Top = 176
Width = 35
Height = 14
Caption = 'Dri&ves'
FocusControl = DriveComboBox
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object FileListBox: TFileListBox
Left = 8
Top = 56
Width = 169
Height = 102
FileEdit = FileNameEdit
IntegralHeight = True
ItemHeight = 14
TabOrder = 1
OnDblClick = FileListBoxDblClick
end
object DirectoryListBox: TDirectoryListBox
Left = 200
Top = 56
Width = 169
Height = 100
DirLabel = DirLabel
FileList = FileListBox
IntegralHeight = True
ItemHeight = 16
TabOrder = 2
end
object DriveComboBox: TDriveComboBox
Left = 200
Top = 192
Width = 169
Height = 20
TabOrder = 4
OnChange = DriveComboBoxChange
end
object FilterComboBox: TFilterComboBox
Left = 8
Top = 192
Width = 169
Height = 22
FileList = FileListBox
Filter =
'All files (*.*)|*.*|Executable files (*.exe)|*.exe|Executable fi' +
'les (*.com)|*.com|Dos batch files (*.bat)|*.bat|Dos Pif files (*' +
'.pif)|*.pif|Windows help files (*.hlp)|*.hlp|Windows bitmap file' +
's (*.bmp)|*.bmp|Text files (*.txt)|*.txt'
TabOrder = 3
end
object FileNameEdit: TEdit
Left = 8
Top = 24
Width = 169
Height = 22
TabOrder = 0
Text = '*.*'
end
object OkBitBtn: TBitBtn
Left = 384
Top = 16
Width = 89
Height = 33
Caption = 'O&k'
TabOrder = 5
Kind = bkOK
end
object CancelBitBtn: TBitBtn
Left = 384
Top = 56
Width = 89
Height = 33
Caption = '&Cancel'
TabOrder = 6
Kind = bkCancel
end
end