pur510_02.dfm.svn-base

这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享

inherited Pur510_02Form: TPur510_02Form
  Left = 12
  Top = 18
  Caption = #37319#36141#23450#21333#32500#25252
  PixelsPerInch = 96
  TextHeight = 12
  inherited CoolBar1: TCoolBar
    inherited ToolBar2: TToolBar
      inherited ToolButton5: TToolButton
        Left = 374
      end
      inherited ToolButton8: TToolButton
        Left = 409
      end
      inherited ToolButton9: TToolButton
        Left = 444
      end
      inherited ToolButton7: TToolButton
        Left = 497
        Visible = True
      end
      inherited tlbRefresh: TToolButton
        Left = 505
      end
      inherited tlbLocate: TToolButton
        Left = 540
      end
      inherited tlbSearch: TToolButton
        Left = 575
      end
      inherited tlbPrint: TToolButton
        Left = 610
      end
      inherited ToolButton6: TToolButton
        Left = 645
      end
      inherited tlbExit: TToolButton
        Left = 653
      end
    end
  end
  inherited gbInfo: TGroupBox
    inherited lblCode: TLabel
      Caption = #37319#36141#21333#21495
    end
    object lblAmount: TLabel [1]
      Left = 576
      Top = 96
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #37329#39069#24635#35745
    end
    object lblNetAmt: TLabel [2]
      Left = 576
      Top = 120
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #24212#25910#37329#39069
    end
    object lblCurr: TLabel [3]
      Tag = 1
      Left = 241
      Top = 48
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #24065#21035#21517#31216
    end
    object lblDiscount: TLabel [4]
      Left = 208
      Top = 120
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #25240#25187#37329#39069
    end
    object lblType: TLabel [5]
      Tag = 1
      Left = 208
      Top = 24
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #37319#36141#31867#22411
    end
    object lblDate: TLabel [6]
      Tag = 1
      Left = 392
      Top = 24
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #37319#36141#26085#26399
    end
    object lblPerson: TLabel [7]
      Left = 24
      Top = 48
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #37319#36141#20154#21592
    end
    object lblPayment: TLabel [8]
      Tag = 1
      Left = 208
      Top = 72
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #20184#27454#26041#24335
    end
    object lblCharge: TLabel [9]
      Left = 392
      Top = 120
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #29305#27530#36153#29992
    end
    object sbPerson: TSpeedButton [10]
      Left = 152
      Top = 40
      Width = 22
      Height = 20
      Flat = True
      Glyph.Data = {
        F6060000424DF606000000000000360000002800000018000000180000000100
        180000000000C006000000000000000000000000000000000000FF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000
        000000FF00FFFF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FF000000C0C0C0000000FF00FFFF00FFFF00FFFF00FFFF00FF000000C0C0C0
        000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FF000000000000000000808080FF00FFFF00FFFF00FF80
        8080000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000000000000000
        00000000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000000000C0C0C0
        000000000000000000000000C0C0C0000000000000000000000000FF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
        FFFF000000C0C0C0000000000000000000000000C0C0C0000000000000000000
        000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
        00FFFFFF80808080808000000000000000000000000000000000000000000000
        0000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000
        00C0C0C0000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFF808080808080FFFFFF808080
        000000000000808080808080FFFFFF000000000000FF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF000000000000FF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
        00FFFFFF808080808080FFFFFF808080000000000000808080808080FFFFFF00
        0000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFBF0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000BF0000BF0000
        BF0000BF0000BF0000BF0000BF0000BF0000FF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000C0C0C0BF0000BF
        0000C0C0C0BF0000BF0000C0C0C0BF0000BF0000C0C0C0BF0000FF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
        00BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF
        0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
      OnClick = sbPersonClick
    end
    object lblStatues: TLabel [11]
      Left = 576
      Top = 24
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #37319#36141#29366#24577
    end
    object lblFrom: TLabel [12]
      Tag = 1
      Left = 392
      Top = 72
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #26469#28304#31867#22411
    end
    object lblDisRate: TLabel [13]
      Left = 24
      Top = 120
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #25240#25187#27604#29575
    end
    object lblPick: TLabel [14]
      Tag = 1
      Left = 24
      Top = 72
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #25552#36135#26041#24335
    end
    object lblRate: TLabel [15]
      Left = 392
      Top = 48
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #24065#21035#27719#29575
    end
    object lblCheckDate: TLabel [16]
      Left = 24
      Top = 96
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #23457#26680#26085#26399
    end
    object lblChecker: TLabel [17]
      Left = 208
      Top = 96
      Width = 48
      Height = 12
      Alignment = taRightJustify
      Caption = #23457#26680#20154#21592
    end
    object lblPriority: TLabel [18]
      Tag = 1
      Left = 577
      Top = 46
      Width = 48
      Height = 12
      Caption = #20248#20808#32423#21035
    end
    object edtNetAmt: TEdit
      Left = 632
      Top = 112
      Width = 97
      Height = 20
      BiDiMode = bdLeftToRight
      Color = clBtnFace
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Pitch = fpFixed
      Font.Style = []
      ParentBiDiMode = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
      Text = '0.00'
    end
    object edtAmount: TEdit
      Left = 632
      Top = 88
      Width = 97
      Height = 20
      Color = clBtnFace
      Enabled = False
      ReadOnly = True
      TabOrder = 2
      Text = '0.00'
    end
    object edtDiscount: TEdit
      Left = 264
      Top = 112
      Width = 121
      Height = 20
      Color = clBtnFace
      Enabled = False
      ReadOnly = True
      TabOrder = 3
      Text = '0.00'
    end
    object cbType: TComboBox
      Left = 264
      Top = 16
      Width = 121
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 4
      Items.Strings = (
        #38144#21806
        #36192#36865)
    end
    object edtDate: TwwDBDateTimePicker
      Left = 448
      Top = 16
      Width = 121
      Height = 20
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 5
    end
    object edtPerson: TEdit
      Left = 80
      Top = 40
      Width = 69
      Height = 20
      TabOrder = 6
      OnExit = edtPersonExit
    end
    object edtSumCharge: TEdit
      Left = 448
      Top = 112
      Width = 121
      Height = 20
      Color = clBtnFace
      Enabled = False
      TabOrder = 7
      Text = '0.00'
    end
    object cbCurr: TComboBox
      Left = 293
      Top = 40
      Width = 90
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 8
      OnChange = cbCurrChange
    end
    object cbPayment: TComboBox
      Left = 264
      Top = 64
      Width = 121
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 9
      Items.Strings = (
        #36135#21040#20184#27454
        #27454#21040#21457#36135)
    end
    object edtStatus: TEdit