home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 March / Chip_1999-03_cd.bin / zkuste / delphi / INFO / DI9806BT.ZIP / copy / COPYF.dfm / COPYF.txt
Text File  |  1997-12-29  |  2KB  |  93 lines
  1. object Form1: TForm1
  2.   Left = 246
  3.   Top = 126
  4.   Width = 380
  5.   Height = 369
  6.   ActiveControl = FileListBox1
  7.   Caption = 'Copy a File'
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object GroupBox2: TGroupBox
  16.     Left = 8
  17.     Top = 220
  18.     Width = 353
  19.     Height = 61
  20.     Caption = 'Enter the Destingation File'
  21.     TabOrder = 7
  22.   end
  23.   object GroupBox1: TGroupBox
  24.     Left = 8
  25.     Top = 12
  26.     Width = 353
  27.     Height = 189
  28.     Caption = 'Pick a File to Copy'
  29.     TabOrder = 6
  30.     object Label1: TLabel
  31.       Left = 20
  32.       Top = 16
  33.       Width = 317
  34.       Height = 13
  35.       AutoSize = False
  36.       Caption = 'F:\TECHEDIT\2Todd\COPY'
  37.     end
  38.   end
  39.   object FileListBox1: TFileListBox
  40.     Left = 28
  41.     Top = 48
  42.     Width = 145
  43.     Height = 97
  44.     FileType = [ftReadOnly, ftHidden, ftSystem, ftArchive, ftNormal]
  45.     ItemHeight = 16
  46.     ShowGlyphs = True
  47.     TabOrder = 0
  48.   end
  49.   object DirectoryListBox1: TDirectoryListBox
  50.     Left = 196
  51.     Top = 48
  52.     Width = 145
  53.     Height = 97
  54.     DirLabel = Label1
  55.     FileList = FileListBox1
  56.     ItemHeight = 16
  57.     TabOrder = 1
  58.   end
  59.   object DriveComboBox1: TDriveComboBox
  60.     Left = 196
  61.     Top = 156
  62.     Width = 145
  63.     Height = 19
  64.     DirList = DirectoryListBox1
  65.     TabOrder = 2
  66.   end
  67.   object FilterComboBox1: TFilterComboBox
  68.     Left = 28
  69.     Top = 156
  70.     Width = 145
  71.     Height = 21
  72.     FileList = FileListBox1
  73.     Filter = 'All files (*.*)|*.*|Text files (*.txt)|*.txt'
  74.     TabOrder = 3
  75.   end
  76.   object CopyBtn: TButton
  77.     Left = 140
  78.     Top = 296
  79.     Width = 89
  80.     Height = 33
  81.     Caption = 'Copy'
  82.     TabOrder = 4
  83.     OnClick = CopyBtnClick
  84.   end
  85.   object DestEdit: TEdit
  86.     Left = 28
  87.     Top = 240
  88.     Width = 317
  89.     Height = 21
  90.     TabOrder = 5
  91.   end
  92. end
  93.