billbase.dfm

产品信息系统!关于产品基础信息的系统!功能强大!

inherited frmBillBase: TfrmBillBase
  Left = 245
  Top = 112
  Width = 715
  Height = 493
  Caption = #25152#26377#21333#25454#31649#29702#30340#22522#31867
  OldCreateOrder = True
  Position = poMainFormCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object SplitterCenter: TSplitter
    Left = 0
    Top = 209
    Width = 707
    Height = 3
    Cursor = crVSplit
    Align = alTop
  end
  object ToolBar: TToolBar
    Left = 0
    Top = 0
    Width = 707
    Height = 38
    ButtonHeight = 36
    ButtonWidth = 33
    Caption = 'ToolBar'
    Flat = True
    Images = frmMain.ToolButtonImages
    ShowCaptions = True
    TabOrder = 0
    Wrapable = False
    object tbtNew: TToolButton
      Left = 0
      Top = 0
      Action = acNew
      AutoSize = True
    end
    object tbtModify: TToolButton
      Left = 37
      Top = 0
      Action = acModify
      AutoSize = True
    end
    object tbtDelete: TToolButton
      Left = 74
      Top = 0
      Action = acDelete
      AutoSize = True
    end
    object tbtDivider1: TToolButton
      Left = 111
      Top = 0
      Width = 9
      Caption = 'tbtDivider1'
      ImageIndex = 3
      Style = tbsDivider
    end
    object tbtFirst: TToolButton
      Left = 120
      Top = 0
      Action = acFirst
      AutoSize = True
    end
    object tbtPrior: TToolButton
      Left = 157
      Top = 0
      Action = acPrior
      AutoSize = True
    end
    object tbtNext: TToolButton
      Left = 194
      Top = 0
      Action = acNext
      AutoSize = True
    end
    object tbtLast: TToolButton
      Left = 231
      Top = 0
      Action = acLast
      AutoSize = True
    end
    object tbtDivider: TToolButton
      Left = 268
      Top = 0
      Width = 8
      Caption = 'tbtDivider'
      ImageIndex = 21
      Style = tbsDivider
    end
    object ToolButton1: TToolButton
      Left = 276
      Top = 0
      Action = acConfirm
    end
    object ToolButton2: TToolButton
      Left = 309
      Top = 0
      Action = acCounteract
    end
    object tbtBegin: TToolButton
      Left = 342
      Top = 0
      Action = acBegin
    end
    object tbtFinish: TToolButton
      Left = 375
      Top = 0
      Action = acFinish
    end
    object ToolButton3: TToolButton
      Left = 408
      Top = 0
      Width = 8
      Caption = 'ToolButton3'
      ImageIndex = 21
      Style = tbsDivider
    end
    object ToolButton6: TToolButton
      Left = 416
      Top = 0
      Action = acImport
    end
    object ToolButton7: TToolButton
      Left = 449
      Top = 0
      Width = 8
      Caption = 'ToolButton7'
      ImageIndex = 0
      Style = tbsDivider
      Visible = False
    end
    object tbtAddLine: TToolButton
      Left = 457
      Top = 0
      Action = acAddLine
    end
    object tbtDelLine: TToolButton
      Left = 490
      Top = 0
      Action = acDelLine
    end
    object ToolButton4: TToolButton
      Left = 523
      Top = 0
      Width = 9
      Caption = 'ToolButton4'
      ImageIndex = 0
      Style = tbsDivider
    end
    object tbtSave: TToolButton
      Left = 532
      Top = 0
      Action = acSave
      AutoSize = True
    end
    object tbtCancel: TToolButton
      Left = 569
      Top = 0
      Action = acCancel
      AutoSize = True
    end
    object ToolButton5: TToolButton
      Left = 606
      Top = 0
      Action = acPrint
    end
    object tbtFind: TToolButton
      Left = 639
      Top = 0
      Action = acFind
      AutoSize = True
    end
    object tbtDivider3: TToolButton
      Left = 676
      Top = 0
      Width = 8
      Caption = 'tbtDivider3'
      ImageIndex = 12
      Style = tbsDivider
    end
    object tbtExit: TToolButton
      Left = 684
      Top = 0
      Action = acExit
      AutoSize = True
    end
  end
  object pnlTop: TPanel
    Left = 0
    Top = 38
    Width = 707
    Height = 171
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 1
    object lblSubmit: TLabel
      Left = 40
      Top = 8
      Width = 58
      Height = 13
      Caption = '*'#24050#23457#26680'*'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lblBillCaption: TLabel
      Left = 304
      Top = 8
      Width = 82
      Height = 19
      Caption = #21333' '#25454' '#21517
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -19
      Font.Name = #23435#20307
      Font.Style = [fsBold, fsUnderline]
      ParentFont = False
    end
    object lblNO: TLabel
      Left = 470
      Top = 21
      Width = 45
      Height = 15
      Alignment = taRightJustify
      Caption = #21333#21495#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object dbtxtNo: TDBText
      Left = 513
      Top = 19
      Width = 104
      Height = 14
      DataField = 'fNO'
      DataSource = dsMaster
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold, fsUnderline]
      ParentFont = False
    end
    object lblCancel: TLabel
      Left = 40
      Top = 8
      Width = 58
      Height = 13
      Caption = '*'#24050#20914#38144'*'
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lblCancelInfo: TLabel
      Left = 40
      Top = 24
      Width = 78
      Height = 12
      Caption = 'lblCancelInfo'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lblFinish: TLabel
      Left = 40
      Top = 8
      Width = 58
      Height = 13
      Caption = '*'#24050#23436#25104'*'
      Font.Charset = ANSI_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object pnlClient: TPanel
    Left = 0
    Top = 212
    Width = 707
    Height = 202
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 2
    object wwDGDetail: TwwDBGrid
      Left = 0
      Top = 0
      Width = 707
      Height = 202
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alClient
      DataSource = dsDetail
      KeyOptions = [dgEnterToTab, dgAllowDelete, dgAllowInsert]
      TabOrder = 0
      TitleAlignment = taLeftJustify
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      TitleLines = 1
      TitleButtons = False
    end
    object wwDBLKProductCode: TwwDBLookupCombo
      Left = 16
      Top = 24
      Width = 121
      Height = 21
      DropDownAlignment = taLeftJustify
      TabOrder = 1
      AutoDropDown = True
      ShowButton = True
      PreciseEditRegion = False
      AllowClearKey = False
      OnDblClick = wwDBLKProductCodeDblClick
    end
  end
  object pnlBottom: TPanel
    Left = 0
    Top = 414
    Width = 707
    Height = 45
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 3
    object lblMaker: TLabel
      Left = 45
      Top = 29
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #21046' '#21333' '#20154#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lblSubmitUser: TLabel
      Left = 253
      Top = 29
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #23457' '#26680' '#20154#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lblCancelUser: TLabel
      Left = 461
      Top = 29
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #20914' '#38144' '#20154#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lblDate: TLabel
      Left = 45
      Top = 8
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #21046#21333#26085#26399#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lblSubmitDate: TLabel
      Left = 253
      Top = 8
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #23457#26680#26085#26399#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lblCancelDate: TLabel
      Left = 461
      Top = 8
      Width = 60
      Height = 12
      Alignment = taRightJustify
      Caption = #20914#38144#26085#26399#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object wwDBEdtMaker: TwwDBEdit
      Left = 104
      Top = 23
      Width = 89
      Height = 18
      BorderStyle = bsNone
      DataField = 'fMaker'
      DataSource = dsMaster
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Frame.Enabled = True
      Frame.NonFocusBorders = [efLeftBorder, efTopBorder, efRightBorder, efBottomBorder]