📄 adddd.dfm
字号:
Text = 'bsSkinDBEdit4'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clBlack
DefaultFont.Height = 14
DefaultFont.Name = #23435#20307
DefaultFont.Style = []
UseSkinFont = True
DefaultWidth = 0
DefaultHeight = 0
ButtonMode = False
SkinData = dbs.bsSkinData1
SkinDataName = 'edit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = 14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
AutoSize = False
DataField = #26631#35782'1'
DataSource = dsAdd
end
object bsSkinDBLookupComboBox1: TbsSkinDBLookupComboBox
Left = 199
Top = 300
Width = 169
Height = 20
TabOrder = 5
SkinData = dbs.bsSkinData1
SkinDataName = 'combobox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = #23435#20307
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 20
UseSkinFont = True
DataField = #21046#34920#20154#21592
DataSource = dsAdd
ListBoxDefaultItemHeight = 20
ListBoxUseSkinFont = True
ListBoxUseSkinItemHeight = True
KeyField = #29992#25143#21517
ListField = #29992#25143#21517
ListSource = DataSource3
end
object bsSkinDBLookupComboBox2: TbsSkinDBLookupComboBox
Left = 199
Top = 48
Width = 169
Height = 20
TabOrder = 6
SkinData = dbs.bsSkinData1
SkinDataName = 'combobox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = #23435#20307
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 20
UseSkinFont = True
DataField = #23458#25143#32534#21495
DataSource = dsAdd
ListBoxDefaultItemHeight = 20
ListBoxUseSkinFont = True
ListBoxUseSkinItemHeight = True
KeyField = #23458#25143#32534#21495
ListField = #23458#25143#21517#31216
ListSource = DataSource2
end
object bsSkinDBLookupComboBox3: TbsSkinDBLookupComboBox
Left = 199
Top = 84
Width = 169
Height = 20
TabOrder = 7
SkinData = dbs.bsSkinData1
SkinDataName = 'combobox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = #23435#20307
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 20
UseSkinFont = True
DataField = #20135#21697#32534#21495
DataSource = dsAdd
ListBoxDefaultItemHeight = 20
ListBoxUseSkinFont = True
ListBoxUseSkinItemHeight = True
KeyField = #20135#21697#32534#21495
ListField = #20135#21697#21517#31216
ListSource = DataSource1
end
object bsSkinDBDateEdit1: TbsSkinDBDateEdit
Left = 199
Top = 120
Width = 119
Height = 18
EditMask = '!0000/99/99;1; '
Text = '2006- 5-15'
AlphaBlend = False
AlphaBlendAnimation = False
AlphaBlendValue = 0
Date = 38852.575608437500000000
TodayDefault = True
CalendarWidth = 200
CalendarHeight = 150
CalendarFont.Charset = DEFAULT_CHARSET
CalendarFont.Color = clWindowText
CalendarFont.Height = 14
CalendarFont.Name = #23435#20307
CalendarFont.Style = []
FirstDayOfWeek = Sun
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clBlack
DefaultFont.Height = 14
DefaultFont.Name = #23435#20307
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
ButtonMode = True
SkinData = dbs.bsSkinData1
SkinDataName = 'buttonedit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = 14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 10
ParentFont = False
TabOrder = 8
AutoSize = False
DataField = #26085#26399
DataSource = dsAdd
end
object bsSkinDBEdit5: TbsSkinDBEdit
Left = 199
Top = 264
Width = 170
Height = 18
Text = 'bsSkinDBEdit5'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clBlack
DefaultFont.Height = 14
DefaultFont.Name = #23435#20307
DefaultFont.Style = []
UseSkinFont = True
DefaultWidth = 0
DefaultHeight = 0
ButtonMode = False
SkinData = dbs.bsSkinData1
SkinDataName = 'edit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = 14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 9
AutoSize = False
DataField = #26631#35782'2'
DataSource = dsAdd
end
object bsSkinDBDateEdit2: TbsSkinDBDateEdit
Left = 199
Top = 336
Width = 119
Height = 18
EditMask = '!0000/99/99;1; '
Text = '2006- 5-15'
AlphaBlend = False
AlphaBlendAnimation = False
AlphaBlendValue = 0
Date = 38852.575608437500000000
TodayDefault = True
CalendarWidth = 200
CalendarHeight = 150
CalendarFont.Charset = DEFAULT_CHARSET
CalendarFont.Color = clWindowText
CalendarFont.Height = 14
CalendarFont.Name = #23435#20307
CalendarFont.Style = []
FirstDayOfWeek = Sun
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clBlack
DefaultFont.Height = 14
DefaultFont.Name = #23435#20307
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
ButtonMode = True
SkinData = dbs.bsSkinData1
SkinDataName = 'buttonedit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = 14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 10
ParentFont = False
TabOrder = 10
AutoSize = False
DataField = #21046#34920#26085#26399
DataSource = dsAdd
end
end
end
inherited bsSkinToolBar1: TbsSkinToolBar
Width = 576
end
inherited cdsAdd: TADODataSet
BeforePost = cdsAddBeforePost
OnNewRecord = cdsAddNewRecord
CommandText = 'select * from '#35746#21333' where '#35746#21333#32534#21495'=:id'
Parameters = <
item
Name = 'id'
DataType = ftString
NumericScale = 255
Precision = 255
Size = 20
Value = Null
end>
object cdsAddDSDesigner: TStringField
FieldName = #35746#21333#32534#21495
end
object cdsAddDSDesigner2: TStringField
FieldName = #23458#25143#32534#21495
end
object cdsAddDSDesigner3: TStringField
FieldName = #20135#21697#32534#21495
Size = 40
end
object cdsAddDSDesigner4: TDateTimeField
FieldName = #26085#26399
end
object cdsAddDSDesigner5: TBCDField
FieldName = #25968#37327
Precision = 10
Size = 2
end
object cdsAddDSDesigner6: TStringField
FieldName = #29992#36884
end
object cdsAddDSDesigner1: TStringField
FieldName = #26631#35782'1'
end
object cdsAddDSDesigner22: TStringField
FieldName = #26631#35782'2'
end
object cdsAddDSDesigner7: TStringField
FieldName = #21046#34920#20154#21592
Size = 10
end
object cdsAddDSDesigner8: TDateTimeField
FieldName = #21046#34920#26085#26399
end
object cdsAddDSDesigner9: TStringField
FieldName = #22791#27880
Size = 200
end
end
object ADODataSet1: TADODataSet
Active = True
CacheSize = 1000
Connection = dbs.ADOConn
CursorType = ctStatic
CommandText = 'select '#20135#21697#32534#21495', '#20135#21697#21517#31216' from '#20135#21697' order by '#20135#21697#21517#31216
Parameters = <>
Left = 425
Top = 56
end
object DataSource1: TDataSource
DataSet = ADODataSet1
Left = 453
Top = 56
end
object ADODataSet2: TADODataSet
Active = True
CacheSize = 1000
Connection = dbs.ADOConn
CursorType = ctStatic
CommandText = 'select '#23458#25143#32534#21495', '#23458#25143#21517#31216' from '#23458#25143
Parameters = <>
Left = 425
Top = 88
end
object DataSource2: TDataSource
DataSet = ADODataSet2
Left = 453
Top = 88
end
object ADODataSet3: TADODataSet
Active = True
CacheSize = 1000
Connection = dbs.ADOConn
CursorType = ctStatic
CommandText = 'select '#29992#25143#21517' from '#29992#25143
Parameters = <>
Left = 425
Top = 120
end
object DataSource3: TDataSource
DataSet = ADODataSet3
Left = 453
Top = 120
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -