mmaterialmanage.~dfm

来自「这也是师兄的毕业设计,具体的功能我也不清楚,因为我才大一,请见谅!!!!!!!不」· ~DFM 代码 · 共 92 行

inherited F_MaterialManage: TF_MaterialManage
  Left = 260
  Top = 189
  Caption = #29289#26009#20027#26723#31649#29702
  PixelsPerInch = 96
  TextHeight = 13
  inherited palUp: TPanel
    inherited palLeftUp: TPanel
      inherited imgSysIcon: TImage
        OnMouseDown = nil
      end
    end
    inherited palRightUp: TPanel
      inherited imgCloseButton: TImage
        OnClick = nil
      end
      inherited imgMinButton: TImage
        OnClick = nil
      end
      inherited imgSizeButton: TImage
        OnClick = nil
      end
    end
    inherited palUpMid: TPanel
      inherited imgCaption: TImage
        OnMouseDown = nil
        OnMouseMove = nil
        OnMouseUp = nil
      end
      inherited lbCaption: TLabel
        OnMouseDown = nil
        OnMouseMove = nil
        OnMouseUp = nil
      end
    end
  end
  inherited palDown: TPanel
    Top = 353
  end
  inherited palLeft: TPanel
    Height = 238
    inherited imgLeft: TImage
      Height = 238
    end
  end
  inherited palRight: TPanel
    Height = 238
    inherited imgRight: TImage
      Height = 238
    end
  end
  inherited palToolbar: TPanel
    inherited tiNew: TTradeImg
      OnClick = tiNewClick
    end
  end
  object DBGrid1: TDBGrid [5]
    Left = 8
    Top = 128
    Width = 513
    Height = 225
    DataSource = dm.d_materialmanager
    TabOrder = 5
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  inherited popSystemMenu: TPopupMenu
    OnPopup = nil
    inherited N_Restore: TMenuItem
      OnClick = nil
    end
    inherited N_Move: TMenuItem
      OnClick = nil
    end
    inherited N_Size: TMenuItem
      OnClick = nil
    end
    inherited N_Min: TMenuItem
      OnClick = nil
    end
    inherited N_Max: TMenuItem
      OnClick = nil
    end
    inherited N_Close: TMenuItem
      OnClick = nil
    end
  end
end