frminisetp.~dfm

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

inherited FrmIniSet: TFrmIniSet
  Left = 235
  Top = 91
  Width = 565
  Height = 386
  Caption = #22522#30784#25968#25454#35774#32622
  OldCreateOrder = True
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 311
    Width = 557
    inherited BtnSave: TBitBtn
      Left = 232
      Caption = #30830#35748
      OnClick = BtnSaveClick
    end
    inherited BtnCancel: TBitBtn
      Left = 360
      Visible = False
    end
  end
  inherited Panel2: TPanel
    Width = 557
    Height = 311
    BevelOuter = bvNone
    object dxDBGrid1: TdxDBGrid
      Left = 0
      Top = 0
      Width = 557
      Height = 311
      Bands = <
        item
        end>
      DefaultLayout = True
      HeaderPanelRowCount = 1
      SummaryGroups = <>
      SummarySeparator = ', '
      Align = alClient
      TabOrder = 0
      DataSource = dsQryAcc
      Filter.Criteria = {00000000}
      object dxDBGrid1cName: TdxDBGridMaskColumn
        Caption = #21517#31216
        HeaderAlignment = taCenter
        ReadOnly = True
        Width = 150
        BandIndex = 0
        RowIndex = 0
        FieldName = 'cName'
      end
      object dxDBGrid1cValue: TdxDBGridMaskColumn
        Caption = #32534#30721
        HeaderAlignment = taCenter
        Width = 262
        BandIndex = 0
        RowIndex = 0
        FieldName = 'cValue'
      end
      object dxDBGrid1cCaption: TdxDBGridMaskColumn
        Caption = #22791#27880
        HeaderAlignment = taCenter
        Width = 98
        BandIndex = 0
        RowIndex = 0
        FieldName = 'cCaption'
      end
    end
  end
  object QryAcc: TADOQuery
    Connection = DataDm.ConDataSys
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from AccInformation'
      'Order By id')
    Left = 104
    Top = 216
  end
  object dsQryAcc: TDataSource
    DataSet = QryAcc
    Left = 136
    Top = 216
  end
end