object Form4: TForm4 Left = 784 Top = 152 Width = 706 Height = 582 Caption = 'Test API' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object StatusBar1: TStatusBar Left = 0 Top = 529 Width = 698 Height = 19 Panels = <> end object PanelTop: TPanel Left = 0 Top = 0 Width = 698 Height = 73 Align = alTop TabOrder = 1 object Label1: TLabel Left = 256 Top = 8 Width = 42 Height = 13 Caption = 'Text files' end object ButtonConcordance: TButton Left = 262 Top = 40 Width = 75 Height = 25 Caption = 'Concordance' TabOrder = 0 OnClick = ButtonConcordanceClick end object ListBoxFiles: TListBox Left = 1 Top = 1 Width = 231 Height = 71 Align = alLeft ItemHeight = 13 TabOrder = 1 end object EditFoldername: TEdit Left = 320 Top = 8 Width = 289 Height = 21 TabOrder = 2 Text = 'EditFoldername' end object ButtonWordlist: TButton Left = 352 Top = 40 Width = 75 Height = 25 Caption = 'Wordlist' TabOrder = 3 OnClick = ButtonWordlistClick end object ButtonKeywords: TButton Left = 440 Top = 40 Width = 75 Height = 25 Caption = 'Keywords' TabOrder = 4 OnClick = ButtonKeywordsClick end end object PageControl1: TPageControl Left = 0 Top = 73 Width = 698 Height = 456 ActivePage = TabSheetConcord Align = alClient TabOrder = 2 object TabSheetConcord: TTabSheet Caption = 'Concordance' object Splitter1: TSplitter Left = 145 Top = 41 Width = 10 Height = 387 end object Panel1: TPanel Left = 0 Top = 0 Width = 690 Height = 41 Align = alTop Caption = 'Panel1' TabOrder = 0 object EditConcFilename: TEdit Left = 130 Top = 8 Width = 200 Height = 21 TabOrder = 0 Text = 'EditConcFilename' end object ButtonConcSave: TButton Left = 32 Top = 8 Width = 75 Height = 25 Caption = 'Save it as ->' TabOrder = 1 OnClick = ButtonConcSaveClick end end object ListBoxConcordance: TListBox Left = 0 Top = 41 Width = 145 Height = 387 Align = alLeft ItemHeight = 13 TabOrder = 1 end object ListBoxCollocates: TListBox Left = 155 Top = 41 Width = 535 Height = 387 Align = alClient ItemHeight = 13 TabOrder = 2 end end object TabSheetWordList: TTabSheet Caption = 'Wordlist' ImageIndex = 1 object ListBoxWordlist: TListBox Left = 0 Top = 48 Width = 690 Height = 380 Align = alBottom Anchors = [akLeft, akTop, akRight, akBottom] ItemHeight = 13 TabOrder = 0 end object CheckBoxWordlistAlphabetical: TCheckBox Left = 64 Top = 16 Width = 97 Height = 17 Caption = 'alphabetically' TabOrder = 1 end object ButtonSaveWordlist: TButton Left = 183 Top = 10 Width = 75 Height = 25 Caption = 'Save it as ->' TabOrder = 2 OnClick = ButtonSaveWordlistClick end object EditWordlistfilename: TEdit Left = 281 Top = 10 Width = 200 Height = 21 TabOrder = 3 Text = 'Edit1' end end object TabSheetKeyWords: TTabSheet Caption = 'Keywords' ImageIndex = 2 object Label2: TLabel Left = 0 Top = 16 Width = 12 Height = 13 Caption = 'list' end object Label3: TLabel Left = 160 Top = 16 Width = 50 Height = 13 Caption = 'ref. corpus' end object ListBoxKeyWords: TListBox Left = 0 Top = 48 Width = 690 Height = 380 Align = alBottom Anchors = [akLeft, akTop, akRight, akBottom] ItemHeight = 13 TabOrder = 0 end object ButtonSaveKWS: TButton Left = 360 Top = 8 Width = 75 Height = 25 Caption = 'Save it as ->' TabOrder = 1 OnClick = ButtonSaveKWSClick end object EditKWfilename: TEdit Left = 458 Top = 8 Width = 200 Height = 21 TabOrder = 2 Text = 'Edit1' end object EditWlist: TEdit Left = 24 Top = 11 Width = 121 Height = 21 TabOrder = 3 Text = 'EditWlist' end object EditRefCorpWList: TEdit Left = 220 Top = 12 Width = 121 Height = 21 TabOrder = 4 Text = 'EditRefCorpWList' end end end end