ap_qry_subap.dfm

来自「一个MRPII系统源代码版本」· DFM 代码 · 共 160 行

inherited Frm_Ap_Qry_SubAp: TFrm_Ap_Qry_SubAp
  Left = 3
  Top = 139
  Caption = '供应商应付帐款帐龄段分析'
  FormStyle = fsMDIChild
  Visible = True
  Windowstate = wsMaximized
  OnClose = FormClose
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  inherited ControlBar: TControlBar
    inherited ToolBar: TToolBar
      Width = 115
      object ToolButton1: TToolButton
        Left = 23
        Top = 0
        Action = Act_Filter
      end
      object ToolButton4: TToolButton
        Left = 46
        Top = 0
        Action = Act_Preview
      end
      object ToolButton3: TToolButton
        Left = 69
        Top = 0
        Action = Act_Print
      end
      object ToolButton2: TToolButton
        Left = 92
        Top = 0
        Action = Act_Quit
      end
    end
  end
  inherited Pnl_Title: TPanel
    Caption = '供应商应付帐款帐龄段分析'
  end
  inherited Pnl_Head: TPanel
    object Lbl_include1: TLabel
      Left = 11
      Top = 4
      Width = 120
      Height = 12
      Caption = '是否包含未票应付款：'
    end
    object Lbl_include: TLabel
      Left = 130
      Top = 4
      Width = 66
      Height = 12
      Caption = 'Lbl_include'
    end
  end
  inherited Pnl_Hint: TPanel
    Top = 426
    Height = 17
    inherited Image4: TImage
      Height = 17
    end
  end
  inherited Pnl_Body: TPanel
    Height = 337
    inherited Image3: TImage
      Height = 337
    end
    object DBGridEh: TDBGridEh
      Left = 0
      Top = 0
      Width = 1016
      Height = 337
      Align = alClient
      DataSource = DataSource_Main
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.ChArset = GB2312_CHArSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      FrozenCols = 2
      OnGetCellParams = DBGridEhGetCellParams
    end
  end
  inherited AdoQry_Tmp: TAdoQuery
    Left = 248
    Top = 160
  end
  inherited ActionList: TActionList
    Left = 240
    Top = 320
    inherited Act_Filter: TAction
      OnExecute = Act_FilterExecute
    end
    inherited Act_Print: TAction
      OnExecute = Act_PrintExecute
    end
    inherited Act_Preview: TAction
      OnExecute = Act_PreviewExecute
    end
  end
  object AdoQry_Main: TAdoQuery
    AfterOpen = AdoQueryAfterOpen
    EnableBCD = False
    Parameters = <>
    Left = 120
    Top = 161
  end
  object DataSource_Main: TDataSource
    DataSet = AdoQry_Main
    OnDataChange = DataSource_MainDataChange
    Left = 152
    Top = 161
  end
  object AdoQry_tmp2: TAdoQuery
    EnableBCD = False
    Parameters = <>
    Left = 368
    Top = 160
  end
  object ExtPrintReport: TExtPrintReport
    TopBOrdermm = 20
    BottomBOrdermm = 20
    LeftBOrdermm = 10
    RightBOrdermm = 10
    TitleFont.ChArset = DEFAULT_CHArSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -19
    TitleFont.Name = '宋体'
    TitleFont.Style = [fsBold]
    SubtitleFont.ChArset = DEFAULT_CHArSET
    SubtitleFont.Color = clWindowText
    SubtitleFont.Height = -13
    SubtitleFont.Name = '宋体'
    SubtitleFont.Style = [fsBold]
    ReportFont.ChArset = DEFAULT_CHArSET
    ReportFont.Color = clWindowText
    ReportFont.Height = -13
    ReportFont.Name = '宋体'
    ReportFont.Style = []
    FootFont.ChArset = DEFAULT_CHArSET
    FootFont.Color = clWindowText
    FootFont.Height = -13
    FootFont.Name = '宋体'
    FootFont.Style = [fsBold]
    NeedLine = False
    SumPerPage = True
    SumTotal = True
    PAperSet = [ptA3, ptA4, ptB4, ptB5, ptNArrow, ptWide]
    PAperOrientation = poPortrait
    ShowPrintRange = True
    PAperType = ptA4
    HeaderGroups = <>
    Headers = <>
    Left = 104
    Top = 209
  end
end