複製 -rptjj.dfm

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

object Form2: TForm2
  Left = 4
  Top = 122
  Width = 800
  Height = 578
  Align = alTop
  Caption = 'Form2'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 792
    Height = 33
    BorderWidth = 1
    ButtonHeight = 24
    ButtonWidth = 37
    Caption = 'ToolBar1'
    Color = 16772292
    Customizable = True
    EdgeBorders = [ebLeft, ebTop, ebRight, ebBottom]
    Flat = True
    HotImages = ImageList2
    Images = ImageList1
    Indent = 10
    ParentColor = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object Label1: TLabel
      Left = 10
      Top = 0
      Width = 200
      Height = 24
      Caption = #32113#35336#26085#22577#34920
      Constraints.MaxWidth = 200
      Constraints.MinWidth = 200
      Font.Charset = ANSI_CHARSET
      Font.Color = 4210688
      Font.Height = -24
      Font.Name = #32048#26126#39636
      Font.Style = [fsBold]
      ParentFont = False
    end
    object ToolButton1: TToolButton
      Left = 210
      Top = 0
      Width = 159
      Caption = 'ToolButton1'
      ImageIndex = 4
      Style = tbsSeparator
    end
    object Label2: TLabel
      Left = 369
      Top = 0
      Width = 63
      Height = 24
      Caption = '  '#32113#35336#26085#26399'   '
    end
    object me1: TMaskEdit
      Left = 432
      Top = 0
      Width = 81
      Height = 24
      EditMask = '9999/99/99;1;_'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      MaxLength = 10
      ParentFont = False
      TabOrder = 0
      Text = '    /  /  '
    end
    object ToolButton5: TToolButton
      Left = 513
      Top = 0
      Width = 72
      Caption = 'ToolButton5'
      ImageIndex = 4
      Style = tbsSeparator
    end
    object ToolButton2: TToolButton
      Left = 585
      Top = 0
      Action = Action1
      ImageIndex = 0
    end
    object ToolButton3: TToolButton
      Left = 622
      Top = 0
      Hint = #36664#20986
      Caption = 'ToolButton3'
      ImageIndex = 2
    end
    object ToolButton4: TToolButton
      Left = 659
      Top = 0
      Hint = #36864#20986
      ImageIndex = 3
      OnClick = ToolButton4Click
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 33
    Width = 792
    Height = 164
    Align = alTop
    DataSource = DataSource1
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Color = 16773847
        Expanded = False
        FieldName = #21046#21934#34399
        Title.Color = 8404992
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 60
        Visible = True
      end
      item
        Color = 14540287
        Expanded = False
        FieldName = #31449#21029'1'
        Title.Color = clRed
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 14680031
        Expanded = False
        FieldName = 'lp1'
        Title.Caption = #33391#21697
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 14680031
        Expanded = False
        FieldName = 'blp1'
        Title.Caption = #19981#33391#21697
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 14680031
        Expanded = False
        FieldName = 'bfp1'
        Title.Caption = #22577#24290#21697
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 14680031
        Expanded = False
        FieldName = 'ljlp1'
        Title.Caption = #32047#33391
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 14680031
        Expanded = False
        FieldName = 'ljblp1'
        Title.Caption = #32047#19981#33391
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 14680031
        Expanded = False
        FieldName = 'ljbfp1'
        Title.Caption = #32047#22577#24290
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 14540287
        Expanded = False
        FieldName = #31449#21029'2'
        Title.Color = clRed
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 13828050
        Expanded = False
        FieldName = 'lp2'
        Title.Caption = #33391#21697
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 13828050
        Expanded = False
        FieldName = 'blp2'
        Title.Caption = #19981#33391#21697
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 13828050
        Expanded = False
        FieldName = 'bfp2'
        Title.Caption = #22577#24290#21697
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 13828050
        Expanded = False
        FieldName = 'ljlp2'
        Title.Caption = #32047#33391
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 13828050
        Expanded = False
        FieldName = 'ljblp2'
        Title.Caption = #32047#19981#33391
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item
        Color = 13828050
        Expanded = False
        FieldName = 'ljbfp2'
        Title.Caption = #32047#22577#24290
        Title.Color = 16384
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWhite
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 40
        Visible = True
      end
      item