You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
83 lines
1.6 KiB
83 lines
1.6 KiB
10 months ago
|
object Form1: TForm1
|
||
|
Left = 0
|
||
|
Top = 0
|
||
|
Caption = 'Form1'
|
||
|
ClientHeight = 154
|
||
|
ClientWidth = 376
|
||
|
Color = clBtnFace
|
||
|
Font.Charset = DEFAULT_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -11
|
||
|
Font.Name = 'Tahoma'
|
||
|
Font.Style = []
|
||
|
TextHeight = 13
|
||
|
object Label1: TLabel
|
||
|
Left = 30
|
||
|
Top = 31
|
||
|
Width = 39
|
||
|
Height = 23
|
||
|
Caption = '1'#12363#12425
|
||
|
Font.Charset = DEFAULT_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -19
|
||
|
Font.Name = 'Tahoma'
|
||
|
Font.Style = []
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object Label2: TLabel
|
||
|
Left = 188
|
||
|
Top = 31
|
||
|
Width = 30
|
||
|
Height = 23
|
||
|
Caption = #12414#12391
|
||
|
Font.Charset = DEFAULT_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -19
|
||
|
Font.Name = 'Tahoma'
|
||
|
Font.Style = []
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object Label3: TLabel
|
||
|
Left = 78
|
||
|
Top = 96
|
||
|
Width = 27
|
||
|
Height = 23
|
||
|
Caption = '???'
|
||
|
Font.Charset = DEFAULT_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -19
|
||
|
Font.Name = 'Tahoma'
|
||
|
Font.Style = []
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object Button1: TButton
|
||
|
Left = 236
|
||
|
Top = 30
|
||
|
Width = 113
|
||
|
Height = 28
|
||
|
Caption = #21644#12398#35336#31639
|
||
|
Font.Charset = DEFAULT_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -19
|
||
|
Font.Name = 'Tahoma'
|
||
|
Font.Style = []
|
||
|
ParentFont = False
|
||
|
TabOrder = 0
|
||
|
OnClick = Button1Click
|
||
|
end
|
||
|
object Edit1: TEdit
|
||
|
Left = 78
|
||
|
Top = 28
|
||
|
Width = 91
|
||
|
Height = 31
|
||
|
Font.Charset = DEFAULT_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -19
|
||
|
Font.Name = 'Tahoma'
|
||
|
Font.Style = []
|
||
|
ParentFont = False
|
||
|
TabOrder = 1
|
||
|
Text = '10'
|
||
|
end
|
||
|
end
|