📄 bushy_monedit.dfm
字号:
'7'
'8'
'9'
'10'
'11'
'12')
end
object Edit9: TEdit
Left = 72
Top = 10
Width = 44
Height = 19
Color = clBtnFace
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 2
end
end
object ADOQuery2: TADOQuery
Connection = BusTradeDataModule.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#20844#20132#34892#19994#32479#35745#26376#25253#25351#26631#23450#20041#34920)
Left = 575
Top = 128
end
object ADOCommand1: TADOCommand
Connection = BusTradeDataModule.ADOConnection1
Parameters = <>
Left = 479
Top = 128
end
object ADOQPrintMon: TADOQuery
Connection = BusTradeDataModule.ADOConnection1
Parameters = <>
Left = 614
Top = 130
end
object QueryPageLeft1: TADOQuery
Connection = BusTradeDataModule.ADOConnection1
CursorType = ctStatic
AfterInsert = QueryPageLeft1AfterEdit
AfterEdit = QueryPageLeft1AfterEdit
AfterPost = QueryPageLeft1AfterPost
AfterScroll = QueryPageLeft1AfterScroll
Parameters = <>
SQL.Strings = (
'select * from '#20844#20132#34892#19994#32479#35745#26376#25253'_z')
Left = 512
Top = 48
object QueryPageLeft1DSDesigner6: TWideStringField
FieldName = #22478#24066#20195#30721
Size = 5
end
object QueryPageLeft1DSDesigner: TSmallintField
FieldName = #32479#35745#24180#20221
end
object QueryPageLeft1DSDesigner2: TSmallintField
FieldName = #32479#35745#26376#20221
end
object QueryPageLeft1DSDesigner3: TWideStringField
FieldName = #25351#26631#20195#30721
end
object QueryPageLeft1DSDesigner4: TFloatField
FieldName = #26412#26376#23454#38469
end
object QueryPageLeft1StringField: TStringField
DisplayWidth = 24
FieldKind = fkLookup
FieldName = #25351#26631#21517#31216
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #25351#26631#21517#31216
KeyFields = #25351#26631#20195#30721
Size = 40
Lookup = True
end
object QueryPageLeft1StringField2: TStringField
DisplayWidth = 12
FieldKind = fkLookup
FieldName = #21333#20301
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #21333#20301
KeyFields = #25351#26631#20195#30721
Size = 10
Lookup = True
end
object QueryPageLeft1StringField3: TStringField
FieldKind = fkLookup
FieldName = #25351#26631#31867#22411
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #25351#26631#31867#22411
KeyFields = #25351#26631#20195#30721
Size = 10
Lookup = True
end
object QueryPageLeft1DSDesigner5: TMemoField
FieldName = #22791#27880
BlobType = ftMemo
end
object QueryPageLeft1DSDesigner7: TFloatField
DefaultExpression = '0'
FieldName = #27979#31639#20540
DisplayFormat = '########.##'
end
end
object QueryPageRight1: TADOQuery
Connection = BusTradeDataModule.ADOConnection1
CursorType = ctStatic
AfterInsert = QueryPageLeft1AfterEdit
AfterEdit = QueryPageLeft1AfterEdit
AfterPost = QueryPageLeft1AfterPost
AfterScroll = QueryPageLeft1AfterScroll
Parameters = <>
SQL.Strings = (
'select * from '#20844#20132#34892#19994#32479#35745#26376#25253'_z')
Left = 576
Top = 48
object QueryPageRight1DSDesigner6: TWideStringField
FieldName = #22478#24066#20195#30721
Size = 5
end
object QueryPageRight1DSDesigner: TSmallintField
FieldName = #32479#35745#24180#20221
end
object QueryPageRight1DSDesigner2: TSmallintField
FieldName = #32479#35745#26376#20221
end
object QueryPageRight1DSDesigner3: TWideStringField
FieldName = #25351#26631#20195#30721
end
object QueryPageRight1DSDesigner4: TFloatField
FieldName = #26412#26376#23454#38469
end
object QueryPageRight1StringField: TStringField
DisplayWidth = 24
FieldKind = fkLookup
FieldName = #25351#26631#21517#31216
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #25351#26631#21517#31216
KeyFields = #25351#26631#20195#30721
Size = 40
Lookup = True
end
object QueryPageRight1StringField2: TStringField
DisplayWidth = 12
FieldKind = fkLookup
FieldName = #21333#20301
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #21333#20301
KeyFields = #25351#26631#20195#30721
Size = 10
Lookup = True
end
object QueryPageRight1StringField3: TStringField
FieldKind = fkLookup
FieldName = #25351#26631#31867#22411
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #25351#26631#31867#22411
KeyFields = #25351#26631#20195#30721
Size = 10
Lookup = True
end
object QueryPageRight1DSDesigner5: TMemoField
FieldName = #22791#27880
BlobType = ftMemo
end
object QueryPageRight1DSDesigner7: TFloatField
DefaultExpression = '0'
FieldName = #27979#31639#20540
DisplayFormat = '########.##'
end
end
object QueryPageLeft2: TADOQuery
Connection = BusTradeDataModule.ADOConnection1
CursorType = ctStatic
AfterInsert = QueryPageLeft1AfterEdit
AfterEdit = QueryPageLeft1AfterEdit
AfterPost = QueryPageLeft1AfterPost
AfterScroll = QueryPageLeft1AfterScroll
Parameters = <>
SQL.Strings = (
'select * from '#20844#20132#34892#19994#32479#35745#26376#25253'_z')
Left = 480
Top = 88
object QueryPageLeft2StringField: TStringField
DisplayWidth = 24
FieldKind = fkLookup
FieldName = #25351#26631#21517#31216
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #25351#26631#21517#31216
KeyFields = #25351#26631#20195#30721
Size = 40
Lookup = True
end
object QueryPageLeft2StringField2: TStringField
DisplayWidth = 12
FieldKind = fkLookup
FieldName = #21333#20301
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #21333#20301
KeyFields = #25351#26631#20195#30721
Size = 10
Lookup = True
end
object QueryPageLeft2StringField3: TStringField
FieldKind = fkLookup
FieldName = #25351#26631#31867#22411
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #25351#26631#31867#22411
KeyFields = #25351#26631#20195#30721
Size = 10
Lookup = True
end
object QueryPageLeft2DSDesigner2: TSmallintField
FieldName = #32479#35745#24180#20221
end
object QueryPageLeft2DSDesigner3: TSmallintField
FieldName = #32479#35745#26376#20221
end
object QueryPageLeft2DSDesigner4: TWideStringField
FieldName = #25351#26631#20195#30721
Size = 10
end
object QueryPageLeft2DSDesigner5: TFloatField
FieldName = #26412#26376#23454#38469
DisplayFormat = '########.##'
end
object QueryPageLeft2DSDesigner: TMemoField
FieldName = #22791#27880
BlobType = ftMemo
end
object QueryPageLeft2DSDesigner6: TWideStringField
FieldName = #22478#24066#20195#30721
Size = 5
end
object QueryPageLeft2DSDesigner7: TFloatField
DefaultExpression = '0'
FieldName = #27979#31639#20540
DisplayFormat = '########.##'
end
end
object QueryPageRight2: TADOQuery
Connection = BusTradeDataModule.ADOConnection1
CursorType = ctStatic
AfterInsert = QueryPageLeft1AfterEdit
AfterEdit = QueryPageLeft1AfterEdit
AfterPost = QueryPageLeft1AfterPost
AfterScroll = QueryPageLeft1AfterScroll
Parameters = <>
SQL.Strings = (
'select * from '#20844#20132#34892#19994#32479#35745#26376#25253'_z')
Left = 576
Top = 88
object QueryPageRight2StringField: TStringField
DisplayWidth = 24
FieldKind = fkLookup
FieldName = #25351#26631#21517#31216
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #25351#26631#21517#31216
KeyFields = #25351#26631#20195#30721
Size = 40
Lookup = True
end
object QueryPageRight2StringField2: TStringField
DisplayWidth = 12
FieldKind = fkLookup
FieldName = #21333#20301
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #21333#20301
KeyFields = #25351#26631#20195#30721
Size = 10
Lookup = True
end
object QueryPageRight2StringField3: TStringField
FieldKind = fkLookup
FieldName = #25351#26631#31867#22411
LookupDataSet = ADOQuery2
LookupKeyFields = #25351#26631#20195#30721
LookupResultField = #25351#26631#31867#22411
KeyFields = #25351#26631#20195#30721
Size = 10
Lookup = True
end
object QueryPageRight2DSDesigner2: TSmallintField
FieldName = #32479#35745#24180#20221
end
object QueryPageRight2DSDesigner3: TSmallintField
FieldName = #32479#35745#26376#20221
end
object QueryPageRight2DSDesigner4: TWideStringField
FieldName = #25351#26631#20195#30721
Size = 10
end
object QueryPageRight2DSDesigner5: TFloatField
FieldName = #26412#26376#23454#38469
DisplayFormat = '########.##'
end
object QueryPageRight2DSDesigner: TMemoField
FieldName = #22791#27880
BlobType = ftMemo
end
object QueryPageRight2DSDesigner6: TWideStringField
FieldName = #22478#24066#20195#30721
Size = 5
end
object QueryPageRight2DSDesigner7: TFloatField
FieldName = #27979#31639#20540
DisplayFormat = '########.##'
end
end
object QueryPageLeft1Src: TDataSource
DataSet = QueryPageLeft1
Left = 552
Top = 48
end
object QueryPageLeft2Src: TDataSource
DataSet = QueryPageLeft2
Left = 520
Top = 88
end
object QueryPageRight1Src: TDataSource
DataSet = QueryPageRight1
Left = 616
Top = 48
end
object QueryPageRight2Src: TDataSource
DataSet = QueryPageRight2
Left = 616
Top = 88
end
object ADOQuery4: TADOQuery
Connection = BusTradeDataModule.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#20844#20132#34892#19994#32479#35745#26376#25253#34920)
Left = 576
Top = 168
end
object DataSource1: TDataSource
DataSet = ADOQuery4
Left = 616
Top = 176
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -