frmpoppop.~dfm

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

inherited FrmPoPPo: TFrmPoPPo
  Left = 336
  Top = 160
  Width = 304
  Height = 327
  Caption = #37319#36141#35746#21333
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 239
    Width = 296
    Height = 61
    object Label1: TLabel [0]
      Left = 19
      Top = 40
      Width = 150
      Height = 13
      Caption = #27880':'#32593#26684#25968#25454#21487#30452#25509#20462#25913#12290
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object sbOut: TSpeedButton [1]
      Left = 16
      Top = 8
      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
    inherited BtnSave: TBitBtn
      Left = 104
      Top = 8
      OnClick = BtnSaveClick
    end
    inherited BtnCancel: TBitBtn
      Left = 192
      Top = 8
      Caption = #36864#20986
    end
  end
  inherited Panel2: TPanel
    Width = 296
    Height = 239
    object dxDBGrid1: TdxDBGrid
      Left = 1
      Top = 1
      Width = 294
      Height = 237
      Bands = <
        item
        end>
      DefaultLayout = True
      HeaderPanelRowCount = 1
      KeyField = 'ID'
      SummaryGroups = <>
      SummarySeparator = ', '
      Align = alClient
      TabOrder = 0
      DataSource = DataSource1
      Filter.Criteria = {00000000}
      object dxDBGrid1cOrderCode: TdxDBGridColumn
        Caption = #37319#36141#23450#21333#21495
        HeaderAlignment = taCenter
        Width = 196
        BandIndex = 0
        RowIndex = 0
        FieldName = 'cOrderCode'
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = FrmIN.QryCheckPo
    Left = 64
    Top = 112
  end
end