?? ser500_01.dfm.svn-base
字號:
HeaderAlignment = taCenter
Width = 112
BandIndex = 0
RowIndex = 0
FieldName = 'S500_029'
end
object dxDBGrid1S500_030: TdxDBGridDateColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 112
BandIndex = 0
RowIndex = 0
FieldName = 'S500_030'
end
object dxDBGrid1S500_031: TdxDBGridDateColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 112
BandIndex = 0
RowIndex = 0
FieldName = 'S500_031'
end
object dxDBGrid1S500_032: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 0
RowIndex = 0
FieldName = 'S500_032'
end
object dxDBGrid1S500_034: TdxDBGridDateColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 112
BandIndex = 0
RowIndex = 0
FieldName = 'S500_034'
end
object dxDBGrid1S500_035: TdxDBGridColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 124
BandIndex = 0
RowIndex = 0
FieldName = 'S500_035'
end
object dxDBGrid1S500_036: TdxDBGridDateColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 112
BandIndex = 0
RowIndex = 0
FieldName = 'S500_036'
end
object dxDBGrid1S500_037: TdxDBGridColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 124
BandIndex = 0
RowIndex = 0
FieldName = 'S500_037'
end
object dxDBGrid1S110_005: TdxDBGridMaskColumn
Visible = False
BandIndex = 0
RowIndex = 0
FieldName = 'S110_005'
end
end
end
inherited ADOQuery1: TADOQuery
CursorType = ctStatic
OnCalcFields = ADOQuery1CalcFields
OnFilterRecord = ADOQuery1FilterRecord
SQL.Strings = (
'select A.*,B.S100_002,C.S110_003,D.H150_001,D.H150_002,D.H150_00' +
'3,'
' E.O150_001,E.O150_002,E.O150_003,E.O150_005,E.O150_006,E.' +
'O150_012,C.S110_005'
'from SER500 A, SER100 B, SER110 C, HRM150 D, ORD150 E'
'where A.S500_004=B.S100_001 and A.S500_003=C.S110_001 and '
' A.S500_010=D.H150_001 and A.S500_017=E.O150_001'
'order by S500_001')
object ADOQuery1S500_001: TWideStringField
DisplayLabel = #26469#30005#32534#21495
FieldName = 'S500_001'
Size = 30
end
object ADOQuery1S500_002: TWideStringField
DisplayLabel = #26469#30005#21517#31216
FieldName = 'S500_002'
Size = 50
end
object ADOQuery1S100_002: TWideStringField
DisplayLabel = #26469#30005#31867#21035
FieldName = 'S100_002'
Size = 50
end
object ADOQuery1S110_003: TWideStringField
DisplayLabel = #26469#30005#29366#24577
FieldName = 'S110_003'
Size = 50
end
object ADOQuery1S500_005: TSmallintField
DisplayLabel = #20248#20808#32423#21035
FieldName = 'S500_005'
end
object ADOQuery1S500_006: TSmallintField
DisplayLabel = #26469#30005#31867#22411
FieldName = 'S500_006'
OnGetText = ADOQuery1S500_006GetText
end
object ADOQuery1S500_007: TDateTimeField
DisplayLabel = #26469#30005#26085#26399
FieldName = 'S500_007'
end
object ADOQuery1S500_008: TIntegerField
DisplayLabel = #26469#30005#26102#38388
FieldName = 'S500_008'
OnGetText = ADOQuery1S500_008GetText
end
object ADOQuery1S500_009: TBCDField
DisplayLabel = #25509#21548#26102#38388
FieldName = 'S500_009'
Precision = 8
Size = 2
end
object ADOQuery1H150_002: TWideStringField
DisplayLabel = #21463#29702#20154#21495
FieldName = 'H150_002'
end
object ADOQuery1H150_003: TWideStringField
DisplayLabel = #21463#29702#20154#21517
FieldName = 'H150_003'
end
object ADOQuery1S500_011: TWideStringField
DisplayLabel = #26469#30005#20154#21592
FieldName = 'S500_011'
end
object ADOQuery1S500_012: TWideStringField
DisplayLabel = #37096#38376#21517#31216
FieldName = 'S500_012'
end
object ADOQuery1S500_013: TWideStringField
DisplayLabel = #32844#21153#21517#31216
FieldName = 'S500_013'
end
object ADOQuery1S500_014: TWideStringField
DisplayLabel = #32852#31995#30005#35805
FieldName = 'S500_014'
end
object ADOQuery1S500_015: TSmallintField
DisplayLabel = #21333#25454#31867#22411
FieldName = 'S500_015'
OnGetText = ADOQuery1S500_015GetText
end
object ADOQuery1S500_016: TWideStringField
DisplayLabel = #21333#25454#32534#21495
FieldName = 'S500_016'
Size = 30
end
object ADOQuery1O150_002: TWideStringField
DisplayLabel = #23458#25142#32534#21495
FieldName = 'O150_002'
end
object ADOQuery1O150_003: TWideStringField
DisplayLabel = #23458#25142#21517#31216
FieldName = 'O150_003'
Size = 60
end
object ADOQuery1O150_005: TWideStringField
DisplayLabel = #30005#35805#21495#30721
FieldKind = fkCalculated
FieldName = 'O150_005'
Size = 50
Calculated = True
end
object ADOQuery1O150_006: TWideStringField
DisplayLabel = #20256#30495#21495#30721
FieldKind = fkCalculated
FieldName = 'O150_006'
Size = 50
Calculated = True
end
object ADOQuery1O150_012: TWideStringField
DisplayLabel = #23458#25142#22320#22336
FieldKind = fkCalculated
FieldName = 'O150_012'
Size = 100
Calculated = True
end
object ADOQuery1I150_002: TStringField
DisplayLabel = #20135#21697#32534#21495
FieldKind = fkLookup
FieldName = 'I150_002'
LookupDataSet = qryInv150
LookupKeyFields = 'I150_001'
LookupResultField = 'I150_002'
KeyFields = 'S500_018'
Size = 30
Lookup = True
end
object ADOQuery1I150_003: TStringField
DisplayLabel = #20135#21697#21517#31216
FieldKind = fkLookup
FieldName = 'I150_003'
LookupDataSet = qryInv150
LookupKeyFields = 'I150_001'
LookupResultField = 'I150_003'
KeyFields = 'S500_018'
Size = 60
Lookup = True
end
object ADOQuery1S500_019: TWideStringField
DisplayLabel = #26426#36523#32534#21495
FieldName = 'S500_019'
Size = 30
end
object ADOQuery1S500_020: TBooleanField
DisplayLabel = #26159#21542#27966#24037
FieldName = 'S500_020'
end
object ADOQuery1S500_027: TBooleanField
DisplayLabel = #26159#21542#25253#20215
FieldName = 'S500_027'
end
object ADOQuery1S500_028: TDateTimeField
DisplayLabel = #20445#20859#24320#22987#26085#26399
FieldName = 'S500_028'
end
object ADOQuery1S500_029: TDateTimeField
DisplayLabel = #20445#20859#23436#25104#26085#26399
FieldName = 'S500_029'
end
object ADOQuery1S500_030: TDateTimeField
DisplayLabel = #32493#20445#24320#22987#26085#26399
FieldName = 'S500_030'
end
object ADOQuery1S500_031: TDateTimeField
DisplayLabel = #32493#20445#23436#25104#26085#26399
FieldName = 'S500_031'
end
object ADOQuery1S500_032: TSmallintField
DisplayLabel = #20135#21697#26469#28304
FieldName = 'S500_032'
end
object ADOQuery1S500_033: TMemoField
DisplayLabel = #26469#30005#20869#23481
FieldName = 'S500_033'
Visible = False
BlobType = ftMemo
end
object ADOQuery1S500_034: TDateTimeField
DisplayLabel = #21046#21333#26085#26399
FieldName = 'S500_034'
end
object ADOQuery1S500_035: TWideStringField
DisplayLabel = #21046#21333#20154#21592
FieldName = 'S500_035'
end
object ADOQuery1S500_036: TDateTimeField
DisplayLabel = #20462#25913#26085#26399
FieldName = 'S500_036'
end
object ADOQuery1S500_037: TWideStringField
DisplayLabel = #20462#25913#20154#21592
FieldName = 'S500_037'
end
object ADOQuery1S500_003: TIntegerField
DisplayLabel = #26469#30005#29366#24577
FieldName = 'S500_003'
Visible = False
end
object ADOQuery1S500_004: TIntegerField
DisplayLabel = #26469#30005#31867#21035
FieldName = 'S500_004'
Visible = False
end
object ADOQuery1S500_010: TIntegerField
DisplayLabel = #21463#29702#20154#21592
FieldName = 'S500_010'
Visible = False
end
object ADOQuery1S500_017: TIntegerField
DisplayLabel = #23458#25142#32534#21495
FieldName = 'S500_017'
Visible = False
end
object ADOQuery1S500_018: TIntegerField
DisplayLabel = #20135#21697#32534#21495
FieldName = 'S500_018'
Visible = False
end
object ADOQuery1H150_001: TAutoIncField
FieldName = 'H150_001'
ReadOnly = True
Visible = False
end
object ADOQuery1O150_001: TAutoIncField
FieldName = 'O150_001'
ReadOnly = True
Visible = False
end
object ADOQuery1S110_005: TIntegerField
FieldName = 'S110_005'
Visible = False
end
end
object qryInv150: TADOQuery
Connection = SYSDM.ADOC
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select I150_001,I150_002,I150_003 from INV150')
Left = 112
Top = 152
object qryInv150I150_001: TAutoIncField
FieldName = 'I150_001'
ReadOnly = True
end
object qryInv150I150_002: TWideStringField
FieldName = 'I150_002'
Size = 30
end
object qryInv150I150_003: TWideStringField
FieldName = 'I150_003'
Size = 60
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -