object ResultForm: TResultForm Left = 119 Top = 101 Width = 435 Height = 300 Caption = 'Search Results' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = ResultsMenu OnClose = FormClose OnCloseQuery = FormCloseQuery OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Results: TListView Left = 0 Top = 0 Width = 427 Height = 236 Align = alClient OnDblClick = ResultsDblClick Columns = < item Caption = 'File' Width = 190 end item Caption = 'Archive/Folder' Width = 200 end> ReadOnly = True AllocBy = 4 TabOrder = 0 ViewStyle = vsReport end object StatusBar1: TStatusBar Left = 0 Top = 236 Width = 427 Height = 18 Panels = < item Width = 100 end item Width = 60 end item Width = 50 end> SimplePanel = False end object ResultsMenu: TMainMenu Left = 32 Top = 32 object File1: TMenuItem Caption = '&File' ShortCut = 0 object Save1: TMenuItem Caption = '&Save Results As...' Enabled = False ShortCut = 0 OnClick = Save1Click end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Printresults1: TMenuItem Caption = '&Print Results' Enabled = False ShortCut = 0 OnClick = Printresults1Click end object PrinterSetup1: TMenuItem Caption = 'P&rinter Setup...' ShortCut = 0 OnClick = PrinterSetup1Click end object N2: TMenuItem Caption = '-' ShortCut = 0 end object Close1: TMenuItem Caption = '&Close' ShortCut = 0 OnClick = Close1Click end end object StopSearch1: TMenuItem Caption = '&Stop Search' Enabled = False ShortCut = 0 OnClick = StopSearch1Click end end object PrinterSetupDialog1: TPrinterSetupDialog Left = 64 Top = 32 end object SaveDialog1: TSaveDialog FileEditStyle = fsEdit Filter = 'Text files (*.txt)|*.txt|HTML files (*.html *.htm)|*.html;*.htm' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofNoReadOnlyReturn] Title = 'Save Search Results As...' Left = 96 Top = 32 end end