object frmMain: TfrmMain Left = 194 Top = 161 BorderStyle = bsDialog Caption = 'FTP Search' ClientHeight = 366 ClientWidth = 566 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False PopupMenu = PopupMenu1 OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 8 Width = 126 Height = 13 Caption = 'What'#39's you are looking for:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 8 Top = 56 Width = 64 Height = 13 Caption = 'Search Type:' end object Bevel1: TBevel Left = 0 Top = 98 Width = 569 Height = 2 end object Button1: TButton Left = 480 Top = 16 Width = 75 Height = 25 Caption = '&Search' Enabled = False TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 480 Top = 56 Width = 75 Height = 25 Cancel = True Caption = '&Close' TabOrder = 2 OnClick = Button2Click end object ListView1: TListView Left = 0 Top = 103 Width = 566 Height = 244 Align = alBottom Columns = < item Caption = 'Name' Width = 128 end item Alignment = taRightJustify Caption = 'Size' Width = 84 end item Caption = 'Modified' Width = 108 end item Caption = 'Attributes' Width = 80 end item Caption = 'URL' Width = 128 end> ReadOnly = True ParentShowHint = False ShowHint = True SmallImages = ImageList1 TabOrder = 3 ViewStyle = vsReport OnInfoTip = ListView1InfoTip end object StatusBar1: TStatusBar Left = 0 Top = 347 Width = 566 Height = 19 Panels = <> SimplePanel = False SimpleText = 'Ready' end object Edit1: TEdit Left = 8 Top = 24 Width = 457 Height = 21 TabOrder = 0 OnChange = Edit1Change end object ComboBox1: TComboBox Left = 8 Top = 72 Width = 457 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 5 Items.Strings = ( 'Case insensitive substring search ' 'Case sensitive substring search ' 'Case insensitive glob search ' 'Case sensitive glob search ' 'Regular expression search ' 'Exact search ' 'Case insensitive substring match ' 'Case sensitive substring match ' 'Case insensitive glob match ' 'Case sensitive glob match ' 'Regular expression match') end object MFtpSearch1: TMFtpSearch Cache = False MaxHit = 50 MaxMatch = 50 MaxSize = 0 MinSize = 0 Proxy = False SearchType = mstCIUS Server.Strings = ( 'ftpsearch.lycos.com:80' 'ftp.sunet.se:8000' 'archie.is.co.za:80' 'ftpsearch.city.ru:80' 'woland.afti.nsu.ru:8000' 'unicorn.netlab.is.tsukuba.ac.jp:80' 'ftp.riken.go.jp:8000') OnSearchInfo = MFtpSearch1SearchInfo Left = 8 Top = 152 end object ImageList1: TImageList Left = 8 Top = 184 Bitmap = { 494C010103000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600 0000000000003600000028000000400000001000000001001000000000000008 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000010421863186318631863 1863186318631863186318631863000000000000000010420000000000000000 0000000018631863186318631863000000000000000000000000000000000000 0000000000000000000000000000000000000000805210631063106310631063 1063106310631063106310631063106300000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000000000000 0000000000000000000000001863000000000000000000000000000000000000 00000000000000000000000000000000000000008052FE7F1073907310739073 1073907310739073107310731073106300000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000010420000 0000000000000000000000001863000000000000000000000000000000000000 00000000000000000000000000000000000000008052FE7F9073907390731073 9073107390731073907310731073106300000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000000000000 0000000000000000000000001863000000000000000000000000000000000000 00000000000000000000000000000000000000008052FE7F9073907390739073 9073907310739073107390731073106300000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000000000000 0000000000000000000000001863000000000000000000000000000000000000 00000000000000000000000000000000000000008052FE7F9073907390739073 9073107390731073907310739073106300000000000010420000000000000000 0000000000000000000000001863000000000000000010421042104210421042 1042000000000000000000001863000000000000000000000000000000000000 00000000000000000000000000000000000000008052FE7F9073907390739073 9073907390739073107390731073106300000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000000000000 0000000000000000000000001863000000000000000000000000000000000000 00000000000000000000000000000000000000008052FE7F9073907390739073 9073907390731073907310739073106300000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000000000000 0000000000000000000000001863000000000000000000000000000000000000 00000000000000000000000000000000000000008052FE7F9073907390739073 9073907390739073907390731073106300000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000000000000 0000000000000000000000001863000000000000000000000000000000000000 00000000000000000000000000000000000000008052FE7FFE7FFE7FFE7FFE7F FE7FFE7FFE7FFE7FFE7FFE7F9073106300000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000000000000 0000000000000000000000001863000000000000000000000000000000000000 0000000000000000000000000000000000000000805210631063106310631063 1063106380528052805280528052805200000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000000000000 0000000000000000000000001863000000000000000000000000000000000000 000000000000000000000000000000000000000000008052FE7FFE7FFE7F9073 9073805200000000000000000000000000000000000010420000000000000000 0000000000000000000000001863000000000000000010420000000000000000 0000000000000000000000001863000000000000000000000000000000000000 0000000000000000000000000000000000000000000000008052805280528052 8052000000000000000000000000000000000000000010420000000000000000 0000000000000000000000000000000000000000000010420000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000010420000 1042000010420000104200000000000000000000000000000000000010420000 1042000010420000104200000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000424D3E000000000000003E000000 2800000040000000100000000100010000000000800000000000000000000000 000000000000000000000000FFFFFF00FFFFE003C0030000C000C001DF010000 8000DFF9D77900008000DFF9D17900008000D819D91900008000DFF9DF790000 8000D819C01900008000DFF9DFF900008000D819D81900008000DFF9DFF90000 8000D899D89900008001DFF9DFF90000C03FDFF9DFF90000E07FD555D5550000 FFFFEAABEAAB0000FFFFF557F557000000000000000000000000000000000000 000000000000} end object PopupMenu1: TPopupMenu AutoHotkeys = maManual Left = 8 Top = 216 object ftpsearchlycoscom801: TMenuItem Caption = 'ftpsearch.lycos.com:80' Checked = True OnClick = menuClick end object ftpsunetse80001: TMenuItem Caption = 'ftp.sunet.se:8000' Checked = True OnClick = menuClick end object archieiscoza801: TMenuItem Caption = 'archie.is.co.za:80' OnClick = menuClick end object ftpsearchcityru801: TMenuItem Caption = 'ftpsearch.city.ru:80' OnClick = menuClick end object wolandaftinsuru80001: TMenuItem Caption = 'woland.afti.nsu.ru:8000' OnClick = menuClick end object unicornnetlabistsukubaacjp801: TMenuItem Caption = 'unicorn.netlab.is.tsukuba.ac.jp:80' OnClick = menuClick end object ftprikengojp80001: TMenuItem Caption = 'ftp.riken.go.jp:8000' OnClick = menuClick end end end