previewform.~dfm

一个电力企业的后台管理程序

      object ToolbarSep976: TToolbarSep97
        Left = 223
        Top = 0
        Blank = True
      end
      object ToolbarSep977: TToolbarSep97
        Left = 326
        Top = 0
        Blank = True
      end
      object ToolbarSep978: TToolbarSep97
        Left = 387
        Top = 0
        Blank = True
      end
      object mskPreviewPage: TMaskEdit
        Left = 186
        Top = 0
        Width = 37
        Height = 21
        TabStop = False
        AutoSelect = False
        EditMask = '99999;0; '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = '中文之星智能狂拼'
        MaxLength = 5
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnKeyPress = mskPreviewPageKeyPress
      end
      object mskPreviewPercentage: TMaskEdit
        Left = 283
        Top = 0
        Width = 37
        Height = 21
        TabStop = False
        AutoSelect = False
        EditMask = '999\ %;0; '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = '中文之星智能狂拼'
        MaxLength = 5
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnKeyPress = mskPreviewPercentageKeyPress
      end
    end
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 117
    Top = 51
  end
  object ActionList1: TActionList
    Left = 39
    Top = 51
    object actn_View_Toolbars_bill: TAction
      Category = 'View'
      Caption = 'actn_View_Toolbars_bill'
      OnExecute = actn_View_Toolbars_billExecute
    end
  end
  object pprp_main: TppReport
    AutoStop = False
    DataPipeline = ppdbp_main
    PrinterSetup.BinName = 'Default'
    PrinterSetup.DocumentName = 'Report'
    PrinterSetup.PaperName = '信纸'
    PrinterSetup.PrinterName = 'Default'
    PrinterSetup.mmMarginBottom = 6350
    PrinterSetup.mmMarginLeft = 6350
    PrinterSetup.mmMarginRight = 6350
    PrinterSetup.mmMarginTop = 6350
    PrinterSetup.mmPaperHeight = 279401
    PrinterSetup.mmPaperWidth = 215900
    Template.DatabaseSettings.DataPipeline = ppdbp_main
    Template.DatabaseSettings.NameField = 'TotalCount'
    Template.DatabaseSettings.TemplateField = 'TotalCount'
    Template.FileName = 'D:\bak\Ecsc_Program\DM\REPORTMOD\CLIENTELECASKCOUNT.rtm'
    Template.Format = ftASCII
    UserName = 'Report'
    DeviceType = 'Screen'
    Left = 98
    Top = 156
    Version = '5.0'
    mmColumnWidth = 0
    object ppHeaderBand1: TppHeaderBand
      mmBottomOffset = 0
      mmHeight = 24606
      mmPrintPosition = 0
      object ppShape1: TppShape
        UserName = 'Shape1'
        Shape = stRoundRect
        mmHeight = 13229
        mmLeft = 53711
        mmTop = 0
        mmWidth = 94986
        BandType = 0
      end
      object ppLabel1: TppLabel
        UserName = 'Label1'
        Caption = '用电申请处理报表'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 18
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 7673
        mmLeft = 82286
        mmTop = 3440
        mmWidth = 52917
        BandType = 0
      end
      object ppLabel2: TppLabel
        UserName = 'Label2'
        Caption = '用电处理部门'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        Transparent = True
        mmHeight = 4763
        mmLeft = 12965
        mmTop = 17463
        mmWidth = 25400
        BandType = 0
      end
      object ppLabel3: TppLabel
        UserName = 'Label3'
        Caption = '未处理数'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        Transparent = True
        mmHeight = 4763
        mmLeft = 60854
        mmTop = 16933
        mmWidth = 16933
        BandType = 0
      end
      object ppLabel4: TppLabel
        UserName = 'Label4'
        Caption = '及时处理数'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        Transparent = True
        mmHeight = 4763
        mmLeft = 96309
        mmTop = 16140
        mmWidth = 21167
        BandType = 0
      end
      object ppLabel5: TppLabel
        UserName = 'Label5'
        Caption = '超期处理数'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        Transparent = True
        mmHeight = 4763
        mmLeft = 135202
        mmTop = 16669
        mmWidth = 21167
        BandType = 0
      end
      object ppLabel6: TppLabel
        UserName = 'Label6'
        Caption = '总数'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        Transparent = True
        mmHeight = 4763
        mmLeft = 179123
        mmTop = 17198
        mmWidth = 8467
        BandType = 0
      end
    end
    object ppDetailBand1: TppDetailBand
      mmBottomOffset = 0
      mmHeight = 5821
      mmPrintPosition = 0
      object ppShape2: TppShape
        UserName = 'Shape2'
        ParentHeight = True
        mmHeight = 5821
        mmLeft = 0
        mmTop = 0
        mmWidth = 51329
        BandType = 4
      end
      object ppShape5: TppShape
        UserName = 'Shape5'
        ParentHeight = True
        mmHeight = 5821
        mmLeft = 51329
        mmTop = 0
        mmWidth = 37571
        BandType = 4
      end
      object ppShape3: TppShape
        UserName = 'Shape3'
        ParentHeight = True
        mmHeight = 5821
        mmLeft = 88900
        mmTop = 0
        mmWidth = 38894
        BandType = 4
      end
      object ppShape4: TppShape
        UserName = 'Shape4'
        ParentHeight = True
        mmHeight = 5821
        mmLeft = 127794
        mmTop = 0
        mmWidth = 38629
        BandType = 4
      end
      object ppDBText1: TppDBText
        UserName = 'DBText1'
        DataField = 'TYPENAME'
        DataPipeline = ppdbp_main
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        ParentDataPipeline = False
        Transparent = True
        mmHeight = 5292
        mmLeft = 265
        mmTop = 265
        mmWidth = 50800
        BandType = 4
      end
      object ppShape6: TppShape
        UserName = 'Shape6'
        ParentHeight = True
        mmHeight = 5821
        mmLeft = 166423
        mmTop = 0
        mmWidth = 35719
        BandType = 4
      end
      object AskNot: TppVariable
        UserName = 'AskNot'
        Alignment = taCenter
        CalcOrder = 0
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        OnCalc = AskNotCalc
        Transparent = True
        mmHeight = 4763
        mmLeft = 63500
        mmTop = 529
        mmWidth = 13494
        BandType = 4
      end
      object AskIntime: TppVariable
        UserName = 'AskIntime'
        Alignment = taCenter
        CalcOrder = 1
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        OnCalc = AskIntimeCalc
        Transparent = True
        mmHeight = 4763
        mmLeft = 99219
        mmTop = 529
        mmWidth = 17992
        BandType = 4
      end
      object AskOverTime: TppVariable
        UserName = 'AskOverTime'
        Alignment = taCenter
        CalcOrder = 2
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        OnCalc = AskOverTimeCalc
        Transparent = True
        mmHeight = 4763
        mmLeft = 133879
        mmTop = 529
        mmWidth = 25135
        BandType = 4
      end
      object AskAllCount: TppVariable
        UserName = 'AskAllCount'
        Alignment = taCenter
        CalcOrder = 3
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 12
        Font.Style = []
        OnCalc = AskAllCountCalc
        Transparent = True
        mmHeight = 4763
        mmLeft = 172773
        mmTop = 529
        mmWidth = 22490
        BandType = 4
      end
    end
    object ppFooterBand1: TppFooterBand
      mmBottomOffset = 0
      mmHeight = 13229
      mmPrintPosition = 0
    end
  end
  object ppdbp_main: TppDBPipeline
    DataSource = wwds_Main
    MasterDataPipeline = ppdbp_subDetail
    UserName = 'dbp_main'
    Left = 171
    Top = 156
  end
  object wwds_Main: TwwDataSource
    DataSet = Qr_Report
    Left = 43
    Top = 107
  end
  object ppDgn_Main: TppDesigner
    Caption = 'ReportBuilder'
    Position = poScreenCenter
    DataSettings.SessionType = 'BDESession'
    DataSettings.AllowEditSQL = False
    DataSettings.SQLType = sqBDELocal
    Report = pprp_main
    WindowHeight = 400
    WindowLeft = 100
    WindowTop = 50
    WindowWidth = 600
    Left = 32
    Top = 160
  end
  object wwDs_Detail: TwwDataSource
    DataSet = Qr_DetailReport
    Left = 105
    Top = 104
  end
  object wwDs_SubDetail: TwwDataSource
    DataSet = Qr_SubDetailReport
    Left = 182
    Top = 104
  end
  object Qr_Report: TQuery
    DatabaseName = 'DbECSC'
    Constrained = True
    SQL.Strings = (
      'SELECT * FROM TEMPCOUNT ')
    Left = 254
    Top = 109
  end
  object Qr_DetailReport: TQuery
    DatabaseName = 'DBECSC'
    Left = 328
    Top = 103
  end
  object Qr_SubDetailReport: TQuery
    DatabaseName = 'DBECSC'
    Left = 425
    Top = 104
  end
  object ppdbp_Detail: TppDBPipeline
    UserName = 'dbp_Detail'
    Left = 238
    Top = 154
  end
  object ppdbp_subDetail: TppDBPipeline
    MasterDataPipeline = ppdbp_Detail
    UserName = 'dbp_subDetail'
    Left = 318
    Top = 158
  end
end