mainform.dfm

产品标签管理系统：delphi+sql实现了产品标签、包装箱麦的自动生成等功能

        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 7
      end
      object Pg: TDBComboBox
        Left = 191
        Top = 56
        Width = 73
        Height = 21
        DataField = 'Pg'
        DataSource = DataSource1
        ItemHeight = 13
        Items.Strings = (
          #25291#27491#38754
          #25291#21271#38754
          #25291#38617#38754
          #27491#38754#21152#37002
          #32972#38754#21152#37002
          #38617#38754#21152#37002
          #25475#27611#21050)
        TabOrder = 8
        OnKeyDown = PgKeyDown
      end
      object Zkl: TDBEdit
        Left = 544
        Top = 57
        Width = 57
        Height = 21
        DataField = 'Zkl'
        DataSource = DataSource1
        TabOrder = 9
        OnKeyDown = ZklKeyDown
      end
      object DBEdit1: TDBEdit
        Tag = 4
        Left = 232
        Top = 21
        Width = 33
        Height = 21
        DataField = 'Zh'
        DataSource = DataSource1
        TabOrder = 10
        OnKeyDown = DBEdit1KeyDown
      end
      object Js: TDBEdit
        Left = 336
        Top = 56
        Width = 45
        Height = 21
        DataField = 'Js'
        DataSource = DataSource1
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 11
        OnKeyDown = JsKeyDown
      end
      object DBEdit2: TDBEdit
        Left = 428
        Top = 21
        Width = 105
        Height = 21
        Color = clInactiveBorder
        DataField = 'kan_hao'
        DataSource = DataSource1
        Enabled = False
        ReadOnly = True
        TabOrder = 12
        OnKeyPress = DBEdit2KeyPress
      end
      object DBEdit3: TDBEdit
        Left = 541
        Top = 21
        Width = 165
        Height = 21
        Color = clInactiveBorder
        DataField = 'pin_ming'
        DataSource = DataSource1
        Enabled = False
        ReadOnly = True
        TabOrder = 13
        OnKeyPress = DBEdit3KeyPress
      end
      object DBEdit4: TDBEdit
        Left = 386
        Top = 56
        Width = 61
        Height = 21
        Color = clInactiveBorder
        DataField = 'Sl'
        DataSource = DataSource1
        Enabled = False
        ReadOnly = True
        TabOrder = 14
      end
      object DBEdit5: TDBEdit
        Left = 605
        Top = 56
        Width = 81
        Height = 21
        Color = clInactiveBorder
        DataField = 'Cdr'
        DataSource = DataSource1
        Enabled = False
        ReadOnly = True
        TabOrder = 15
      end
      object Memo1: TMemo
        Left = 428
        Top = 133
        Width = 160
        Height = 21
        Color = clYellow
        Lines.Strings = (
          'Memo1')
        TabOrder = 16
        OnExit = Memo1Exit
        OnKeyPress = Memo1KeyPress
      end
      object Memo2: TMemo
        Left = 12
        Top = 56
        Width = 81
        Height = 62
        Color = clYellow
        Lines.Strings = (
          'Memo2')
        TabOrder = 17
        OnExit = Memo2Exit
        OnKeyDown = Memo2KeyDown
      end
      object Memo3: TMemo
        Left = 97
        Top = 56
        Width = 85
        Height = 62
        Color = clYellow
        Lines.Strings = (
          'Memo3')
        TabOrder = 18
        OnExit = Memo3Exit
        OnKeyDown = Memo3KeyDown
      end
      object Memo4: TMemo
        Left = 592
        Top = 96
        Width = 185
        Height = 57
        Color = clYellow
        Lines.Strings = (
          'Memo4')
        TabOrder = 19
        OnExit = Memo4Exit
        OnKeyDown = Memo4KeyDown
      end
      object Memo5: TMemo
        Left = 200
        Top = 136
        Width = 209
        Height = 73
        Color = clYellow
        Lines.Strings = (
          'Memo5')
        TabOrder = 20
        OnExit = Memo5Exit
        OnKeyDown = Memo5KeyDown
      end
      object DBEdit6: TDBEdit
        Left = 12
        Top = 188
        Width = 170
        Height = 21
        DataField = 'Zzsm'
        DataSource = DataSource1
        TabOrder = 21
        OnExit = DBEdit6Exit
        OnKeyPress = DBEdit6KeyPress
      end
      object DBEdit7: TDBEdit
        Left = 12
        Top = 139
        Width = 170
        Height = 21
        DataField = 'Zzsm1'
        DataSource = DataSource1
        TabOrder = 22
        OnExit = DBEdit7Exit
        OnKeyPress = DBEdit7KeyPress
      end
      object DBEdit8: TDBEdit
        Left = 12
        Top = 164
        Width = 170
        Height = 21
        DataField = 'Zzsm2'
        DataSource = DataSource1
        TabOrder = 23
        OnExit = DBEdit8Exit
        OnKeyDown = DBEdit8KeyDown
      end
      object DBEdit9: TDBEdit
        Left = 428
        Top = 154
        Width = 160
        Height = 21
        DataField = 'Bzsm1'
        DataSource = DataSource1
        TabOrder = 24
        OnExit = DBEdit9Exit
        OnKeyDown = DBEdit9KeyDown
      end
      object DBEdit10: TDBEdit
        Left = 428
        Top = 176
        Width = 160
        Height = 21
        DataField = 'Bzsm2'
        DataSource = DataSource1
        TabOrder = 25
        OnExit = DBEdit10Exit
        OnKeyDown = DBEdit10KeyDown
      end
      object DBEdit11: TDBEdit
        Left = 429
        Top = 198
        Width = 160
        Height = 21
        DataField = 'Bzsm3'
        DataSource = DataSource1
        TabOrder = 26
        OnExit = DBEdit11Exit
        OnKeyDown = DBEdit11KeyDown
      end
      object DBEdit12: TDBEdit
        Left = 592
        Top = 154
        Width = 185
        Height = 21
        DataField = 'Ys1'
        DataSource = DataSource1
        TabOrder = 27
        OnExit = DBEdit12Exit
        OnKeyDown = DBEdit12KeyDown
      end
      object DBEdit13: TDBEdit
        Left = 592
        Top = 177
        Width = 185
        Height = 21
        DataField = 'Ys2'
        DataSource = DataSource1
        TabOrder = 28
        OnExit = DBEdit13Exit
        OnKeyDown = DBEdit13KeyDown
      end
      object DBEdit14: TDBEdit
        Left = 592
        Top = 199
        Width = 185
        Height = 21
        DataField = 'Ys3'
        DataSource = DataSource1
        TabOrder = 29
        OnExit = DBEdit14Exit
        OnKeyDown = DBEdit14KeyDown
      end
      object DBEdit15: TDBEdit
        Left = 14
        Top = 21
        Width = 81
        Height = 21
        DataField = 'chai_wu_bian_hao'
        DataSource = DataSource1
        TabOrder = 30
        OnExit = DBEdit15Exit
        OnKeyPress = DBEdit15KeyPress
      end
      object DBComboBox1: TDBComboBox
        Left = 97
        Top = 21
        Width = 136
        Height = 21
        DataField = 'Ddh'
        DataSource = DataSource1
        ItemHeight = 13
        TabOrder = 31
        OnKeyPress = DBComboBox1KeyPress
      end
      object DBEdit16: TDBEdit
        Left = 279
        Top = 96
        Width = 89
        Height = 21
        Color = cl3DLight
        DataField = 'lei_xing'
        DataSource = DataSource1
        Enabled = False
        TabOrder = 32
        OnChange = DBEdit16Change
      end
      object DBEdit17: TDBEdit
        Left = 451
        Top = 56
        Width = 90
        Height = 21
        Color = cl3DLight
        DataField = 'chang_hao'
        DataSource = DataSource1
        Enabled = False
        TabOrder = 33
      end
    end
  end
  object DBEdit18: TDBEdit
    Left = 56
    Top = 293
    Width = 75
    Height = 21
    DataField = 'gan_pei'
    DataSource = DataSource1
    TabOrder = 2
    OnKeyDown = DBEdit18KeyDown
  end
  object DBEdit19: TDBEdit
    Left = 193
    Top = 293
    Width = 75
    Height = 21
    DataField = 'shong_dian'
    DataSource = DataSource1
    TabOrder = 3
    OnKeyDown = DBEdit19KeyDown
  end
  object DBEdit20: TDBEdit
    Left = 337
    Top = 321
    Width = 73
    Height = 21
    DataField = 'liu_yang'
    DataSource = DataSource1
    TabOrder = 4
    OnKeyDown = DBEdit20KeyDown
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 373
    Width = 785
    Height = 197
    Color = clMoneyGreen
    DataSource = DataSource1
    PopupMenu = PopupMenu3
    ReadOnly = True
    TabOrder = 5
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'chai_wu_bian_hao'
        Title.Caption = #21046#36896#25209#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Ddh'
        Title.Caption = #35330#21934#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'chang_hao'
        Title.Caption = #24288#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'kan_hao'
        Title.Caption = #23458#25142#27454#34399
        Visible = True
      end
      item