ustatcost.dfm

成本系统三层结构源码 开发工具：Delphi 7.0+SQLServer 2005 主要技术：Midas、COM+ 所用第三方控件： FastReport V2.47 D7 Inforp

inherited fmStatCost: TfmStatCost
  Caption = #35746#21333#24635#25104#26412
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited OptionPanel: TPanel
    Visible = True
    inherited PnlProject: TPanel
      Visible = False
    end
    inherited PnlMonth: TPanel
      Visible = True
    end
    inherited PnlSelect: TPanel
      Width = 275
      inherited dxBtnSelect: TdxButtonEdit
        StoredValues = 2
        ExistButtons = True
      end
    end
  end
  inherited PageControl: TPageControl
    inherited TabBrowse: TTabSheet
      inherited DBGrid1: TdxDBGrid
        OnDblClick = DBGrid1DblClick
        Filter.Criteria = {00000000}
      end
    end
    inherited TabReport: TTabSheet
      object dxDBGrid1: TdxDBGrid
        Left = 0
        Top = 0
        Width = 528
        Height = 252
        Bands = <
          item
            Caption = #24038#36793#37096#38376
            Fixed = bfLeft
          end
          item
            Caption = #20013#38388#37096#38376
          end
          item
            Caption = #21491#36793#37096#38376
            Visible = False
          end>
        DefaultLayout = False
        HeaderPanelRowCount = 1
        SummaryGroups = <>
        SummarySeparator = ', '
        Align = alClient
        TabOrder = 0
        OnDblClick = DBGrid1DblClick
        DataSource = DSCostDetail
        Filter.Criteria = {00000000}
        FixedBandLineColor = clRed
        GridLineColor = clBlue
        GroupPanelColor = 15451300
        GroupPanelFontColor = 8404992
        GroupNodeColor = 16247513
        HeaderColor = 16247513
        OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
        OnAddGroupColumn = DBGrid1AddGroupColumn
        OnHeaderButtonClick = DBGrid1HeaderButtonClick
        OnColumnClick = DBGrid1ColumnClick
      end
    end
  end
  inherited ToolBar1: TToolBar
    inherited TBApprove: TToolButton
      ImageIndex = 23
    end
    inherited TBConfirm: TToolButton
      ImageIndex = 14
    end
  end
  inherited DataSource1: TDataSource
    DataSet = DMCost.CStatCost
  end
  inherited SubAction: TActionList
    inherited AApprove: TAction
      Caption = #26126#32454
      Visible = False
      OnExecute = AApproveExecute
    end
    inherited AConfirm: TAction
      OnExecute = AConfirmExecute
    end
  end
  object DSCostDetail: TDataSource [5]
    DataSet = DMCost.CCostDetail
    Left = 164
    Top = 150
  end
  inherited Menu3: TPopupMenu
    inherited Grid: TMenuItem
      OnClick = nil
    end
  end
end