23 lines
407 B
Plaintext
23 lines
407 B
Plaintext
|
object Form1: TForm1
|
||
|
|
Left = 811
|
||
|
|
Height = 240
|
||
|
|
Top = 410
|
||
|
|
Width = 320
|
||
|
|
BorderIcons = [biSystemMenu]
|
||
|
|
Caption = 'Form1'
|
||
|
|
ClientHeight = 240
|
||
|
|
ClientWidth = 320
|
||
|
|
LCLVersion = '2.0.12.0'
|
||
|
|
object DateBtn: TButton
|
||
|
|
Left = 70
|
||
|
|
Height = 52
|
||
|
|
Top = 94
|
||
|
|
Width = 181
|
||
|
|
Caption = 'Show Date'
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
OnClick = DateBtnClick
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 0
|
||
|
|
end
|
||
|
|
end
|