133a3b98d7
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6147 8e941d3f-bd1b-0410-a28a-d453659cc2b4
214 lines
4.0 KiB
Plaintext
214 lines
4.0 KiB
Plaintext
object SingletonForm: TSingletonForm
|
|
Left = 608
|
|
Height = 139
|
|
Top = 122
|
|
Width = 440
|
|
AutoSize = True
|
|
BorderStyle = bsDialog
|
|
Caption = 'The Singleton Test Form'
|
|
ClientHeight = 139
|
|
ClientWidth = 440
|
|
Color = clBtnFace
|
|
Font.Color = clWindowText
|
|
OnCreate = FormCreate
|
|
LCLVersion = '1.9.0.0'
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Height = 128
|
|
Top = 8
|
|
Width = 440
|
|
BevelOuter = bvNone
|
|
ClientHeight = 128
|
|
ClientWidth = 440
|
|
TabOrder = 0
|
|
object Label1: TLabel
|
|
Left = 88
|
|
Height = 15
|
|
Top = 8
|
|
Width = 89
|
|
Caption = 'Singleton Count:'
|
|
ParentColor = False
|
|
end
|
|
object Display1: TEdit
|
|
Left = 288
|
|
Height = 23
|
|
Top = 40
|
|
Width = 45
|
|
TabOrder = 0
|
|
Text = '(empty)'
|
|
end
|
|
object CnR1: TButton
|
|
Left = 220
|
|
Height = 25
|
|
Top = 40
|
|
Width = 52
|
|
AutoSize = True
|
|
Caption = 'Read'
|
|
OnClick = CnR1Click
|
|
TabOrder = 1
|
|
end
|
|
object Set1: TButton
|
|
Left = 344
|
|
Height = 25
|
|
Top = 40
|
|
Width = 74
|
|
AutoSize = True
|
|
Caption = 'Set Value'
|
|
OnClick = Set1Click
|
|
TabOrder = 2
|
|
end
|
|
object CnR2: TButton
|
|
Left = 220
|
|
Height = 25
|
|
Top = 64
|
|
Width = 52
|
|
AutoSize = True
|
|
Caption = 'Read'
|
|
OnClick = CnR2Click
|
|
TabOrder = 3
|
|
end
|
|
object Display2: TEdit
|
|
Left = 288
|
|
Height = 23
|
|
Top = 64
|
|
Width = 45
|
|
TabOrder = 4
|
|
Text = '(empty)'
|
|
end
|
|
object Set2: TButton
|
|
Left = 344
|
|
Height = 25
|
|
Top = 64
|
|
Width = 74
|
|
AutoSize = True
|
|
Caption = 'Set Value'
|
|
OnClick = Set2Click
|
|
TabOrder = 5
|
|
end
|
|
object CnR3: TButton
|
|
Left = 220
|
|
Height = 25
|
|
Top = 88
|
|
Width = 52
|
|
AutoSize = True
|
|
Caption = 'Read'
|
|
OnClick = CnR3Click
|
|
TabOrder = 6
|
|
end
|
|
object Display3: TEdit
|
|
Left = 288
|
|
Height = 23
|
|
Top = 88
|
|
Width = 45
|
|
TabOrder = 7
|
|
Text = '(empty)'
|
|
end
|
|
object Set3: TButton
|
|
Left = 344
|
|
Height = 25
|
|
Top = 88
|
|
Width = 74
|
|
AutoSize = True
|
|
Caption = 'Set Value'
|
|
OnClick = Set3Click
|
|
TabOrder = 8
|
|
end
|
|
object Create1: TButton
|
|
Left = 20
|
|
Height = 25
|
|
Top = 40
|
|
Width = 60
|
|
AutoSize = True
|
|
Caption = 'Create'
|
|
OnClick = Create1Click
|
|
TabOrder = 9
|
|
end
|
|
object Create2: TButton
|
|
Left = 20
|
|
Height = 25
|
|
Top = 64
|
|
Width = 60
|
|
AutoSize = True
|
|
Caption = 'Create'
|
|
OnClick = Create2Click
|
|
TabOrder = 10
|
|
end
|
|
object Create3: TButton
|
|
Left = 20
|
|
Height = 25
|
|
Top = 88
|
|
Width = 60
|
|
AutoSize = True
|
|
Caption = 'Create'
|
|
OnClick = Create3Click
|
|
TabOrder = 11
|
|
end
|
|
object Free1: TButton
|
|
Left = 160
|
|
Height = 25
|
|
Top = 40
|
|
Width = 48
|
|
AutoSize = True
|
|
Caption = 'Free'
|
|
OnClick = Free1Click
|
|
TabOrder = 12
|
|
end
|
|
object Free2: TButton
|
|
Left = 160
|
|
Height = 25
|
|
Top = 64
|
|
Width = 48
|
|
AutoSize = True
|
|
Caption = 'Free'
|
|
OnClick = Free2Click
|
|
TabOrder = 13
|
|
end
|
|
object Free3: TButton
|
|
Left = 160
|
|
Height = 25
|
|
Top = 88
|
|
Width = 48
|
|
AutoSize = True
|
|
Caption = 'Free'
|
|
OnClick = Free3Click
|
|
TabOrder = 14
|
|
end
|
|
object Counter: TEdit
|
|
Left = 184
|
|
Height = 23
|
|
Top = 4
|
|
Width = 33
|
|
Enabled = False
|
|
TabOrder = 15
|
|
Text = '0'
|
|
end
|
|
object Ref1: TEdit
|
|
Left = 94
|
|
Height = 23
|
|
Top = 40
|
|
Width = 50
|
|
Enabled = False
|
|
TabOrder = 16
|
|
Text = 'ref is nil'
|
|
end
|
|
object Ref2: TEdit
|
|
Left = 94
|
|
Height = 23
|
|
Top = 64
|
|
Width = 50
|
|
Enabled = False
|
|
TabOrder = 17
|
|
Text = 'ref is nil'
|
|
end
|
|
object Ref3: TEdit
|
|
Left = 94
|
|
Height = 23
|
|
Top = 88
|
|
Width = 50
|
|
Enabled = False
|
|
TabOrder = 18
|
|
Text = 'ref is nil'
|
|
end
|
|
end
|
|
end
|