📄 dyckdd1.dfm
字号:
MasterSource = DataSource2
TableName = 'RYDA'
Left = 136
Top = 184
object ADOTable2code: TStringField
FieldName = 'code'
Size = 5
end
object ADOTable2name: TStringField
FieldName = 'name'
Size = 10
end
object ADOTable2bm: TStringField
FieldName = 'bm'
Size = 50
end
object ADOTable2xb: TStringField
FieldName = 'xb'
Size = 4
end
object ADOTable2dh: TStringField
FieldName = 'dh'
Size = 50
end
object ADOTable2bz: TStringField
FieldName = 'bz'
Size = 200
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
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
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 ADOQuery2: TADOQuery
Connection = MainForm.ADOConnection1
Parameters = <>
Left = 256
Top = 184
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -