frmdefinep.~dfm

二次开发模块 一、条形码的批量生成

object FrmDefine: TFrmDefine
  Left = 205
  Top = 107
  Width = 696
  Height = 480
  BorderIcons = [biSystemMenu]
  Caption = #26041#26696#23450#20041
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 688
    Height = 57
    Align = alTop
    Caption = #26041#26696#23450#20041
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -24
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
  end
  object Panel2: TPanel
    Left = 536
    Top = 57
    Width = 152
    Height = 396
    Align = alRight
    TabOrder = 1
    object sbAdd: TSpeedButton
      Left = 36
      Top = 170
      Width = 76
      Height = 25
      Hint = 'Add New'
      Caption = #22686#21152
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      Glyph.Data = {
        36030000424D360300000000000036000000280000000F000000100000000100
        18000000000000030000C40E0000C40E00000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0000000C0C0C0C0C0C080808080808080808080808080808080
        8080808080808080808080808080808080808080C0C0C0000000C0C0C0C0C0C0
        0000000000000000000000000000000000000000000000000000000000000000
        00808080C0C0C0000000C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000808080C0C0C0000000C0C0C0C0C0C0
        000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
        00808080C0C0C0000000C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFF80
        0000C0C0C0FFFFFFFFFFFFFFFFFF000000808080C0C0C0000000C0C0C0C0C0C0
        000000FFFFFFFFFFFFFFFFFFFFFFFF800000C0C0C0C0C0C0FFFFFFFFFFFF0000
        00808080C0C0C0000000C0C0C0C0C0C0000000FFFFFFFFFFFF80000080000080
        0000800000800000FFFFFFFFFFFF000000808080C0C0C0000000C0C0C0C0C0C0
        000000FFFFFFFFFFFFFFFFFFFFFFFF800000C0C0C0FFFFFFFFFFFFFFFFFF0000
        00808080C0C0C0000000C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFF80
        0000C0C0C0FFFFFFFFFFFFFFFFFF000000808080C0C0C0000000C0C0C0C0C0C0
        000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
        00808080C0C0C0000000C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFF000000000000000000000000C0C0C0C0C0C0000000C0C0C0C0C0C0
        000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFF000000C0C0
        C0C0C0C0C0C0C0000000C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFF000000000000C0C0C0C0C0C0C0C0C0C0C0C0000000C0C0C0C0C0C0
        000000000000000000000000000000000000000000000000C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000}
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnClick = sbAddClick
    end
    object sbDelete: TSpeedButton
      Left = 36
      Top = 197
      Width = 76
      Height = 25
      Hint = 'Delete'
      Caption = #21024#38500
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333000033337733333333333333333F333333333333
        0000333911733333973333333377F333333F3333000033391117333911733333
        37F37F333F77F33300003339111173911117333337F337F3F7337F3300003333
        911117111117333337F3337F733337F3000033333911111111733333337F3337
        3333F7330000333333911111173333333337F333333F73330000333333311111
        7333333333337F3333373333000033333339111173333333333337F333733333
        00003333339111117333333333333733337F3333000033333911171117333333
        33337333337F333300003333911173911173333333373337F337F33300003333
        9117333911173333337F33737F337F33000033333913333391113333337FF733
        37F337F300003333333333333919333333377333337FFF730000333333333333
        3333333333333333333777330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnClick = sbDeleteClick
    end
    object sbOut: TSpeedButton
      Left = 36
      Top = 281
      Width = 76
      Height = 25
      Hint = 'Add New'
      Caption = #36755#20986
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      Glyph.Data = {
        B6030000424DB603000000000000360000002800000012000000100000000100
        18000000000080030000C40E0000C40E00000000000000000000FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFF0084008484840084008484
        8400840084848400840084848400840084848400840084848400840084848400
        8400848484FFFFFF0000FFFFFF84848400840084848400840084848400840084
        8484008400848484008400848484008400848484008400848484008400FFFFFF
        0000FFFFFF008400848484FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF008400848484FFFFFF0000FFFFFF848484
        008400FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8484840084008484
        84008400848484848484008400FFFFFF0000FFFFFF008400848484FFFFFF0084
        00848484008400848484008400848484008400FFFFFF00840084848400840000
        8400848484FFFFFF0000FFFFFF848484008400FFFFFF84848400840084848400
        8400848484008400FFFFFF008400848484008400FFFFFF848484008400FFFFFF
        0000FFFFFF008400848484FFFFFF008400848484008400848484008400FFFFFF
        008400848484008400848484FFFFFF008400848484FFFFFF0000FFFFFF848484
        008400FFFFFFFFFFFF008400848484008400FFFFFF0084008484840084008484
        84008400FFFFFF848484008400FFFFFF0000FFFFFF008400848484FFFFFFFFFF
        FFFFFFFF008400FFFFFF008400848484008400848484FFFFFFFFFFFFFFFFFF00
        8400848484FFFFFF0000FFFFFF848484008400FFFFFFFFFFFF008400FFFFFF00
        8400848484008400848484008400848484FFFFFFFFFFFF848484008400FFFFFF
        0000FFFFFF008400848484FFFFFF008400FFFFFF008400848484008400848484
        008400848484008400848484FFFFFF008400848484FFFFFF0000FFFFFF848484
        008400FFFFFF848484008400848484008400848484FFFFFF8484840084008484
        84008400FFFFFF848484008400FFFFFF0000FFFFFF008400848484FFFFFF0084
        00848484008400848484FFFFFFFFFFFFFFFFFF848484008400848484FFFFFF00
        8400848484FFFFFF0000FFFFFF848484008400FFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF848484008400FFFFFF
        0000FFFFFF008400848484008400848484008400848484008400848484008400
        848484008400848484008400848484008400848484FFFFFF0000}
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnClick = sbOutClick
    end
    object sbClose: TSpeedButton
      Left = 36
      Top = 329
      Width = 76
      Height = 25
      Hint = 'Add New'
      Caption = #36820#22238
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      Glyph.Data = {
        F6030000424DF603000000000000360000002800000013000000100000000100
        180000000000C0030000C40E0000C40E00000000000000000000CED3D6CED3D6
        CED3D6CED3D6CED3D6CED3D6CED3D6000000CED3D6CED3D6CED3D6CED3D6CED3
        D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6000000CED3D6CED3D6CED3D6CE
        D3D6CED3D6CED3D6000000000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6
        CED3D6CED3D6CED3D6CED3D6CED3D6000000CED3D6CED3D6CED3D6CED3D6CED3
        D6000000848200000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CE
        D3D6CED3D6CED3D6CED3D6000000CED3D6CED3D6CED3D6CED3D6000000848200
        848200000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3
        D6CED3D6CED3D6000000CED3D6CED3D600000000000084820084820084820000
        0000000000000000000000000000000000000000000000CED3D6CED3D6CED3D6
        CED3D6000000CED3D6CED3D6CED3D6000000848200848200848200000000FFFF
        FFFFFFFF000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D600
        0000CED3D6CED3D6CED3D6000000848200848200000000000000FFFFFFFFFFFF
        000000CED3D6CED3D6CED3D6CED3D6840000CED3D6CED3D6CED3D6000000CED3
        D6CED3D6CED3D6000000848200848200848200000000FFFFFFFFFFFF000000CE
        D3D6CED3D6CED3D6840000840000CED3D6CED3D6CED3D6000000CED3D6CED3D6
        CED3D6000000848200848200848200000000FFFFFFFFFFFF000000CED3D6CED3
        D6840000840000840000840000840000CED3D6000000CED3D6CED3D6CED3D600
        0000848200848200848200000000FFFFFFFFFFFF000000CED3D6840000840000
        840000840000840000840000CED3D6000000CED3D6CED3D6CED3D60000008482
        00848200848200000000FFFFFFFFFFFF000000CED3D6CED3D684000084000084