materiel_need.dfm

该系统主要用于生产采购系统

inherited Materiel_NeedFrm: TMateriel_NeedFrm
  Tag = 2
  Left = 69
  Top = 238
  Width = 610
  Height = 448
  Caption = #29289#26009#38656#27714#35745#21010
  OldCreateOrder = True
  Position = poScreenCenter
  WindowState = wsMaximized
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel [0]
    Left = 76
    Top = 56
    Width = 72
    Height = 12
    Caption = #35745#21010#29983#25104#26085#26399
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel [1]
    Left = 252
    Top = 56
    Width = 36
    Height = 12
    Caption = #20973#35777#21495
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel [2]
    Left = 387
    Top = 56
    Width = 48
    Height = 12
    Caption = #21407#20973#35777#21495
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel [3]
    Left = 216
    Top = 84
    Width = 180
    Height = 12
    Caption = #26410#29983#25104#29289#26009#38656#27714#35745#21010#30340#29983#20135#35745#21010#21333
    Color = clMoneyGreen
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  inherited ToolBar1: TToolBar
    Width = 602
    inherited ToolButton1: TToolButton
      OnClick = ToolButton1Click
    end
    inherited ToolButton2: TToolButton
      Visible = False
    end
    inherited ToolButton3: TToolButton
      Visible = False
      OnClick = ToolButton3Click
    end
    inherited ToolButton4: TToolButton
      OnClick = ToolButton4Click
    end
    inherited ToolButton5: TToolButton
      OnClick = ToolButton5Click
    end
  end
  object DateTimePicker1: TDateTimePicker [5]
    Left = 153
    Top = 53
    Width = 81
    Height = 21
    Date = 37894.399308113430000000
    Time = 37894.399308113430000000
    TabOrder = 1
    OnCloseUp = DateTimePicker1CloseUp
  end
  object Panel1: TPanel [6]
    Left = 0
    Top = 97
    Width = 601
    Height = 128
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 2
    object DBGrid1: TDBGrid
      Left = 2
      Top = 2
      Width = 597
      Height = 124
      Align = alClient
      DataSource = DM.AQ_SchemeDS
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Options = [dgEditing, dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'Scheme_Time'
          Title.Caption = #35745#21010#26085#26399
          Width = 68
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Credence_ID'
          Title.Caption = #20973#35777#21495
          Width = 91
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Department_Name'
          Title.Caption = #29983#20135#37096#38376
          Width = 68
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Product_Name'
          Title.Caption = #20135#21697#21517#31216
          Width = 67
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Product_ID'
          Title.Caption = #20135#21697#32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Product_Standard'
          Title.Caption = #20135#21697#35268#26684
          Width = 62
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Product_Unit'
          Title.Caption = #35745#37327#21333#20301
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Scheme_Num'
          Title.Caption = #35745#21010#25237#20135#25968#37327
          Visible = True
        end>
    end
  end
  object BitBtn1: TBitBtn [7]
    Left = 200
    Top = 240
    Width = 137
    Height = 25
    Caption = #29983#25104#29289#26009#38656#27714#35745#21010
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
      73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
      0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
      0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
      0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
      0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
      0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
      0333337F777777737F333308888888880333337F333333337F33330888888888
      03333373FFFFFFFF733333700000000073333337777777773333}
    NumGlyphs = 2
  end
  object Panel2: TPanel [8]
    Left = 0
    Top = 264
    Width = 601
    Height = 153
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 4
    object Materiel_NeedSG: TStringGrid
      Left = 2
      Top = 2
      Width = 597
      Height = 149
      Align = alClient
      ColCount = 6
      DefaultColWidth = 75
      DefaultRowHeight = 20
      FixedCols = 0
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
  end
  object Edit1: TEdit [9]
    Left = 292
    Top = 50
    Width = 82
    Height = 21
    TabOrder = 5
  end
  object Edit2: TEdit [10]
    Left = 440
    Top = 52
    Width = 82
    Height = 21
    TabOrder = 6
  end
  inherited ImageList1: TImageList
    Left = 472
    Top = 16
  end
end