object ADOTable3: TADOTable
    Active = True
    Connection = MainForm.ADOConnection1
    CursorType = ctStatic
    IndexFieldNames = 'code'
    MasterFields = 'ghs'
    MasterSource = DataSource2
    TableName = 'GHSDA'
    Left = 144
    Top = 184
    object ADOTable3code: TStringField
      FieldName = 'code'
      Size = 5
    end
    object ADOTable3name: TStringField
      FieldName = 'name'
      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 ADOTable4suilu: TBCDField
      FieldName = 'suilu'
      Precision = 18
      Size = 0
    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 ADOQuery2: TADOQuery
    Connection = MainForm.ADOConnection1
    Parameters = <>
    Left = 256
    Top = 184
  end
end