object FormInput: TFormInput Left = 256 Height = 240 Top = 32 Width = 320 Caption = 'Input' ClientHeight = 240 ClientWidth = 320 LCLVersion = '1.3' object MemoInput: TMemo Left = 4 Height = 203 Top = 33 Width = 312 Align = alClient BorderSpacing.Around = 4 Font.Height = -12 Font.Name = 'Courier New' OnKeyPress = MemoInputKeyPress ParentFont = False ScrollBars = ssAutoBoth TabOrder = 0 end object Label1: TLabel Left = 4 Height = 25 Top = 4 Width = 312 Align = alTop BorderSpacing.Around = 4 Caption = 'Input:' ParentColor = False end end