jvcl driver development envionment

源代码在线查看: jveditsu.dfm

软件大小: 11078 K
上传用户: haowfei
关键词: development envionment driver jvcl
下载地址: 免注册下载 普通下载 VIP

相关代码

				object JvEdits: TJvEdits
				  Left = 344
				  Top = 157
				  Width = 508
				  Height = 432
				  Caption = 'Demo for various edit components'
				  Color = clBtnFace
				  Font.Charset = DEFAULT_CHARSET
				  Font.Color = clWindowText
				  Font.Height = -11
				  Font.Name = 'MS Sans Serif'
				  Font.Style = []
				  OldCreateOrder = True
				  PixelsPerInch = 96
				  TextHeight = 13
				  object Label1: TLabel
				    Left = 24
				    Top = 19
				    Width = 122
				    Height = 15
				    Caption = 'I '#39'm a JvFilenameEdit: '
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label2: TLabel
				    Left = 24
				    Top = 50
				    Width = 118
				    Height = 15
				    Caption = 'I '#39'm a JvDirectoryEdit: '
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label4: TLabel
				    Left = 24
				    Top = 81
				    Width = 111
				    Height = 15
				    Caption = 'I '#39'm a JvComboEdit: '
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label5: TLabel
				    Left = 24
				    Top = 112
				    Width = 97
				    Height = 15
				    Caption = 'I '#39'm a JvFloatEdit :'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label6: TLabel
				    Left = 24
				    Top = 144
				    Width = 95
				    Height = 15
				    Caption = 'I '#39'm a JvCalcEdit: '
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label7: TLabel
				    Left = 24
				    Top = 175
				    Width = 119
				    Height = 15
				    Caption = 'I '#39'm a JvCurrencyEdit: '
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label9: TLabel
				    Left = 24
				    Top = 237
				    Width = 108
				    Height = 15
				    Caption = 'I '#39'm a JvIntegerEdit: '
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label10: TLabel
				    Left = 24
				    Top = 269
				    Width = 95
				    Height = 15
				    Caption = 'I '#39'm a JvYearEdit: '
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label3: TLabel
				    Left = 320
				    Top = 19
				    Width = 146
				    Height = 15
				    Caption = '(Jv Composites TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label11: TLabel
				    Left = 320
				    Top = 50
				    Width = 146
				    Height = 15
				    Caption = '(Jv Composites TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label12: TLabel
				    Left = 320
				    Top = 82
				    Width = 146
				    Height = 15
				    Caption = '(Jv Composites TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label13: TLabel
				    Left = 320
				    Top = 113
				    Width = 120
				    Height = 15
				    Caption = '(Jv Convert TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label14: TLabel
				    Left = 320
				    Top = 145
				    Width = 146
				    Height = 15
				    Caption = '(Jv Composites TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label15: TLabel
				    Left = 320
				    Top = 176
				    Width = 120
				    Height = 15
				    Caption = '(Jv Convert TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label16: TLabel
				    Left = 320
				    Top = 208
				    Width = 120
				    Height = 15
				    Caption = '(Jv Convert TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label8: TLabel
				    Left = 24
				    Top = 206
				    Width = 101
				    Height = 15
				    Caption = 'I '#39'm a JvFloatEdit2:'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label17: TLabel
				    Left = 320
				    Top = 239
				    Width = 120
				    Height = 15
				    Caption = '(Jv Convert TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label18: TLabel
				    Left = 320
				    Top = 271
				    Width = 120
				    Height = 15
				    Caption = '(Jv Convert TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label23: TLabel
				    Left = 24
				    Top = 300
				    Width = 96
				    Height = 15
				    Caption = 'I '#39'm a  JvDateEdit:'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				    Transparent = True
				  end
				  object Label25: TLabel
				    Left = 24
				    Top = 331
				    Width = 95
				    Height = 15
				    Caption = 'I '#39'm a  JvSpinEdit:'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				    Transparent = True
				  end
				  object Label28: TLabel
				    Left = 24
				    Top = 363
				    Width = 105
				    Height = 15
				    Caption = 'I '#39'm a  JvIpAddress:'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				    Transparent = True
				  end
				  object Label19: TLabel
				    Left = 320
				    Top = 302
				    Width = 146
				    Height = 15
				    Caption = '(Jv Composites TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label20: TLabel
				    Left = 320
				    Top = 334
				    Width = 132
				    Height = 15
				    Caption = '(Jv Additional TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object Label21: TLabel
				    Left = 320
				    Top = 366
				    Width = 113
				    Height = 15
				    Caption = '(Jv Win32 TabSheet)'
				    Font.Charset = ANSI_CHARSET
				    Font.Color = clWindowText
				    Font.Height = -12
				    Font.Name = 'Arial'
				    Font.Style = []
				    ParentFont = False
				  end
				  object JvFileNameBox1: TJvFilenameEdit
				    Left = 156
				    Top = 16
				    Width = 150
				    Height = 21
				    AddQuotes = False
				    ButtonFlat = False
				    TabOrder = 0
				  end
				  object JvButtonBox1: TJvComboEdit
				    Left = 156
				    Top = 78
				    Width = 150
				    Height = 21
				    ButtonFlat = False
				    ButtonWidth = 16
				    ImageKind = ikEllipsis
				    TabOrder = 1
				    OnButtonClick = JvButtonBox1ButtonClick
				  end
				  object JvFloatEdit1: TJvValidateEdit
				    Left = 156
				    Top = 110
				    Width = 150
				    Height = 21
				    CheckChars = '01234567890'
				    CriticalPoints.CheckPoints = cpNone
				    CriticalPoints.ColorAbove = clBlue
				    CriticalPoints.ColorBelow = clRed
				    EditText = '2'
				    PasswordChar = #0
				    TabOrder = 2
				    Text = '2'
				    Value = 2
				  end
				  object JvCalculatorBox1: TJvCalcEdit
				    Left = 156
				    Top = 141
				    Width = 150
				    Height = 21
				    AutoSize = False
				    TabOrder = 3
				  end
				  object JvCurrencyEdit1: TJvValidateEdit
				    Left = 156
				    Top = 172
				    Width = 150
				    Height = 21
				    CheckChars = '01234567890'
				    CriticalPoints.CheckPoints = cpNone
				    CriticalPoints.ColorAbove = clBlue
				    CriticalPoints.ColorBelow = clRed
				    EditText = '1'
				    PasswordChar = #0
				    TabOrder = 4
				    Text = '1'
				    Value = 1
				  end
				  object JvFloatEdit21: TJvValidateEdit
				    Left = 156
				    Top = 204
				    Width = 150
				    Height = 21
				    CheckChars = '01234567890'
				    CriticalPoints.CheckPoints = cpNone
				    CriticalPoints.ColorAbove = clBlue
				    CriticalPoints.ColorBelow = clRed
				    EditText = '1'
				    HasMaxValue = True
				    HasMinValue = True
				    MaxLength = 10
				    MaxValue = 999
				    MinValue = 1
				    PasswordChar = #0
				    TabOrder = 5
				    Text = '1'
				    Value = 1
				  end
				  object JvIntegerEdit1: TJvValidateEdit
				    Left = 156
				    Top = 235
				    Width = 150
				    Height = 21
				    CheckChars = '01234567890'
				    CriticalPoints.CheckPoints = cpNone
				    CriticalPoints.ColorAbove = clBlue
				    CriticalPoints.ColorBelow = clRed
				    EditText = '1'
				    HasMaxValue = True
				    HasMinValue = True
				    MaxValue = 999999
				    MinValue = 1
				    PasswordChar = #0
				    TabOrder = 6
				    Text = '1'
				    Value = 1
				  end
				  object JvYearEdit1: TJvValidateEdit
				    Left = 156
				    Top = 266
				    Width = 150
				    Height = 21
				    CheckChars = '01234567890'
				    CriticalPoints.CheckPoints = cpNone
				    CriticalPoints.ColorAbove = clBlue
				    CriticalPoints.ColorBelow = clRed
				    EditText = '2002'
				    HasMaxValue = True
				    HasMinValue = True
				    MaxValue = 9999
				    MinValue = 1900
				    PasswordChar = #0
				    TabOrder = 7
				    Text = '2002'
				    Value = 2002
				  end
				  object JvDirectoryEdit1: TJvDirectoryEdit
				    Left = 156
				    Top = 47
				    Width = 150
				    Height = 21
				    ButtonFlat = False
				    TabOrder = 8
				  end
				  object JvDateEdit1: TJvDateEdit
				    Left = 157
				    Top = 298
				    Width = 150
				    Height = 21
				    ButtonFlat = False
				    TabOrder = 9
				  end
				  object JvSpinEdit1: TJvSpinEdit
				    Left = 157
				    Top = 329
				    Width = 150
				    Height = 21
				    TabOrder = 10
				  end
				  object JvIpAddress1: TJvIPAddress
				    Left = 157
				    Top = 361
				    Width = 150
				    Height = 21
				    AddressValues.Address = 0
				    AddressValues.Value1 = 0
				    AddressValues.Value2 = 0
				    AddressValues.Value3 = 0
				    AddressValues.Value4 = 0
				    TabOrder = 11
				  end
				end
							

相关资源