object LoadForm: TLoadForm Left = 514 Height = 432 Top = 157 Width = 647 Caption = 'Load' ClientHeight = 432 ClientWidth = 647 LCLVersion = '2.0.6.0' object selectmeasdirectorybutton: TCDButton Left = 64 Height = 40 Top = 8 Width = 176 Caption = 'Select measues directory' Color = clSilver DrawStyle = dsDefault OnClick = selectmeasdirectorybuttonClick TabOrder = 0 TabStop = True end object ListBox: TListBox Left = 64 Height = 312 Top = 64 Width = 176 Color = clCream Font.Color = clCream ItemHeight = 0 OnClick = ListBoxClick OnDrawItem = ListBoxDrawItem ParentBidiMode = False ParentFont = False ScrollWidth = 174 Style = lbOwnerDrawFixed TabOrder = 1 TopIndex = -1 end object Memo: TMemo Left = 272 Height = 144 Top = 104 Width = 336 Color = clCream Font.Color = clRed Lines.Strings = ( 'Memo' ) ParentFont = False TabOrder = 2 end object exitbutton: TCDButton Left = 496 Height = 40 Top = 352 Width = 100 Caption = 'Exit' Color = clSilver DrawStyle = dsDefault OnClick = exitbuttonClick TabOrder = 3 TabStop = True end object extentionEdit: TEdit Left = 272 Height = 37 Top = 11 Width = 104 Font.Height = -17 Font.Name = 'Sans' OnChange = extentionEditChange OnKeyPress = extentionEditKeyPress ParentFont = False TabOrder = 4 Text = '*' end object SelectLoadDirectory: TSelectDirectoryDialog left = 408 top = 384 end object Timer: TTimer Enabled = False Interval = 50 OnTimer = TimerTimer left = 296 top = 384 end end