1
0
Fork 0
lazarus-tutorials/set_demo/setdemo_main.lfm

160 lines
3.6 KiB
Plaintext

object MainForm: TMainForm
Left = 668
Height = 380
Top = 250
Width = 400
Caption = 'Visualising two sets of digits.'
ClientHeight = 380
ClientWidth = 400
OnCreate = FormCreate
OnDestroy = FormDestroy
LCLVersion = '2.0.12.0'
object pnlA: TPanel
Left = 0
Height = 80
Top = 0
Width = 400
Align = alTop
ClientHeight = 80
ClientWidth = 400
Color = clGradientActiveCaption
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 0
object editSetA: TLabeledEdit
Left = 235
Height = 22
Top = 40
Width = 150
EditLabel.Height = 16
EditLabel.Width = 34
EditLabel.Caption = 'Set A'
EditLabel.ParentColor = False
LabelPosition = lpLeft
LabelSpacing = 5
ReadOnly = True
TabOrder = 0
TabStop = False
end
end
object pnlZ: TPanel
Left = 0
Height = 80
Top = 80
Width = 400
Align = alTop
ClientHeight = 80
ClientWidth = 400
Color = clGradientInactiveCaption
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 1
object editSetZ: TLabeledEdit
Left = 235
Height = 22
Top = 40
Width = 150
EditLabel.Height = 16
EditLabel.Width = 34
EditLabel.Caption = 'Set Z'
EditLabel.ParentColor = False
LabelPosition = lpLeft
LabelSpacing = 5
ReadOnly = True
TabOrder = 0
TabStop = False
end
end
object pnlResultSets: TPanel
Left = 0
Height = 220
Top = 160
Width = 400
Align = alClient
ClientHeight = 220
ClientWidth = 400
Color = clScrollBar
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 2
object editUnion: TLabeledEdit
Left = 235
Height = 22
Top = 10
Width = 150
EditLabel.Height = 16
EditLabel.Width = 139
EditLabel.Caption = 'Union of A && Z (A + Z)'
EditLabel.ParentColor = False
LabelPosition = lpLeft
LabelSpacing = 5
ReadOnly = True
TabOrder = 4
TabStop = False
end
object editIntersection: TLabeledEdit
Left = 235
Height = 22
Top = 50
Width = 150
EditLabel.Height = 16
EditLabel.Width = 177
EditLabel.Caption = 'Intersection of A && Z (A * Z)'
EditLabel.ParentColor = False
LabelPosition = lpLeft
LabelSpacing = 5
ReadOnly = True
TabOrder = 0
TabStop = False
end
object editSymmetricDiff: TLabeledEdit
Left = 235
Height = 22
Top = 90
Width = 150
EditLabel.Height = 16
EditLabel.Width = 155
EditLabel.Caption = 'Symmetric Diff. of A && Z'
EditLabel.ParentColor = False
LabelPosition = lpLeft
LabelSpacing = 5
ReadOnly = True
TabOrder = 3
TabStop = False
end
object editDiffAZ: TLabeledEdit
Left = 235
Height = 22
Top = 130
Width = 150
EditLabel.Height = 16
EditLabel.Width = 167
EditLabel.Caption = 'Difference of A && Z (A - Z)'
EditLabel.ParentColor = False
LabelPosition = lpLeft
LabelSpacing = 5
ReadOnly = True
TabOrder = 2
TabStop = False
end
object editDiffZA: TLabeledEdit
Left = 235
Height = 22
Top = 170
Width = 150
EditLabel.Height = 16
EditLabel.Width = 167
EditLabel.Caption = 'Difference of Z && A (Z - A)'
EditLabel.ParentColor = False
LabelPosition = lpLeft
LabelSpacing = 5
ReadOnly = True
TabOrder = 1
TabStop = False
end
end
end