object MainForm: TMainForm Left = 536 Top = 257 Width = 385 Height = 308 Caption = ' ' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 8 Width = 33 Height = 21 AutoSize = False Caption = 'Com:' Layout = tlCenter end object Label2: TLabel Left = 88 Top = 8 Width = 57 Height = 21 AutoSize = False Caption = 'Baud Rate:' Layout = tlCenter end object LineEdit: TEdit Left = 8 Top = 244 Width = 360 Height = 21 Anchors = [akLeft, akRight, akBottom] TabOrder = 0 OnKeyPress = LineEditKeyPress end object MainRich: TRichEdit Left = 8 Top = 40 Width = 360 Height = 197 Anchors = [akLeft, akTop, akRight, akBottom] Color = clWhite Font.Charset = OEM_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Terminal' Font.Style = [] ParentFont = False ScrollBars = ssVertical TabOrder = 1 end object PortEdit: TEdit Left = 40 Top = 8 Width = 33 Height = 21 TabOrder = 2 Text = '5' end object BaudCombo: TComboBox Left = 144 Top = 8 Width = 97 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 3 Items.Strings = ( '9600' '14400' '19200' '28800' '38400' '57600' '115200' '128000' '256000') end object ConnectButton: TButton Left = 256 Top = 8 Width = 113 Height = 21 Anchors = [akTop, akRight] Caption = 'Connect' TabOrder = 4 OnClick = ConnectClick end end