Prvni verze
This commit is contained in:
91
frmInputNum.dfm
Normal file
91
frmInputNum.dfm
Normal file
@ -0,0 +1,91 @@
|
||||
object formInputNum: TformInputNum
|
||||
Left = 0
|
||||
Top = 0
|
||||
BorderStyle = bsDialog
|
||||
Caption = 'formInputNum'
|
||||
ClientHeight = 294
|
||||
ClientWidth = 414
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poOwnerFormCenter
|
||||
OnClose = FormClose
|
||||
OnShow = FormShow
|
||||
DesignSize = (
|
||||
414
|
||||
294)
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 25
|
||||
object lblPopis2: TLabel
|
||||
Left = 68
|
||||
Top = 112
|
||||
Width = 82
|
||||
Height = 25
|
||||
Caption = 'lblPopis2'
|
||||
end
|
||||
object lblPopis1: TLabel
|
||||
Left = 68
|
||||
Top = 21
|
||||
Width = 82
|
||||
Height = 25
|
||||
Caption = 'lblPopis1'
|
||||
end
|
||||
object edtNum: TEdit
|
||||
Left = 68
|
||||
Top = 48
|
||||
Width = 277
|
||||
Height = 41
|
||||
Anchors = [akLeft, akTop, akRight]
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -27
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
NumbersOnly = True
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
OnKeyPress = edtNumKeyPress
|
||||
end
|
||||
object edtNum2: TEdit
|
||||
Left = 68
|
||||
Top = 141
|
||||
Width = 277
|
||||
Height = 41
|
||||
Anchors = [akLeft, akTop, akRight]
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -27
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
NumbersOnly = True
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
OnKeyPress = edtNum2KeyPress
|
||||
end
|
||||
object btnOK: TButton
|
||||
Left = 27
|
||||
Top = 222
|
||||
Width = 142
|
||||
Height = 49
|
||||
Anchors = [akLeft, akBottom]
|
||||
Caption = 'OK'
|
||||
ModalResult = 1
|
||||
TabOrder = 2
|
||||
OnClick = btnOKClick
|
||||
end
|
||||
object btnZrusit: TButton
|
||||
Left = 244
|
||||
Top = 222
|
||||
Width = 142
|
||||
Height = 49
|
||||
Anchors = [akRight, akBottom]
|
||||
Caption = 'Zru'#353'it'
|
||||
ModalResult = 2
|
||||
TabOrder = 3
|
||||
OnClick = btnZrusitClick
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user