home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Internet 2001 September / MICD2001_09_NR2.iso / MICD.EXE / 0 / RCDATA / TMYCOPYFORM / TMYCOPYFORM.txt
Text File  |  2001-08-13  |  3KB  |  138 lines
  1. object MyCopyForm: TMyCopyForm
  2.   Left = 200
  3.   Top = 108
  4.   BorderIcons = []
  5.   BorderStyle = bsSingle
  6.   Caption = 'Kopiowanie'
  7.   ClientHeight = 260
  8.   ClientWidth = 405
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Position = poScreenCenter
  14.   Scaled = False
  15.   OnCreate = FormCreate
  16.   OnDestroy = FormDestroy
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object Panel1: TPanel
  20.     Left = 0
  21.     Top = 0
  22.     Width = 405
  23.     Height = 165
  24.     BevelInner = bvRaised
  25.     BevelOuter = bvLowered
  26.     TabOrder = 0
  27.     object DriveComboBox1: TDriveComboBox
  28.       Left = 2
  29.       Top = 5
  30.       Width = 400
  31.       Height = 22
  32.       Font.Color = clBlack
  33.       Font.Height = -13
  34.       Font.Name = 'MS Sans Serif'
  35.       Font.Style = []
  36.       ParentFont = False
  37.       TabOrder = 0
  38.       OnChange = DriveComboBox1Change
  39.     end
  40.     object DirectoryListBox1: TDirectoryListBox
  41.       Left = 2
  42.       Top = 28
  43.       Width = 400
  44.       Height = 132
  45.       Font.Color = clBlack
  46.       Font.Height = -13
  47.       Font.Name = 'MS Sans Serif'
  48.       Font.Style = []
  49.       ItemHeight = 16
  50.       ParentFont = False
  51.       TabOrder = 1
  52.       OnChange = DirectoryListBox1Change
  53.     end
  54.   end
  55.   object Panel2: TPanel
  56.     Left = 0
  57.     Top = 167
  58.     Width = 405
  59.     Height = 51
  60.     BevelInner = bvRaised
  61.     BevelOuter = bvLowered
  62.     TabOrder = 1
  63.     object Z_label: TLabel
  64.       Left = 10
  65.       Top = 6
  66.       Width = 14
  67.       Height = 16
  68.       Caption = 'Z:'
  69.       Font.Color = clBlack
  70.       Font.Height = -13
  71.       Font.Name = 'MS Sans Serif'
  72.       Font.Style = [fsBold]
  73.       ParentFont = False
  74.     end
  75.     object Z_txt: TLabel
  76.       Left = 40
  77.       Top = 6
  78.       Width = 3
  79.       Height = 16
  80.       Font.Color = clBlack
  81.       Font.Height = -13
  82.       Font.Name = 'MS Sans Serif'
  83.       Font.Style = []
  84.       ParentFont = False
  85.     end
  86.     object Do_label: TLabel
  87.       Left = 10
  88.       Top = 28
  89.       Width = 25
  90.       Height = 16
  91.       Caption = 'Do:'
  92.       Font.Color = clBlack
  93.       Font.Height = -13
  94.       Font.Name = 'MS Sans Serif'
  95.       Font.Style = [fsBold]
  96.       ParentFont = False
  97.     end
  98.     object Do_txt: TLabel
  99.       Left = 40
  100.       Top = 28
  101.       Width = 3
  102.       Height = 16
  103.       Font.Color = clBlack
  104.       Font.Height = -13
  105.       Font.Name = 'MS Sans Serif'
  106.       Font.Style = []
  107.       ParentFont = False
  108.     end
  109.   end
  110.   object Panel3: TPanel
  111.     Left = 0
  112.     Top = 220
  113.     Width = 405
  114.     Height = 40
  115.     BevelInner = bvRaised
  116.     BevelOuter = bvLowered
  117.     TabOrder = 2
  118.     object Kopiuj_but: TButton
  119.       Left = 115
  120.       Top = 8
  121.       Width = 75
  122.       Height = 25
  123.       Caption = 'Kopiuj'
  124.       TabOrder = 0
  125.       OnClick = Kopiuj_butClick
  126.     end
  127.     object Anuluj_but: TButton
  128.       Left = 215
  129.       Top = 8
  130.       Width = 75
  131.       Height = 25
  132.       Caption = 'Anuluj'
  133.       ModalResult = 2
  134.       TabOrder = 1
  135.     end
  136.   end
  137. end
  138.