object Form1: TForm1 Left = 228 Height = 386 Top = 226 Width = 740 Caption = 'HG IRC Chat' ClientHeight = 386 ClientWidth = 740 OnActivate = FormActivate OnCreate = FormCreate OnDestroy = FormDestroy Position = poDefault LCLVersion = '1.1' object memChannelText: TMemo Left = 120 Height = 152 Top = 104 Width = 484 Anchors = [akTop, akLeft, akRight, akBottom] ReadOnly = True ScrollBars = ssBoth TabOrder = 1 WantTabs = True end object Memo1: TMemo Left = 120 Height = 90 Top = 288 Width = 488 Anchors = [akLeft, akRight, akBottom] ReadOnly = True ScrollBars = ssAutoBoth TabOrder = 0 end object edtNick: TEdit Left = 120 Height = 23 Top = 39 Width = 120 OnKeyUp = edtNickKeyUp TabOrder = 2 Text = 'HGGuest' end object edtChannel: TEdit Left = 120 Height = 23 Top = 72 Width = 120 Enabled = False TabOrder = 3 Text = '#harpgamer' end object lbxUsers: TListBox Left = 616 Height = 256 Top = 120 Width = 120 Anchors = [akTop, akRight, akBottom] ItemHeight = 0 Sorted = True TabOrder = 4 end object btnConnect: TButton Left = 533 Height = 25 Top = 40 Width = 75 Anchors = [akTop, akRight] Caption = 'Connect' OnClick = btnConnectClick TabOrder = 5 end object btnChannelJoin: TButton Left = 616 Height = 25 Top = 40 Width = 83 Anchors = [akTop, akRight] Caption = 'Join Channel' Enabled = False OnClick = btnChannelJoinClick TabOrder = 6 end object Label1: TLabel Left = 48 Height = 15 Top = 47 Width = 56 Caption = 'NickName' ParentColor = False end object Label2: TLabel Left = 60 Height = 15 Top = 80 Width = 44 Caption = 'Channel' ParentColor = False end object Label3: TLabel Left = 60 Height = 15 Top = 104 Width = 50 Caption = 'Chat Text' ParentColor = False end object Label4: TLabel Left = 8 Height = 15 Top = 288 Width = 103 Anchors = [akLeft, akRight, akBottom] Caption = 'Network Responses' ParentColor = False end object Label5: TLabel Left = 616 Height = 15 Top = 104 Width = 86 Anchors = [akTop, akRight] Caption = 'Users in channel' ParentColor = False end object btnNickChange: TButton Left = 248 Height = 25 Top = 39 Width = 120 Caption = 'Change NickName' Enabled = False OnClick = btnNickChangeClick TabOrder = 7 end object btnDisconnect: TButton Left = 533 Height = 25 Top = 72 Width = 75 Anchors = [akTop, akRight] Caption = 'Disconnect' OnClick = btnDisconnectClick TabOrder = 8 end object Button1: TButton Left = 616 Height = 25 Top = 72 Width = 120 Anchors = [akTop, akRight] Caption = 'List Users in Channel' Enabled = False OnClick = Button1Click TabOrder = 9 end object Label6: TLabel Left = 24 Height = 15 Top = 264 Width = 92 Anchors = [akLeft, akRight, akBottom] Caption = 'Message To Send' ParentColor = False end object edtTextToSend: TEdit Left = 120 Height = 23 Top = 258 Width = 408 Anchors = [akLeft, akRight, akBottom] OnKeyUp = edtTextToSendKeyUp TabOrder = 10 end object btnPostMessage: TButton Left = 533 Height = 25 Top = 258 Width = 75 Anchors = [akRight, akBottom] Caption = 'Send' OnClick = btnPostMessageClick TabOrder = 11 end object lblInfo: TLabel Left = 40 Height = 200 Top = 112 Width = 467 Anchors = [akTop, akLeft, akRight, akBottom] AutoSize = False Caption = 'lblInfo' Font.Color = clGreen Font.Height = -48 ParentColor = False ParentFont = False WordWrap = True end end