main.dfm

地址档案管理系统

      end
      object N23: TMenuItem
        Tag = 28
        Caption = #32493#20511#30331#35760
        OnClick = miDJDAClick
      end
      object N24: TMenuItem
        Tag = 29
        Caption = #24402#36824#30331#35760
        OnClick = miDJDAClick
      end
      object N25: TMenuItem
        Tag = 30
        Caption = #20511#38405#26723#26696#20652#36824
        OnClick = N25Click
      end
      object N26: TMenuItem
        Tag = 31
        Caption = #35835#32773#36164#26009#35774#23450
        OnClick = miDJDAClick
      end
    end
    object N2: TMenuItem
      Caption = '(&U)'#29992#25143
      object Y1: TMenuItem
        Caption = '(&D)'#30331#24405
        OnClick = Y1Click
      end
      object Y2: TMenuItem
        Caption = '(&Z)'#27880#38144
        Enabled = False
        OnClick = Y2Click
      end
      object Y3: TMenuItem
        Caption = '(&X)'#20462#25913#23494#30721
        Enabled = False
        OnClick = Y3Click
      end
      object Y4: TMenuItem
        Caption = '(&Q)'#26435#38480#35774#32622'('#31649#29702#21592#20351#29992')'
        Enabled = False
        OnClick = Y4Click
      end
    end
    object WinMgmt: TMenuItem
      Tag = -1
      Caption = '(&W)'#31383#21475
      object N44: TMenuItem
        Tag = -1
        Action = WindowCascade1
        Caption = '(&C)'#23618#21472
      end
      object N45: TMenuItem
        Tag = -1
        Action = WindowTileHorizontal1
        Caption = '(&H)'#27178#21521#24179#38138
      end
      object N46: TMenuItem
        Tag = -1
        Action = WindowTileVertical1
        Caption = '(&Z)'#32437#21521#24179#38138
      end
      object N47: TMenuItem
        Tag = -1
        Action = WindowMinimizeAll1
        Caption = '(&Q)'#20840#37096#26368#23567#21270
      end
      object N48: TMenuItem
        Tag = -1
        Action = WindowArrangeAll1
        Caption = '(&P)'#25490#21015#24050#26368#23567#21270#30340#31383#21475
      end
    end
    object miAbout: TMenuItem
      Tag = -1
      Caption = '(A)'#20851#20110'..'
      SubMenuImages = ImageList1
      OnClick = miAboutClick
    end
  end
  object fr_zml_djda: TfrxReport
    DotMatrixReport = False
    EngineOptions.MaxMemSize = 10000000
    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 = 38280.848133854200000000
    ReportOptions.Description.Strings = (
      #21333#20117#26723#26696#24635#30446#24405)
    ReportOptions.Name = #21333#20117#26723#26696#24635#30446#24405
    ReportOptions.LastChange = 38294.592238310200000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'procedure Button1OnClick(Sender: TfrxComponent);'
      'begin'
      ''
      'end;'
      ''
      'begin'
      ''
      'end.')
    Left = 24
    Top = 64
    Datasets = <
      item
        DataSet = fr_zml_djda.ADOQuery1
        DataSetName = 'ADOQuery1'
      end>
    Variables = <>
    Style = <>
    object Page1: TfrxReportPage
      Orientation = poLandscape
      PaperWidth = 297.000000000000000000
      PaperHeight = 210.000000000000000000
      PaperSize = 9
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      object ReportTitle1: TfrxReportTitle
        Height = 41.574830000000000000
        Top = 18.897650000000000000
        Width = 1046.929810000000000000
        object Memo1: TfrxMemoView
          Left = 514.016080000000000000
          Width = 234.330860000000000000
          Height = 37.795300000000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -32
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          Memo.Strings = (
            #21333#20117#26723#26696#24635#30446#24405)
          ParentFont = False
        end
        object Memo3: TfrxMemoView
          Left = 340.157700000000000000
          Width = 166.299320000000000000
          Height = 37.795300000000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -32
          Font.Name = 'Arial'
          Font.Style = []
          Memo.Strings = (
            '[Edit2.Text]')
          ParentFont = False
        end
        object Line1: TfrxLineView
          Left = 238.110390000000000000
          Top = 18.897650000000000000
          Width = 79.370130000000000000
          Frame.Typ = [ftTop]
        end
        object Memo2: TfrxMemoView
          Left = 64.252010000000000000
          Width = 170.078850000000000000
          Height = 37.795300000000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -32
          Font.Name = 'Arial'
          Font.Style = []
          Memo.Strings = (
            '[Edit1.Text]')
          ParentFont = False
        end
      end
      object MasterData1: TfrxMasterData
        Height = 45.354360000000000000
        Top = 196.535560000000000000
        Width = 1046.929810000000000000
        DataSet = fr_zml_djda.ADOQuery1
        DataSetName = 'ADOQuery1'
        RowCount = 0
        object Memo4: TfrxMemoView
          Width = 71.811070000000000000
          Height = 18.897650000000000000
          DataField = #24402#26723#26085#26399
          DataSet = fr_zml_djda.ADOQuery1
          DataSetName = 'ADOQuery1'
          Memo.Strings = (
            '[ADOQuery1."'#24402#26723#26085#26399'"]')
        end
        object Memo6: TfrxMemoView
          Left = 71.811070000000000000
          Width = 79.370130000000000000
          Height = 18.897650000000000000
          DataSet = fr_zml_djda.ADOQuery1
          DataSetName = 'ADOQuery1'
          Memo.Strings = (
            '[ADOQuery1."'#26723#26696#21495'"]')
        end
        object Memo8: TfrxMemoView
          Left = 158.740260000000000000
          Width = 79.370130000000000000
          Height = 18.897650000000000000
          DataField = #20013#25991#26631#39064
          DataSet = fr_zml_djda.ADOQuery1
          DataSetName = 'ADOQuery1'
          Memo.Strings = (
            '[ADOQuery1."'#20013#25991#26631#39064'"]')
        end
        object Memo10: TfrxMemoView
          Left = 158.740260000000000000
          Top = 26.456709999999990000
          Width = 79.370130000000000000
          Height = 18.897650000000000000
          DataField = #33521#25991#26631#39064
          DataSet = fr_zml_djda.ADOQuery1
          DataSetName = 'ADOQuery1'
          Memo.Strings = (
            '[ADOQuery1."'#33521#25991#26631#39064'"]')
        end
        object Memo11: TfrxMemoView
          Left = 249.448980000000000000
          Width = 37.795300000000000000
          Height = 18.897650000000000000
          DataField = #22871#25968
          DataSet = fr_zml_djda.ADOQuery1
          DataSetName = 'ADOQuery1'
          Memo.Strings = (
            '[ADOQuery1."'#22871#25968'"]')
        end
        object Memo13: TfrxMemoView
          Left = 294.803340000000000000
          Width = 41.574830000000000000
          Height = 18.897650000000000000
          DataField = #25253#21578
          DataSet = fr_zml_djda.ADOQuery1
          DataSetName = 'ADOQuery1'
          Memo.Strings = (
            '[ADOQuery1."'#25253#21578'"]')
        end
        object Memo15: TfrxMemoView
          Left = 347.716760000000000000
          Width = 37.795300000000000000
          Height = 18.897650000000000000
          DataField = #38468#20214
          DataSet = fr_zml_djda.ADOQuery1
          DataSetName = 'ADOQuery1'
          Memo.Strings = (
            '[ADOQuery1."'#38468#20214'"]')
        end
        object Memo17: TfrxMemoView
          Left = 445.984540000000000000
          Width = 30.236240000000000000
          Height = 18.897650000000000000
          DataField = #38468#22270
          DataSet = fr_zml_djda.ADOQue