unit1.dfm

Crlab公司用来连接MySQL数据库的控件

    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Default'
    ReportOptions.CreateDate = 37871.996156840300000000
    ReportOptions.Description.Strings = (
      'Demonstrates how to create Master/Detail MyDAC report.')
    ReportOptions.LastChange = 38243.741283449090000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'begin'
      ''
      'end.')
    Left = 136
    Top = 176
    Datasets = <
      item
        DataSet = ReportData.DeptDS
        DataSetName = 'Dept'
      end
      item
        DataSet = ReportData.EmpDS
        DataSetName = 'Emp'
      end>
    Variables = <>
    Style = <>
    object Page1: TfrxReportPage
      PaperWidth = 210.000000000000000000
      PaperHeight = 297.000000000000000000
      PaperSize = 9
      LeftMargin = 5.000000000000000000
      RightMargin = 5.000000000000000000
      TopMargin = 5.000000000000000000
      BottomMargin = 5.000000000000000000
      Columns = 1
      ColumnWidth = 210.000000000000000000
      ColumnPositions.Strings = (
        '0')
      PrintOnPreviousPage = True
      object Band1: TfrxPageFooter
        Height = 22.677180000000000000
        Top = 298.582870000000000000
        Width = 755.906000000000000000
        object Memo5: TfrxMemoView
          Left = 3.779530000000000000
          Top = 3.779530000000022000
          Width = 706.772110000000000000
          Height = 15.118120000000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = []
          Frame.Typ = [ftTop]
          Frame.Width = 2.000000000000000000
          HAlign = haRight
          Memo.Strings = (
            '[Page#]')
          ParentFont = False
        end
      end
      object Band2: TfrxReportTitle
        Height = 26.456710000000000000
        Top = 18.897650000000000000
        Width = 755.906000000000000000
        object Memo6: TfrxMemoView
          Left = 3.779530000000000000
          Top = 3.779530000000001000
          Width = 706.772110000000000000
          Height = 18.897650000000000000
          Color = clTeal
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -16
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.Strings = (
            'Dept')
          ParentFont = False
          VAlign = vaBottom
        end
      end
      object Band3: TfrxPageHeader
        Height = 22.677180000000000000
        Top = 68.031540000000010000
        Width = 755.906000000000000000
        object Memo22: TfrxMemoView
          Left = 3.779530000000000000
          Top = 3.779529999999994000
          Width = 706.772110000000000000
          Height = 15.118120000000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          Frame.Typ = [ftTop]
          Frame.Width = 2.000000000000000000
          ParentFont = False
        end
      end
      object Band4: TfrxMasterData
        Height = 45.354360000000000000
        Top = 151.181200000000000000
        Width = 755.906000000000000000
        Columns = 1
        ColumnWidth = 200.000000000000000000
        ColumnGap = 20.000000000000000000
        DataSet = ReportData.DeptDS
        DataSetName = 'Dept'
        RowCount = 0
        object Memo23: TfrxMemoView
          Left = 11.338590000000000000
          Width = 113.385826771654000000
          Height = 18.897650000000000000
          Color = clNavy
          DataSet = ReportData.DeptDS
          DataSetName = 'Dept'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Frame.Typ = [ftTop]
          Memo.Strings = (
            'No')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo24: TfrxMemoView
          Left = 11.338590000000000000
          Top = 18.897650000000000000
          Width = 113.385826771654000000
          Height = 26.456710000000000000
          Color = clNavy
          DataField = 'DEPTNO'
          DataSet = ReportData.DeptDS
          DataSetName = 'Dept'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -19
          Font.Name = 'Arial'
          Font.Style = [fsItalic]
          Memo.Strings = (
            'Dept.DeptNo')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo25: TfrxMemoView
          Left = 124.724409450000000000
          Width = 302.362204720000000000
          Height = 18.897650000000000000
          Color = clNavy
          DataSet = ReportData.DeptDS
          DataSetName = 'Dept'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Frame.Typ = [ftTop]
          Memo.Strings = (
            'Name')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo26: TfrxMemoView
          Left = 427.086614173228000000
          Width = 162.519790000000000000
          Height = 18.897650000000000000
          Color = clNavy
          DataSet = ReportData.DeptDS
          DataSetName = 'Dept'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Frame.Typ = [ftTop]
          Memo.Strings = (
            'Location')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo27: TfrxMemoView
          Left = 124.724409450000000000
          Top = 18.897650000000000000
          Width = 302.362204724409000000
          Height = 26.456710000000000000
          Color = clNavy
          DataField = 'DNAME'
          DataSet = ReportData.DeptDS
          DataSetName = 'Dept'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -19
          Font.Name = 'Arial'
          Font.Style = [fsItalic]
          Memo.Strings = (
            'Dept.DName')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo28: TfrxMemoView
          Left = 427.086614170000000000
          Top = 18.897650000000000000
          Width = 162.519790000000000000
          Height = 26.456710000000000000
          Color = clNavy
          DataField = 'LOC'
          DataSet = ReportData.DeptDS
          DataSetName = 'Dept'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -19
          Font.Name = 'Arial'
          Font.Style = [fsItalic]
          Memo.Strings = (
            'Dept.Loc')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo29: TfrxMemoView
          Left = 589.606299212598000000
          Width = 120.944881889764000000
          Height = 45.354360000000000000
          Color = clNavy
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -19
          Font.Name = 'Arial'
          Font.Style = [fsBold, fsItalic]
          Frame.Typ = [ftRight, ftTop]
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo7: TfrxMemoView
          Left = 3.779530000000000000
          Width = 7.559060000000000000
          Height = 45.354360000000000000
          Color = clNavy
          Font.Charset = DEFAULT_CHARSET