?? dyxschd1.dfm
字號:
Size = 200
end
object ADOTable3dq: TStringField
FieldName = 'dq'
Size = 50
end
object ADOTable3lxr: TStringField
FieldName = 'lxr'
Size = 50
end
object ADOTable3lxdh: TStringField
FieldName = 'lxdh'
Size = 50
end
object ADOTable3cz: TStringField
FieldName = 'cz'
Size = 50
end
object ADOTable3lxdz: TStringField
FieldName = 'lxdz'
Size = 200
end
object ADOTable3bz: TStringField
FieldName = 'bz'
Size = 200
end
object ADOTable3ye: TBCDField
FieldName = 'ye'
Precision = 19
end
end
object DataSource2: TDataSource
DataSet = ADOQuery1
Left = 232
Top = 184
end
object ADOTable4: TADOTable
Active = True
Connection = MainForm.ADOConnection1
CursorType = ctStatic
IndexFieldNames = 'code'
MasterFields = 'spcode'
MasterSource = DataSource1
TableName = 'SPDA'
Left = 176
Top = 184
object ADOTable4code: TStringField
FieldName = 'code'
Size = 15
end
object ADOTable4name: TStringField
FieldName = 'name'
Size = 50
end
object ADOTable4lb: TStringField
FieldName = 'lb'
end
object ADOTable4jldw: TStringField
FieldName = 'jldw'
Size = 10
end
object ADOTable4bzgg: TBCDField
FieldName = 'bzgg'
Precision = 18
Size = 0
end
object ADOTable4barcode: TStringField
FieldName = 'barcode'
end
object ADOTable4jhj: TBCDField
FieldName = 'jhj'
Precision = 18
Size = 2
end
object ADOTable4lsj: TBCDField
FieldName = 'lsj'
Precision = 18
Size = 2
end
object ADOTable4hyj: TBCDField
FieldName = 'hyj'
Precision = 18
Size = 2
end
object ADOTable4pfj: TBCDField
FieldName = 'pfj'
Precision = 18
Size = 2
end
object ADOTable4jqj: TBCDField
FieldName = 'jqj'
Precision = 18
Size = 2
end
object ADOTable4cxj: TBCDField
FieldName = 'cxj'
Precision = 18
Size = 2
end
object ADOTable4czspbm: TStringField
FieldName = 'czspbm'
Size = 10
end
object ADOTable4bz: TStringField
FieldName = 'bz'
Size = 200
end
end
object RMDesigner1: TRMDesigner
HelpFile = 'help.hlp'
DesignerRestrictions = []
Left = 72
Top = 184
end
object DataSource3: TDataSource
DataSet = ADOTable5
Left = 64
Top = 24
end
object RMDADOComponents1: TRMDADOComponents
Left = 360
Top = 8
end
object OpenDialog1: TOpenDialog
Filter = '報表文件(*.rmf)|*.rmf|所有文件|*.*'
Left = 392
Top = 8
end
object RMAngledLabelObject1: TRMAngledLabelObject
Left = 16
Top = 104
end
object RMOLEObject1: TRMOLEObject
Left = 48
Top = 104
end
object RMGridObject1: TRMGridObject
Left = 80
Top = 104
end
object RMRichObject1: TRMRichObject
Left = 112
Top = 104
end
object RMCheckBoxObject1: TRMCheckBoxObject
Left = 144
Top = 104
end
object RMShapeObject1: TRMShapeObject
Left = 176
Top = 104
end
object RMBarCodeObject1: TRMBarCodeObject
Left = 208
Top = 104
end
object RMRoundRectObject1: TRMRoundRectObject
Left = 240
Top = 104
end
object RMCrossObject1: TRMCrossObject
Left = 272
Top = 104
end
object RMDBChartObject1: TRMDBChartObject
Left = 16
Top = 136
end
object RMTextExport1: TRMTextExport
ScaleX = 1
ScaleY = 1
Left = 48
Top = 136
end
object RMRTFExport1: TRMRTFExport
ExportImageFormat = ifJPG
Left = 80
Top = 136
end
object RMCSVExport1: TRMCSVExport
ScaleX = 1
ScaleY = 1
Delimiter = ';'
Left = 112
Top = 136
end
object RMHTMExport1: TRMHTMExport
LinkTextFirst = '第一頁'
LinkTextNext = '下一頁'
LinkTextPrev = '上一頁'
LinkTextLast = '最后一頁'
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -24
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
CreateMHTFile = False
Left = 144
Top = 136
end
object RMEMFExport1: TRMEMFExport
ScaleX = 1
ScaleY = 1
Left = 176
Top = 136
end
object RMWMFExport1: TRMWMFExport
ScaleX = 1
ScaleY = 1
Left = 208
Top = 136
end
object RMBMPExport1: TRMBMPExport
ScaleX = 1
ScaleY = 1
Left = 240
Top = 136
end
object RMJPEGExport1: TRMJPEGExport
ScaleX = 1
ScaleY = 1
Left = 272
Top = 136
end
object RMPDFExport1: TRMPDFExport
PixelFormat = pf8bit
ExportImageFormat = ifJPG
Left = 304
Top = 136
end
object RMDialogControls1: TRMDialogControls
Left = 304
Top = 104
end
object RMReport1: TRMReport
SaveReportOptions.UseRegistry = True
SaveReportOptions.RegistryPath = 'ReportMachine\ReportSettings\'
InitialZoom = pzDefault
ModifyPrepared = False
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS]
Left = 8
Top = 184
ReportForm = {2B000000}
end
object RMDBDataSet1: TRMDBDataSet
DataSet = ADOQuery2
Left = 40
Top = 184
end
object DataSource1: TDataSource
DataSet = ADOQuery2
Left = 272
Top = 184
end
object ADOTable5: TADOTable
Active = True
Connection = MainForm.ADOConnection1
CursorType = ctStatic
Filtered = True
TableName = 'REPORT'
Left = 96
Top = 24
object ADOTable5rplx: TStringField
DisplayLabel = '報表類型'
FieldName = 'rplx'
Size = 50
end
object ADOTable5rpname: TStringField
DisplayLabel = '報表名稱'
FieldName = 'rpname'
Size = 50
end
object ADOTable5id: TAutoIncField
FieldName = 'id'
ReadOnly = True
end
object ADOTable5rpdata: TBlobField
FieldName = 'rpdata'
BlobType = ftBlob
end
end
object ADOTable6: TADOTable
Active = True
Connection = MainForm.ADOConnection1
CursorType = ctStatic
IndexFieldNames = 'code'
MasterFields = 'ck'
MasterSource = DataSource2
TableName = 'CKDA'
Left = 112
Top = 208
object ADOTable6code: TStringField
FieldName = 'code'
Size = 5
end
object ADOTable6name: TStringField
FieldName = 'name'
Size = 200
end
object ADOTable6dz: TStringField
FieldName = 'dz'
Size = 200
end
object ADOTable6dh: TStringField
FieldName = 'dh'
Size = 50
end
object ADOTable6cz: TStringField
FieldName = 'cz'
Size = 50
end
object ADOTable6lxr: TStringField
FieldName = 'lxr'
Size = 50
end
object ADOTable6bz: TStringField
FieldName = 'bz'
Size = 200
end
end
object ADOQuery2: TADOQuery
Connection = MainForm.ADOConnection1
Parameters = <>
Left = 256
Top = 184
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -