Repository URL to install this package:
|
Version:
1.6 ▾
|
lazarus
/
usr
/
share
/
lazarus
/
1.6
/
components
/
lazdebuggergdbmi
/
test
/
gdbmitestutils
/
testgdbmicontrol.lfm
|
|---|
object TestControlForm: TTestControlForm
Left = 1197
Height = 350
Top = 104
Width = 456
BorderIcons = []
Caption = 'Test Control'
ClientHeight = 350
ClientWidth = 456
OnShow = FormShow
LCLVersion = '1.1'
Visible = True
object Panel1: TPanel
Left = 0
Height = 44
Top = 0
Width = 456
Align = alTop
AutoSize = True
ClientHeight = 44
ClientWidth = 456
TabOrder = 0
object CheckWriteLogs: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = Panel1
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 1
Height = 19
Top = 1
Width = 76
Caption = 'Write Logs'
OnChange = CheckWriteLogsChange
TabOrder = 0
end
object Label1: TLabel
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = EditLogDir
Left = 1
Height = 16
Top = 20
Width = 42
Align = alCustom
BorderSpacing.Right = 5
Caption = 'Log Dir:'
ParentColor = False
end
object EditLogDir: TEdit
AnchorSideLeft.Control = Label1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = CheckWriteLogs
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 48
Height = 23
Top = 20
Width = 407
Anchors = [akTop, akLeft, akRight]
OnChange = EditLogDirChange
TabOrder = 1
Text = 'EditLogDir'
end
object WriteLogsOnErr: TCheckBox
AnchorSideLeft.Control = CheckWriteLogs
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = CheckWriteLogs
Left = 87
Height = 19
Top = 1
Width = 123
BorderSpacing.Left = 10
Caption = 'Write Logs On Error'
Checked = True
OnChange = WriteLogsOnErrChange
State = cbChecked
TabOrder = 2
end
end
object Panel2: TPanel
Left = 0
Height = 306
Top = 44
Width = 456
Align = alClient
BevelOuter = bvNone
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsHomogenousChildResize
ChildSizing.ShrinkVertical = crsHomogenousChildResize
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 3
ClientHeight = 306
ClientWidth = 456
TabOrder = 1
object Panel3: TPanel
Left = 0
Height = 306
Top = 0
Width = 154
Caption = 'Panel3'
ClientHeight = 306
ClientWidth = 154
TabOrder = 0
object CheckListBox1: TCheckListBox
Left = 1
Height = 279
Top = 1
Width = 152
Align = alClient
ItemHeight = 0
TabOrder = 0
end
object Panel4: TPanel
Left = 1
Height = 25
Top = 280
Width = 152
Align = alBottom
AutoSize = True
Caption = ' '
ClientHeight = 25
ClientWidth = 152
TabOrder = 1
object EdOnlyWatch: TEdit
Left = 1
Height = 23
Top = 1
Width = 150
Align = alClient
TabOrder = 0
end
end
end
object chkFPC: TCheckListBox
Left = 154
Height = 306
Top = 0
Width = 152
ItemHeight = 0
TabOrder = 1
end
object chkGDB: TCheckListBox
Left = 306
Height = 306
Top = 0
Width = 150
ItemHeight = 0
TabOrder = 2
end
end
end