ustatextra.dfm

来自「成本系统三层结构源码 开发工具：Delphi 7.0+SQLServer 20」· DFM 代码 · 共 57 行

inherited fmStatExtra: TfmStatExtra
  Caption = #26434#39033#26126#32454#32479#35745
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  inherited OptionPanel: TPanel
    Visible = True
    inherited PnlProject: TPanel
      Visible = False
    end
    inherited PnlDate: TPanel
      Visible = True
      inherited LblEnd: TLabel
        Visible = True
      end
    end
    inherited PnlSelect: TPanel
      Visible = True
      inherited dxBtnSelect: TdxButtonEdit
        OnButtonClick = dxBtnSelectButtonClick
        StoredValues = 2
        ExistButtons = True
      end
    end
  end
  inherited PageControl: TPageControl
    inherited TabBrowse: TTabSheet
      inherited DBGrid1: TdxDBGrid
        Filter.Criteria = {00000000}
        object ColumnAA1: TdxDBGridMaskColumn
          Caption = #20808#35774#23450#19994#21153#26085#26399#33539#22260
          Width = 123
          BandIndex = 0
          RowIndex = 0
        end
        object ColumnBB2: TdxDBGridColumn
          Caption = #20877#35774#23450#36807#28388#39033
          Width = 143
          BandIndex = 1
          RowIndex = 0
        end
      end
    end
  end
  inherited DataSource1: TDataSource
    DataSet = DMCost.CStatExtra
  end
  inherited SubAction: TActionList
    inherited AApprove: TAction
      OnExecute = AApproveExecute
    end
    inherited AConfirm: TAction
      Visible = False
    end
  end
end