home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 January / Pcwk0198.iso / Warsztat / Compress / Tarfwin / TFW.EXE / 0 / RCDATA / TMAINWINDOW / TMAINWINDOW.txt < prev   
Text File  |  1997-07-02  |  3KB  |  117 lines
  1. object Mainwindow: TMainwindow
  2.   Left = 315
  3.   Top = 291
  4.   BorderStyle = bsDialog
  5.   Caption = 'CMSystems TfW v1.00 ∩┐╜Copyright 1997 by Christian Moerz'
  6.   ClientHeight = 273
  7.   ClientWidth = 480
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   PopupMenu = PopupMenu1
  13.   OnCreate = FormCreate
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object Image1: TImage
  17.     Left = 16
  18.     Top = 16
  19.     Width = 32
  20.     Height = 32
  21.     AutoSize = True
  22.     Picture.Data = {<image000.ico>}
  23.   end
  24.   object Label1: TLabel
  25.     Left = 56
  26.     Top = 16
  27.     Width = 84
  28.     Height = 13
  29.     Caption = 'TAR for Windows'
  30.   end
  31.   object Ver: TLabel
  32.     Left = 56
  33.     Top = 32
  34.     Width = 59
  35.     Height = 13
  36.     Caption = 'Version 1.00'
  37.   end
  38.   object Label2: TLabel
  39.     Left = 56
  40.     Top = 56
  41.     Width = 289
  42.     Height = 13
  43.     Caption = 'Choose the files to add to the archive and add them to the list'
  44.   end
  45.   object GroupBox1: TGroupBox
  46.     Left = 16
  47.     Top = 80
  48.     Width = 345
  49.     Height = 177
  50.     Caption = 'Archive'
  51.     PopupMenu = PopupMenu1
  52.     TabOrder = 1
  53.     object NewButton: TButton
  54.       Left = 16
  55.       Top = 24
  56.       Width = 89
  57.       Height = 25
  58.       Caption = '&Add files...'
  59.       TabOrder = 0
  60.       OnClick = NewButtonClick
  61.     end
  62.     object Files: TListBox
  63.       Left = 16
  64.       Top = 56
  65.       Width = 313
  66.       Height = 105
  67.       ItemHeight = 13
  68.       PopupMenu = PopupMenu1
  69.       TabOrder = 1
  70.       OnKeyDown = FilesKeyDown
  71.     end
  72.   end
  73.   object OKButton: TButton
  74.     Left = 376
  75.     Top = 16
  76.     Width = 89
  77.     Height = 25
  78.     Caption = '&OK'
  79.     Default = True
  80.     TabOrder = 0
  81.     OnClick = OKButtonClick
  82.   end
  83.   object OD: TOpenDialog
  84.     FileEditStyle = fsEdit
  85.     Filter = 
  86.       'All Files|*.*|Executables|*.exe;*.com;*.bat|Text Files|*.doc;*.w' +
  87.       'ri;*.txt;*.text|Internet Pages|*.html;*.htm|Graphics|*.jpg;*.bmp' +
  88.       ';*.tga;*.gif;*.pcx|Databasefiles|*.xls;*.dbf'
  89.     Options = [ofHideReadOnly, ofNoChangeDir, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofNoNetworkButton]
  90.     Title = 'Choose files to add'
  91.     Left = 128
  92.     Top = 96
  93.   end
  94.   object SD: TSaveDialog
  95.     DefaultExt = 'tar'
  96.     FileEditStyle = fsEdit
  97.     Options = [ofPathMustExist, ofNoNetworkButton]
  98.     Title = 'Save Archive'
  99.     Left = 152
  100.     Top = 16
  101.   end
  102.   object PopupMenu1: TPopupMenu
  103.     Left = 184
  104.     Top = 16
  105.     object Countarchivefiles1: TMenuItem
  106.       Caption = '&Count archive files'
  107.       ShortCut = 0
  108.       OnClick = Countarchivefiles1Click
  109.     end
  110.     object Exitprogram1: TMenuItem
  111.       Caption = 'E&xit program'
  112.       ShortCut = 16472
  113.       OnClick = Exitprogram1Click
  114.     end
  115.   end
  116. end
  117.