74 lines
1.4 KiB
Plaintext
74 lines
1.4 KiB
Plaintext
object Form1: TForm1
|
|
Left = 378
|
|
Height = 286
|
|
Top = 390
|
|
Width = 490
|
|
BorderStyle = bsSingle
|
|
Caption = 'Form1'
|
|
ClientHeight = 286
|
|
ClientWidth = 490
|
|
Color = clBtnFace
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = 'Tahoma'
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
LCLVersion = '1.2.6.0'
|
|
object Label1: TLabel
|
|
Left = 40
|
|
Height = 15
|
|
Top = 16
|
|
Width = 73
|
|
Caption = 'Your name:'
|
|
ParentColor = False
|
|
end
|
|
object Label2: TLabel
|
|
Left = 40
|
|
Height = 15
|
|
Top = 72
|
|
Width = 95
|
|
Caption = 'Your message:'
|
|
ParentColor = False
|
|
end
|
|
object QuestionMemo: TMemo
|
|
Left = 32
|
|
Height = 121
|
|
Top = 88
|
|
Width = 409
|
|
TabOrder = 0
|
|
end
|
|
object NameEdit: TEdit
|
|
Left = 32
|
|
Height = 23
|
|
Top = 32
|
|
Width = 217
|
|
TabOrder = 1
|
|
end
|
|
object AddButton: TButton
|
|
Left = 48
|
|
Height = 25
|
|
Top = 232
|
|
Width = 145
|
|
Caption = 'Add the message'
|
|
OnClick = AddButtonClick
|
|
TabOrder = 2
|
|
end
|
|
object QuitButton: TButton
|
|
Left = 296
|
|
Height = 25
|
|
Top = 232
|
|
Width = 75
|
|
Caption = 'Quit'
|
|
OnClick = QuitButtonClick
|
|
TabOrder = 3
|
|
end
|
|
object FindButton: TButton
|
|
Left = 256
|
|
Height = 25
|
|
Top = 32
|
|
Width = 185
|
|
Caption = 'Find a previous message'
|
|
OnClick = FindButtonClick
|
|
TabOrder = 4
|
|
end
|
|
end
|