home *** CD-ROM | disk | FTP | other *** search
- object FormCopy: TFormCopy
- Left = 269
- Top = 162
- Width = 555
- Height = 319
- Caption = 'kopie souboru:'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Splitter2: TSplitter
- Left = 337
- Top = 0
- Width = 5
- Height = 292
- Cursor = crHSplit
- Color = clRed
- ParentColor = False
- end
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 337
- Height = 292
- Align = alLeft
- TabOrder = 0
- object Splitter1: TSplitter
- Left = 169
- Top = 1
- Width = 3
- Height = 290
- Cursor = crHSplit
- Color = clLime
- ParentColor = False
- end
- object Panel2: TPanel
- Left = 1
- Top = 1
- Width = 168
- Height = 290
- Align = alLeft
- TabOrder = 0
- object Panel4: TPanel
- Left = 1
- Top = 248
- Width = 166
- Height = 41
- Align = alBottom
- TabOrder = 0
- object DriveComboBox1: TDriveComboBox
- Left = 12
- Top = 12
- Width = 145
- Height = 19
- DirList = DirectoryListBox1
- TabOrder = 0
- end
- end
- object DirectoryListBox1: TDirectoryListBox
- Left = 1
- Top = 1
- Width = 166
- Height = 247
- Align = alClient
- FileList = FileListBox1
- ItemHeight = 16
- TabOrder = 1
- end
- end
- object Panel3: TPanel
- Left = 172
- Top = 1
- Width = 164
- Height = 290
- Align = alClient
- TabOrder = 1
- object FileListBox1: TFileListBox
- Left = 1
- Top = 1
- Width = 162
- Height = 288
- Align = alClient
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- ItemHeight = 14
- Mask = '?????_????_??????????.hre'
- MultiSelect = True
- ParentFont = False
- TabOrder = 0
- end
- end
- end
- object Panel5: TPanel
- Left = 342
- Top = 0
- Width = 205
- Height = 292
- Align = alClient
- TabOrder = 1
- object Panel7: TPanel
- Left = 1
- Top = 1
- Width = 33
- Height = 290
- Align = alLeft
- TabOrder = 0
- object SpeedButton1: TSpeedButton
- Left = 5
- Top = 32
- Width = 25
- Height = 25
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777700007777777777777777777700007777777777777777777700007777
- 777777C77777777700007777777777CC7777777700007777777777CCC7777777
- 00007777777777CCCC7777770000777CCCCCCCCCCCC777770000777CCCCCCCCC
- CCCC77770000777CCCCCCCCCCCCCC7770000777CCCCCCCCCCCCCF7770000777C
- CCCCCCCCCCCF77770000777FFFFFFFCCCCF7777700007777777777CCCF777777
- 00007777777777CCF777777700007777777777CF7777777700007777777777F7
- 7777777700007777777777777777777700007777777777777777777700007777
- 77777777777777770000}
- Transparent = False
- OnClick = SpeedButton1Click
- end
- end
- object Panel6: TPanel
- Left = 34
- Top = 1
- Width = 170
- Height = 290
- Align = alClient
- TabOrder = 1
- object Panel8: TPanel
- Left = 1
- Top = 248
- Width = 168
- Height = 41
- Align = alBottom
- TabOrder = 0
- object DriveComboBox2: TDriveComboBox
- Left = 16
- Top = 12
- Width = 145
- Height = 19
- TabOrder = 0
- OnChange = DriveComboBox2Change
- end
- end
- object DirectoryListBox2: TDirectoryListBox
- Left = 1
- Top = 1
- Width = 168
- Height = 247
- Align = alClient
- ItemHeight = 16
- TabOrder = 1
- end
- end
- end
- object FormPlacement1: TFormPlacement
- Active = False
- IniFileName = 'Lavina.ini'
- IniSection = 'FormCopy'
- Left = 351
- Top = 265
- end
- object RxGradientCaption1: TRxGradientCaption
- Captions = <>
- FormCaption = 'kopie souboru:'
- Left = 351
- Top = 241
- end
- end
-