ucostinitial.dfm

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

inherited fmCostInitial: TfmCostInitial
  Caption = #26399#21021#25104#26412#20449#24687
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  inherited OptionPanel: TPanel
    Visible = True
    inherited PnlProject: TPanel
      Visible = False
    end
    inherited PnlDate: TPanel
      Visible = True
      inherited LbLStart: TLabel
        Caption = #23553#24080#26085#26399
      end
      inherited LblEnd: TLabel
        Visible = False
      end
      inherited DateTo: TwwDBDateTimePicker
        Visible = False
      end
      inherited DateFrm: TwwDBDateTimePicker
        Width = 92
        DataField = 'StartDate'
        DataSource = DataSource2
        Enabled = False
        ReadOnly = True
        DisplayFormat = 'YYYY'#24180'MM'#26376
      end
      object StaticText1: TStaticText
        Left = 157
        Top = 2
        Width = 50
        Height = 20
        AutoSize = False
        BevelKind = bkSoft
        BevelOuter = bvSpace
        BorderStyle = sbsSingle
        Caption = #23553#24080#21542'?'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        Transparent = False
      end
    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
        KeyField = 'OrderNO'
        OnKeyDown = DBGrid1KeyDown
        Filter.Criteria = {00000000}
      end
    end
  end
  inherited ToolBar1: TToolBar
    inherited TBTemp: TToolButton
      DropdownMenu = Menu3
      Enabled = True
      Visible = True
      OnClick = TBTempClick
    end
  end
  inherited DataSource1: TDataSource
    DataSet = DMCost.CCostInitial
  end
  inherited SubAction: TActionList
    inherited AApprove: TAction
      Caption = #23553#24080
      OnExecute = AApproveExecute
    end
    inherited AConfirm: TAction
      Caption = #35299#24080
      OnExecute = AConfirmExecute
    end
  end
  object DataSource2: TDataSource [5]
    DataSet = DMSys.CSysConfig
    Left = 163
    Top = 150
  end
  inherited Menu3: TPopupMenu
    inherited Grid: TMenuItem
      OnClick = nil
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object N3: TMenuItem
      Caption = #35013#36733#25152#26377#40664#35748#35746#21333
      OnClick = N3Click
    end
    object N4: TMenuItem
      Caption = #21024#38500#38646#25104#26412#30340#35746#21333
    end
    object N5: TMenuItem
      Caption = #20445#23384#36164#26009
      OnClick = N5Click
    end
  end
end