proseriseman.~dfm

Barcode And LabelPrint

inherited frmBProSeriseMan: TfrmBProSeriseMan
  Left = 240
  Top = 235
  Width = 560
  Height = 358
  Caption = #20135#21697#31995#21015#31649#29702
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited ToolBar: TToolBar
    Width = 552
  end
  inherited StatusBar1: TStatusBar
    Top = 312
    Width = 552
  end
  inherited Panel1: TPanel
    Width = 552
  end
  object GroupBox1: TGroupBox [3]
    Left = 0
    Top = 48
    Width = 552
    Height = 117
    Align = alTop
    Caption = #20135#21697#31995#21015#31649#29702
    TabOrder = 7
    DesignSize = (
      552
      117)
    object Label1: TLabel
      Left = 8
      Top = 29
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #31995#21015#32534#21495
    end
    object Label10: TLabel
      Left = 318
      Top = 12
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #35814#32454#25551#36848
    end
    object Label11: TLabel
      Left = 8
      Top = 60
      Width = 53
      Height = 13
      AutoSize = False
      Caption = #31995#21015#21517#31216
    end
    object LabelDate: TLabel
      Left = 7
      Top = 90
      Width = 52
      Height = 13
      Caption = #28155#21152#26102#38388
    end
    object DBMemoDetail: TDBMemo
      Left = 316
      Top = 24
      Width = 230
      Height = 89
      Anchors = [akLeft, akTop, akRight, akBottom]
      DataField = 'Detail'
      DataSource = dsBaseInfo
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ScrollBars = ssBoth
      TabOrder = 3
    end
    object DBEdtOptSNum: TDBEdit
      Left = 64
      Top = 26
      Width = 249
      Height = 21
      DataField = 'ProNumber'
      DataSource = dsBaseInfo
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 0
    end
    object DBEdtOptSName: TDBEdit
      Left = 64
      Top = 56
      Width = 248
      Height = 21
      DataField = 'Serise'
      DataSource = dsBaseInfo
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 1
    end
    object EditDate: TEdit
      Left = 63
      Top = 85
      Width = 249
      Height = 21
      Color = clMenu
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ReadOnly = True
      TabOrder = 2
    end
  end
  object GroupBox2: TGroupBox [4]
    Left = 4
    Top = 165
    Width = 540
    Height = 138
    Align = alClient
    TabOrder = 8
    object DBGrid1: TDBGrid
      Left = 2
      Top = 15
      Width = 536
      Height = 121
      Align = alClient
      DataSource = dsBaseInfo
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnCellClick = DBGrid1CellClick
    end
  end
  inherited Panel2: TPanel
    Top = 165
    Height = 138
  end
  inherited Panel3: TPanel
    Left = 544
    Top = 165
    Height = 138
  end
  inherited Panel4: TPanel
    Top = 303
    Width = 552
  end
  inherited Panel5: TPanel
    Top = 165
    Width = 540
    Height = 138
    object DBGrid2: TDBGrid
      Left = 0
      Top = 0
      Width = 540
      Height = 138
      Align = alClient
      DataSource = dsBaseInfo
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnCellClick = DBGrid1CellClick
    end
  end
  inherited ALToolbar: TActionList
    Left = 476
    Top = 46
  end
  inherited QBaseInfo: TADOQuery
    CursorType = ctStatic
    SQL.Strings = (
      'select * from ProSerise')
    Left = 437
    Top = 212
    object QBaseInfoSerise: TWideStringField
      DisplayLabel = #31995#21015#21517#31216
      DisplayWidth = 30
      FieldName = 'Serise'
      OnValidate = QBaseInfoSeriseValidate
      Size = 50
    end
    object QBaseInfoUpdateDate: TDateTimeField
      DisplayLabel = #28155#21152#26102#38388
      DisplayWidth = 18
      FieldName = 'UpdateDate'
    end
    object QBaseInfoProNumber: TIntegerField
      DisplayLabel = #32534#21495
      DisplayWidth = 10
      FieldName = 'ProNumber'
    end
    object QBaseInfoDetail: TWideStringField
      FieldName = 'Detail'
      Visible = False
      Size = 80
    end
  end
  inherited dsBaseInfo: TDataSource
    Left = 420
    Top = 39
  end
  inherited QIsUnique: TADOQuery
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'Serise'
        Attributes = [paNullable]
        DataType = ftWideString
        NumericScale = 255
        Precision = 255
        Size = 50
        Value = Null
      end>
    SQL.Strings = (
      'select * from ProSerise where Serise=:Serise')
    Left = 435
    Top = 151
  end
  inherited wwLookupDlg: TwwLookupDialog
    Selected.Strings = (
      'Serise'#9'30'#9#31995#21015#21517#31216#9'F'
      'UpdateDate'#9'18'#9#28155#21152#26102#38388#9'F'
      'ProNumber'#9'10'#9#32534#21495#9'F')
    Left = 426
    Top = 99
  end
end