object frmMain: TfrmMain Left = 369 Height = 251 Top = 131 Width = 525 Caption = 'lazTurncoat' ClientHeight = 251 ClientWidth = 525 LCLVersion = '2.2.4.0' object PageControl1: TPageControl Left = 0 Height = 251 Top = 0 Width = 525 ActivePage = tshStartGroup Anchors = [akTop, akLeft, akRight, akBottom] MultiLine = True TabIndex = 2 TabOrder = 0 Options = [nboMultiLine] object tshDLLInit: TTabSheet Caption = 'DLLInit' ClientHeight = 223 ClientWidth = 517 object memDLLInit: TMemo Left = 4 Height = 235 Top = 8 Width = 505 Anchors = [akTop, akLeft, akRight, akBottom] ScrollBars = ssAutoBoth TabOrder = 0 end end object tshMsgLog: TTabSheet Caption = 'MsgLog' ClientHeight = 223 ClientWidth = 517 TabVisible = False object MLmemMsgLog: TMemo Left = 0 Height = 184 Top = 32 Width = 516 Anchors = [akTop, akLeft, akRight, akBottom] ReadOnly = True ScrollBars = ssAutoBoth TabOrder = 4 WordWrap = False end object MLedtLines: TSpinEdit Left = 208 Height = 23 Top = 1 Width = 90 MaxValue = 16384 MinValue = 128 TabOrder = 1 Value = 1024 end object MLlblLines: TLabel Left = 88 Height = 15 Top = 2 Width = 111 Caption = 'Keep this many lines:' ParentColor = False end object MLckbEnabled: TCheckBox Left = 4 Height = 19 Top = 1 Width = 62 Caption = 'Enabled' TabOrder = 0 end object MLedtMessageToPost: TEdit Left = 344 Height = 23 Top = 2 Width = 48 Anchors = [akTop, akLeft, akRight] TabOrder = 2 Text = 'MLedtMessageToPost' end object MLbtnPostMessage: TButton Left = 400 Height = 25 Top = 2 Width = 112 Anchors = [akTop, akRight] Caption = 'PostMessage' OnClick = MLbtnPostMessageClick TabOrder = 3 end end object tshStartGroup: TTabSheet Caption = 'Change Group Side' ClientHeight = 223 ClientWidth = 517 object SGpnl1: TPanel Left = 0 Height = 196 Top = 24 Width = 511 Anchors = [akTop, akLeft, akRight, akBottom] Caption = 'SGpnl1' ClientHeight = 196 ClientWidth = 511 TabOrder = 0 object SGlblGroups: TLabel Left = 8 Height = 15 Top = 8 Width = 38 Caption = 'Groups' ParentColor = False end object SGlbxGroups: TListBox Left = 8 Height = 154 Top = 32 Width = 112 Anchors = [akTop, akLeft, akBottom] ItemHeight = 0 OnSelectionChange = SGlbxGroupsSelectionChange TabOrder = 0 end object SGlbxUnits: TListBox Left = 124 Height = 152 Top = 32 Width = 148 Anchors = [akTop, akLeft, akBottom] ItemHeight = 0 OnSelectionChange = SGlbxUnitsSelectionChange TabOrder = 1 end object SGlblUnits: TLabel Left = 128 Height = 15 Top = 8 Width = 27 Caption = 'Units' ParentColor = False end object SGpnlUnit: TPanel Left = 280 Height = 178 Top = 8 Width = 209 Anchors = [akTop, akLeft, akRight, akBottom] ClientHeight = 178 ClientWidth = 209 TabOrder = 2 object SGlblUnitInfo: TLabel Left = 0 Height = 15 Top = 0 Width = 88 Caption = 'Unit Information' ParentColor = False end object SGlblUnitIDName: TLabel Left = 8 Height = 15 Top = 16 Width = 191 Anchors = [akTop, akLeft, akRight] AutoSize = False ParentColor = False end object SGlblUnitClassName: TLabel Left = 8 Height = 15 Top = 32 Width = 191 Anchors = [akTop, akLeft, akRight] AutoSize = False ParentColor = False end object SGlblUnitInfo1: TLabel Left = 2 Height = 15 Top = 104 Width = 61 Caption = 'Group Side:' ParentColor = False end object SGcbGSide: TFilterComboBox Left = 72 Height = 23 Top = 104 Width = 100 AutoComplete = True TabOrder = 0 OnChange = SGcbGSideChange end object SGbtGSideSet: TButton Left = 184 Height = 25 Top = 102 Width = 96 Caption = 'Set Group Side' OnClick = SGbtGSideSetClick TabOrder = 1 Visible = False end object SGlblUnitDP: TLabel Left = 2 Height = 15 Top = 72 Width = 43 Caption = 'Unit DP:' ParentColor = False end object SGedUDP: TEdit Left = 48 Height = 23 Top = 71 Width = 80 Alignment = taRightJustify OnChange = SGedUDPChange TabOrder = 2 end object SGlblUnitDP1: TLabel Left = 136 Height = 15 Top = 72 Width = 11 Caption = 'of' ParentColor = False end object SGlbUOrigDP: TLabel Left = 160 Height = 15 Top = 72 Width = 36 Caption = '999999' ParentColor = False end object SGbtnRunwayRestore: TButton Left = 2 Height = 25 Top = 136 Width = 112 Caption = 'Restore Runways' OnClick = SGbtnRunwayRestoreClick TabOrder = 3 Visible = False end end end object SGbtnRefresh: TButton Left = 0 Height = 20 Top = 4 Width = 75 Caption = 'Refresh' OnClick = SGbtnRefreshClick TabOrder = 1 end end end end