unitprodincard.dfm

此代码为企业原料管理代码

object frmProdInCard: TfrmProdInCard
  Left = 241
  Top = 205
  Width = 486
  Height = 183
  ActiveControl = dbeProdName
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = '宁波巨龙橡塑有限公司 成品仓库管理系统'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 12
  object Label2: TLabel
    Left = 155
    Top = 8
    Width = 79
    Height = 16
    Alignment = taCenter
    AutoSize = False
    Caption = '入库日期'
    Color = clYellow
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Label3: TLabel
    Left = 235
    Top = 8
    Width = 79
    Height = 16
    Alignment = taCenter
    AutoSize = False
    Caption = '入库单号'
    Color = clYellow
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object dbeDate: TDBEdit
    Left = 154
    Top = 25
    Width = 77
    Height = 17
    AutoSize = False
    BorderStyle = bsNone
    Color = clBlue
    DataField = 'InDate'
    DataSource = DM.dsProdInCard
    Font.Charset = GB2312_CHARSET
    Font.Color = clYellow
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 6
    OnEnter = dbeDateEnter
  end
  object Panel1: TPanel
    Left = 13
    Top = 52
    Width = 348
    Height = 91
    BevelInner = bvLowered
    BevelWidth = 2
    BorderStyle = bsSingle
    TabOrder = 0
    TabStop = True
    object Panel7: TPanel
      Left = 152
      Top = 4
      Width = 91
      Height = 20
      Caption = '入库数量'
      TabOrder = 5
    end
    object Panel9: TPanel
      Left = 4
      Top = 4
      Width = 147
      Height = 19
      Caption = '产品名称'
      TabOrder = 6
    end
    object Panel10: TPanel
      Left = 152
      Top = 43
      Width = 72
      Height = 20
      Caption = '检验员'
      TabOrder = 7
    end
    object Panel17: TPanel
      Left = 224
      Top = 43
      Width = 116
      Height = 20
      Caption = '备注'
      TabOrder = 8
    end
    object dbeNote: TDBEdit
      Left = 225
      Top = 62
      Width = 115
      Height = 23
      AutoSize = False
      DataField = 'Note'
      DataSource = DM.dsProdInCard
      TabOrder = 4
      OnEnter = dbeProdNameEnter
      OnExit = dbeProdNameExit
    end
    object dbeNum: TDBEdit
      Left = 152
      Top = 24
      Width = 92
      Height = 20
      DataField = 'Number'
      DataSource = DM.dsProdInCard
      TabOrder = 1
      OnEnter = dbeProdNameEnter
      OnExit = dbeProdNameExit
    end
    object dbeCheckerID: TDBEdit
      Left = 153
      Top = 63
      Width = 65
      Height = 20
      TabStop = False
      DataField = 'CheckerID'
      DataSource = DM.dsProdInCard
      TabOrder = 9
    end
    object dbeProdID: TDBEdit
      Left = 5
      Top = 23
      Width = 139
      Height = 20
      TabStop = False
      DataField = 'ProdID'
      DataSource = DM.dsProdInCard
      TabOrder = 10
    end
    object dbeProdName: TDBEdit
      Tag = 1
      Left = 3
      Top = 23
      Width = 148
      Height = 20
      DataField = 'ProdName'
      DataSource = DM.dsProdInCard
      TabOrder = 0
      OnEnter = dbeProdNameEnter
      OnExit = dbeProdNameExit
    end
    object dbeChecker: TDBEdit
      Tag = 2
      Left = 152
      Top = 63
      Width = 72
      Height = 20
      DataField = 'Checker'
      DataSource = DM.dsProdInCard
      TabOrder = 3
      OnEnter = dbeProdNameEnter
      OnExit = dbeProdNameExit
    end
    object Panel3: TPanel
      Left = 4
      Top = 44
      Width = 148
      Height = 19
      Caption = '图号'
      TabOrder = 11
    end
    object dbeFigID: TDBEdit
      Left = 3
      Top = 63
      Width = 149
      Height = 20
      TabStop = False
      DataField = 'FigID'
      DataSource = DM.dsProdInCard
      TabOrder = 12
      OnEnter = dbeProdNameEnter
      OnExit = dbeProdNameExit
    end
    object Panel4: TPanel
      Left = 244
      Top = 4
      Width = 96
      Height = 19
      Caption = '生产批号'
      TabOrder = 13
    end
    object dbeProcID: TDBEdit
      Left = 244
      Top = 23
      Width = 95
      Height = 20
      DataField = 'ProcBatID'
      DataSource = DM.dsProdInCard
      TabOrder = 2
      OnEnter = dbeProdNameEnter
      OnExit = dbeProdNameExit
    end
  end
  object bbPrior: TBitBtn
    Left = 379
    Top = 35
    Width = 79
    Height = 23
    Caption = '上一张'
    TabOrder = 1
    TabStop = False
    OnClick = bbPriorClick
  end
  object bbNext: TBitBtn
    Left = 379
    Top = 63
    Width = 79
    Height = 23
    Caption = '下一张'
    TabOrder = 2
    TabStop = False
    OnClick = bbNextClick
  end
  object bbPost: TBitBtn
    Left = 379
    Top = 91
    Width = 79
    Height = 25
    Caption = '提交'
    TabOrder = 3
    OnClick = bbPostClick
    Glyph.Data = {
      1E060000424D1E06000000000000360000002800000017000000150000000100
      180000000000E8050000C40E0000C40E00000000000000000000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00
      0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F00007F0000BFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00
      0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F0000007F00007F00
      7F0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F000000
      7F00007F00007F00007F007F0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BF7F0000007F00007F00007F00007F00007F00007F007F0000BFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBF
      BFBFBFBFBFBF7F0000007F00007F00007F0000FF00007F00007F00007F00007F
      007F0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00
      0000BFBFBFBFBFBFBFBFBFBFBFBF007F00007F00007F0000FF00BFBFBF00FF00
      007F00007F00007F007F0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBF00FF00007F0000FF00BF
      BFBFBFBFBFBFBFBF00FF00007F00007F00007F007F0000BFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BF00FF00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00FF00007F00007F00007F007F
      0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00FF
      00007F00007F00007F007F0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00
      0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBF00FF00007F00007F00007F007F0000BFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00FF00007F00007F00007F00
      7F0000BFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00
      FF00007F00007F00007F007F0000BFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBF00FF00007F00007F007F0000BFBFBFBFBFBFBFBFBF00
      0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00FF00007F00007F00BFBF
      BFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      00FF00BFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00
      0000}
  end
  object bbClose: TBitBtn
    Left = 379
    Top = 120
    Width = 79
    Height = 23
    Caption = '取消'
    TabOrder = 4
    TabStop = False
    Kind = bkCancel
  end
  object dbeCardID: TDBEdit
    Left = 237
    Top = 25
    Width = 78
    Height = 17
    TabStop = False
    AutoSize = False
    BorderStyle = bsNone
    Color = clBlue
    DataField = 'CardID'
    DataSource = DM.dsProdInCard
    Font.Charset = GB2312_CHARSET
    Font.Color = clYellow
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 5
    OnEnter = dbeCardIDEnter
  end
  object bbLocal: TBitBtn
    Left = 313
    Top = 0
    Width = 23
    Height = 17
    Caption = 'bbLocal'
    TabOrder = 7
    OnClick = bbLocalClick
  end
  object Panel2: TPanel
    Left = 22
    Top = 6
    Width = 123
    Height = 39
    Caption = '成品入库单'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -24
    Font.Name = '隶书'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
  end
end