object Form4: TForm4  Left = 573  Top = 296  Width = 429  Height = 339  HorzScrollBar.Range = 425  VertScrollBar.Range = 337  ActiveControl = Button2  Caption = 'Find carrier file ...'  Color = clButton  Font.Color = clText  Font.Height = 11  Font.Name = 'MS Sans Serif'  Font.Pitch = fpVariable  Font.Style = []  ParentFont = False  Position = poScreenCenter  OnCloseQuery = FormCloseQuery  OnCreate = FormCreate  OnShow = FormShow  PixelsPerInch = 96  TextHeight = 13  TextWidth = 5  object Label1: TLabel    Left = 8    Top = 152    Width = 118    Height = 13    Caption = 'Results (smaller files first)'  end  object Button2: TButton    Left = 208    Top = 312    Width = 105    Height = 25    Caption = '&OK'    TabOrder = 0    OnClick = Button2Click  end  object Button3: TButton    Left = 320    Top = 312    Width = 105    Height = 25    Caption = '&Cancel'    TabOrder = 1    OnClick = Button3Click  end  object Button1: TButton    Left = 352    Top = 56    Width = 73    Height = 25    Caption = '&select folder'    TabOrder = 2    OnClick = Button1Click  end  object Edit1: TEdit    Left = 8    Top = 56    Width = 337    Height = 21    TabOrder = 3    Text = 'C:\'  end  object Memo1: TMemo    Left = 8    Top = 8    Width = 417    Height = 41    BorderStyle = bsNone    Color = clButton    Lines.Strings = (              'wbStego can search for appropriate carrier files starting in a f' +        'older you specify.')    ReadOnly = True    TabOrder = 4  end  object Button4: TButton    Left = 248    Top = 112    Width = 177    Height = 25    Caption = 'sta&rt searching for files of this type'    TabOrder = 5    OnClick = Button4Click  end  object ListBox1: TListBox    Left = 8    Top = 168    Width = 417    Height = 137    ItemHeight = 13    TabOrder = 6  end  object ComboBox1: TComboBox    Left = 8    Top = 112    Width = 233    Height = 21    Style = csDropDownList    ItemHeight = 15    Items.Strings = (      'all types supported'      'Bitmap images'      'Plain text files (standard method)'      'Plain text files (compatible method)'      'HTML files'      'Adobe Acrobat files')    TabOrder = 10  end  object Button5: TButton    Left = 8    Top = 312    Width = 105    Height = 25    Caption = '&Hilfe'    TabOrder = 8    OnClick = Button5Click  end  object CheckBox1: TCheckBox    Left = 8    Top = 88    Width = 385    Height = 17    Caption = '&inlcude subfolders'    TabOrder = 9  endend