?? in120report.dfm
字號:
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #35519#25765#26085#26399':'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel7: TQRLabel
Left = 384
Top = 4
Width = 73
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
1016
10.5833333333333
193.145833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #35519#25765#21934#21934#34399':'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel8: TQRLabel
Left = 4
Top = 24
Width = 60
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
10.5833333333333
63.5
158.75)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #35519#20986#20489#24235':'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel9: TQRLabel
Left = 4
Top = 44
Width = 60
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
10.5833333333333
116.416666666667
158.75)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #35519#20837#20489#24235':'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText1: TQRDBText
Left = 68
Top = 4
Width = 85
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
179.916666666667
10.5833333333333
224.895833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qyReport
DataField = 'TransferDate'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText2: TQRDBText
Left = 68
Top = 24
Width = 155
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
179.916666666667
63.5
410.104166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qyReport
DataField = 'TransferOutWarehouseID'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText3: TQRDBText
Left = 68
Top = 44
Width = 148
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
179.916666666667
116.416666666667
391.583333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qyReport
DataField = 'TransferInWarehouseID'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText4: TQRDBText
Left = 468
Top = 4
Width = 71
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
1238.25
10.5833333333333
187.854166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qyReport
DataField = 'TransferID'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText5: TQRDBText
Left = 156
Top = 24
Width = 113
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
412.75
63.5
298.979166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qyReport
DataField = 'OutWarehouseName'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText6: TQRDBText
Left = 156
Top = 44
Width = 106
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
412.75
116.416666666667
280.458333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qyReport
DataField = 'InWarehouseName'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRShape1: TQRShape
Left = 0
Top = 60
Width = 753
Height = 13
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
34.3958333333333
0
158.75
1992.3125)
Shape = qrsHorLine
end
end
inherited qyReport: TQuery
Active = True
BeforeOpen = qyReportBeforeOpen
SQL.Strings = (
'SELECT M.TransferDate, M.TransferOutWarehouseID, M.TransferInWar' +
'ehouseID,'
'D.TransferItem, D.ProductID, D.TransferQuantity, P.ProductName,'
'Wout.WarehouseName AS OutWarehouseName,'
'Win.WarehouseName AS InWarehouseName, M.TransferID'
'FROM TransferMaster M, TransferDetail D, Warehouse Win, Warehous' +
'e Wout, Product P'
'WHERE M.CompanyID = :CompanyID AND M.TransferID = :TransferID'
'AND M.CompanyID = D.CompanyID AND M.TransferID = D.TransferID'
'AND D.CompanyID = P.CompanyID AND D.ProductID = P.ProductID'
'AND M.CompanyID = Wout.CompanyID AND M.TransferOutWarehouseID = ' +
'Wout.WarehouseID'
'AND M.CompanyID = Win.CompanyID AND M.TransferInWarehouseID = Wi' +
'n.WarehouseID'
'ORDER BY D.TransferItem')
ParamData = <
item
DataType = ftString
Name = 'CompanyID'
ParamType = ptUnknown
end
item
DataType = ftString
Name = 'TransferID'
ParamType = ptUnknown
end>
object qyReportTransferID: TStringField
FieldName = 'TransferID'
Origin = 'KINGSBYPRG.TransferMaster.TransferID'
FixedChar = True
Size = 10
end
object qyReportTransferDate: TStringField
FieldName = 'TransferDate'
Origin = 'KINGSBYPRG.TransferMaster.TransferDate'
FixedChar = True
Size = 8
end
object qyReportTransferOutWarehouseID: TStringField
FieldName = 'TransferOutWarehouseID'
Origin = 'KINGSBYPRG.TransferMaster.TransferOutWarehouseID'
FixedChar = True
Size = 4
end
object qyReportTransferInWarehouseID: TStringField
FieldName = 'TransferInWarehouseID'
Origin = 'KINGSBYPRG.TransferMaster.TransferInWarehouseID'
FixedChar = True
Size = 4
end
object qyReportTransferItem: TStringField
FieldName = 'TransferItem'
Origin = 'KINGSBYPRG.TransferDetail.TransferItem'
FixedChar = True
Size = 3
end
object qyReportProductID: TStringField
FieldName = 'ProductID'
Origin = 'KINGSBYPRG.TransferDetail.ProductID'
FixedChar = True
Size = 10
end
object qyReportTransferQuantity: TBCDField
FieldName = 'TransferQuantity'
Origin = 'KINGSBYPRG.TransferDetail.TransferQuantity'
DisplayFormat = '#,##0'
Precision = 12
Size = 0
end
object qyReportProductName: TStringField
FieldName = 'ProductName'
Origin = 'KINGSBYPRG.Product.ProductName'
FixedChar = True
Size = 30
end
object qyReportOutWarehouseName: TStringField
FieldName = 'OutWarehouseName'
Origin = 'KINGSBYPRG.Warehouse.WarehouseName'
FixedChar = True
Size = 10
end
object qyReportInWarehouseName: TStringField
FieldName = 'InWarehouseName'
Origin = 'KINGSBYPRG.Warehouse.WarehouseName'
FixedChar = True
Size = 10
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -