home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1999 January / pcwk_01_1999.iso / Top100sh / Zip / Arcpek95 / ARCPEEK.EXE / 0 / RCDATA / TRESULTFORM / TRESULTFORM.txt
Text File  |  1998-02-23  |  2KB  |  113 lines
  1. object ResultForm: TResultForm
  2.   Left = 119
  3.   Top = 101
  4.   Width = 435
  5.   Height = 300
  6.   Caption = 'Search Results'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Menu = ResultsMenu
  13.   OnClose = FormClose
  14.   OnCloseQuery = FormCloseQuery
  15.   OnShow = FormShow
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object Results: TListView
  19.     Left = 0
  20.     Top = 0
  21.     Width = 427
  22.     Height = 236
  23.     Align = alClient
  24.     OnDblClick = ResultsDblClick
  25.     Columns = <
  26.       item
  27.         Caption = 'File'
  28.         Width = 190
  29.       end
  30.       item
  31.         Caption = 'Archive/Folder'
  32.         Width = 200
  33.       end>
  34.     ReadOnly = True
  35.     AllocBy = 4
  36.     TabOrder = 0
  37.     ViewStyle = vsReport
  38.   end
  39.   object StatusBar1: TStatusBar
  40.     Left = 0
  41.     Top = 236
  42.     Width = 427
  43.     Height = 18
  44.     Panels = <
  45.       item
  46.         Width = 100
  47.       end
  48.       item
  49.         Width = 60
  50.       end
  51.       item
  52.         Width = 50
  53.       end>
  54.     SimplePanel = False
  55.   end
  56.   object ResultsMenu: TMainMenu
  57.     Left = 32
  58.     Top = 32
  59.     object File1: TMenuItem
  60.       Caption = '&File'
  61.       ShortCut = 0
  62.       object Save1: TMenuItem
  63.         Caption = '&Save Results As...'
  64.         Enabled = False
  65.         ShortCut = 0
  66.         OnClick = Save1Click
  67.       end
  68.       object N1: TMenuItem
  69.         Caption = '-'
  70.         ShortCut = 0
  71.       end
  72.       object Printresults1: TMenuItem
  73.         Caption = '&Print Results'
  74.         Enabled = False
  75.         ShortCut = 0
  76.         OnClick = Printresults1Click
  77.       end
  78.       object PrinterSetup1: TMenuItem
  79.         Caption = 'P&rinter Setup...'
  80.         ShortCut = 0
  81.         OnClick = PrinterSetup1Click
  82.       end
  83.       object N2: TMenuItem
  84.         Caption = '-'
  85.         ShortCut = 0
  86.       end
  87.       object Close1: TMenuItem
  88.         Caption = '&Close'
  89.         ShortCut = 0
  90.         OnClick = Close1Click
  91.       end
  92.     end
  93.     object StopSearch1: TMenuItem
  94.       Caption = '&Stop Search'
  95.       Enabled = False
  96.       ShortCut = 0
  97.       OnClick = StopSearch1Click
  98.     end
  99.   end
  100.   object PrinterSetupDialog1: TPrinterSetupDialog
  101.     Left = 64
  102.     Top = 32
  103.   end
  104.   object SaveDialog1: TSaveDialog
  105.     FileEditStyle = fsEdit
  106.     Filter = 'Text files (*.txt)|*.txt|HTML files (*.html *.htm)|*.html;*.htm'
  107.     Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofNoReadOnlyReturn]
  108.     Title = 'Save Search Results As...'
  109.     Left = 96
  110.     Top = 32
  111.   end
  112. end
  113.