You've already forked lazarus-ccr
aa59048ed7
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@365 8e941d3f-bd1b-0410-a28a-d453659cc2b4
78 lines
1.9 KiB
Plaintext
78 lines
1.9 KiB
Plaintext
object Form1: TForm1
|
|
Left = 192
|
|
Top = 114
|
|
Width = 415
|
|
Height = 289
|
|
Caption = 'Form1'
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Style = []
|
|
PixelsPerInch = 96
|
|
object Label1: TLabel
|
|
Left = 16
|
|
Top = 24
|
|
Width = 385
|
|
Height = 33
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = 'Enter a positive integer, then move to next control to validate.'
|
|
WordWrap = True
|
|
end
|
|
object Label2: TLabel
|
|
Left = 16
|
|
Top = 104
|
|
Width = 385
|
|
Height = 33
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption =
|
|
'Enter a positive real number, then move to next control to valid' +
|
|
'ate.'
|
|
WordWrap = True
|
|
end
|
|
object OvcSimpleField1: TOvcSimpleField
|
|
Left = 168
|
|
Top = 56
|
|
Width = 81
|
|
Height = 21
|
|
Cursor = crIBeam
|
|
DataType = sftString
|
|
CaretOvr.Shape = csBlock
|
|
ControlCharColor = clRed
|
|
DecimalPlaces = 0
|
|
EFColors.Disabled.BackColor = clWindow
|
|
EFColors.Disabled.TextColor = clGrayText
|
|
EFColors.Error.BackColor = clRed
|
|
EFColors.Error.TextColor = clBlack
|
|
EFColors.Highlight.BackColor = clHighlight
|
|
EFColors.Highlight.TextColor = clHighlightText
|
|
PictureMask = 'X'
|
|
TabOrder = 0
|
|
OnError = OvcSimpleFieldError
|
|
OnUserValidation = OvcSimpleField1UserValidation
|
|
end
|
|
object OvcSimpleField2: TOvcSimpleField
|
|
Left = 168
|
|
Top = 136
|
|
Width = 81
|
|
Height = 21
|
|
Cursor = crIBeam
|
|
DataType = sftString
|
|
CaretOvr.Shape = csBlock
|
|
ControlCharColor = clRed
|
|
DecimalPlaces = 0
|
|
EFColors.Disabled.BackColor = clWindow
|
|
EFColors.Disabled.TextColor = clGrayText
|
|
EFColors.Error.BackColor = clRed
|
|
EFColors.Error.TextColor = clBlack
|
|
EFColors.Highlight.BackColor = clHighlight
|
|
EFColors.Highlight.TextColor = clHighlightText
|
|
PictureMask = 'X'
|
|
TabOrder = 1
|
|
OnError = OvcSimpleFieldError
|
|
OnUserValidation = OvcSimpleField2UserValidation
|
|
end
|
|
end
|