一个用Delphi开发的ERP软件

源代码在线查看: inv550_02.dfm.svn-base

软件大小: 5012 K
上传用户: zhousiqi420
关键词: Delphi ERP 软件
下载地址: 免注册下载 普通下载 VIP

相关代码

				inherited Inv550_02Form: TInv550_02Form
				  Left = 175
				  Top = 115
				  BorderIcons = [biSystemMenu]
				  BorderStyle = bsSingle
				  Caption = #24211#23384#25805#20316#31867#22411
				  ClientHeight = 343
				  ClientWidth = 537
				  OldCreateOrder = True
				  PixelsPerInch = 96
				  TextHeight = 12
				  object Bevel1: TBevel [0]
				    Left = 8
				    Top = 8
				    Width = 521
				    Height = 41
				    Shape = bsFrame
				  end
				  object lblName: TLabel [1]
				    Tag = 1
				    Left = 192
				    Top = 24
				    Width = 48
				    Height = 12
				    Alignment = taRightJustify
				    Caption = #31867#22411#21517#31216
				  end
				  object lblCode: TLabel [2]
				    Tag = 1
				    Left = 16
				    Top = 24
				    Width = 48
				    Height = 12
				    Alignment = taRightJustify
				    Caption = #31867#22411#32534#21495
				  end
				  object gbAcct: TGroupBox [3]
				    Left = 8
				    Top = 256
				    Width = 521
				    Height = 49
				    TabOrder = 7
				    object lblType: TLabel
				      Left = 8
				      Top = 24
				      Width = 48
				      Height = 12
				      Alignment = taRightJustify
				      Caption = #26469#28304#32534#30721
				    end
				    object lblAccID: TLabel
				      Left = 264
				      Top = 24
				      Width = 48
				      Height = 12
				      Alignment = taRightJustify
				      Caption = #23545#26041#31185#30446
				    end
				    object sbAccID: TSpeedButton
				      Left = 490
				      Top = 16
				      Width = 22
				      Height = 20
				      Enabled = False
				      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}
				    end
				    object cbType: TComboBox
				      Tag = 2
				      Left = 64
				      Top = 16
				      Width = 169
				      Height = 20
				      Style = csDropDownList
				      Color = clBtnFace
				      Enabled = False
				      ItemHeight = 12
				      ItemIndex = 0
				      TabOrder = 0
				      Text = #33258#23450#31185#30446
				      OnChange = cbTypeChange
				      Items.Strings = (
				        #33258#23450#31185#30446
				        #26009#21697#20998#31867#30340#20135#21697#25104#26412#31185#30446
				        #26009#21697#20998#31867#30340#24212#20184#24080#27454#31185#30446
				        #37319#36141#20215#24046#31185#30446
				        #38144#21806#25910#20837#31185#30446
				        #23458#25142#36164#26009#30340#31185#30446)
				    end
				    object edtAccID: TEdit
				      Tag = 3
				      Left = 320
				      Top = 16
				      Width = 169
				      Height = 20
				      Color = clBtnFace
				      Enabled = False
				      ReadOnly = True
				      TabOrder = 1
				    end
				  end
				  object edtCode: TEdit [4]
				    Left = 72
				    Top = 16
				    Width = 113
				    Height = 20
				    TabOrder = 0
				  end
				  object edtName: TEdit [5]
				    Tag = 1
				    Left = 248
				    Top = 16
				    Width = 273
				    Height = 20
				    TabOrder = 1
				  end
				  object rgQty: TRadioGroup [6]
				    Left = 8
				    Top = 56
				    Width = 257
				    Height = 81
				    Caption = #24433#21709#31867#22411
				    Columns = 2
				    ItemIndex = 1
				    Items.Strings = (
				      #26399#21021#25968#37327
				      #20837#24211#25968#37327
				      #20986#24211#25968#37327
				      #35843#25972#25968#37327
				      #24211#23384#36716#20179)
				    TabOrder = 2
				  end
				  object rgOrder: TRadioGroup [7]
				    Left = 272
				    Top = 56
				    Width = 257
				    Height = 81
				    Caption = #30456#20851#21333#25454
				    Columns = 2
				    ItemIndex = 0
				    Items.Strings = (
				      #25163#24037#36755#20837
				      #37319#36141#23450#21333
				      #38144#21806#23450#21333
				      #36710#38388#23450#21333
				      #20986#20837#20179#21333)
				    TabOrder = 3
				  end
				  object bbtnOk: TBitBtn [8]
				    Left = 376
				    Top = 312
				    Width = 75
				    Height = 25
				    Caption = #20445#23384'(&S)'
				    TabOrder = 8
				    OnClick = bbtnOkClick
				  end
				  object bbtnExit: TBitBtn [9]
				    Left = 456
				    Top = 312
				    Width = 75
				    Height = 25
				    Caption = #36864#20986'(&X)'
				    TabOrder = 9
				    OnClick = bbtnExitClick
				  end
				  object gbDRType: TGroupBox [10]
				    Left = 8
				    Top = 144
				    Width = 521
				    Height = 49
				    Caption = #20986#20837#20179#21333#31867#22411
				    TabOrder = 4
				    object lblDRType: TLabel
				      Left = 16
				      Top = 24
				      Width = 48
				      Height = 12
				      Alignment = taRightJustify
				      Caption = #31867#22411#32534#21495
				    end
				    object sbDRType: TSpeedButton
				      Left = 186
				      Top = 16
				      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 = sbDRTypeClick
				    end
				    object edtDRType: TEdit
				      Left = 72
				      Top = 16
				      Width = 113
				      Height = 20
				      TabOrder = 0
				      OnExit = edtDRTypeExit
				    end
				    object edtDRTypeName: TEdit
				      Tag = 1
				      Left = 216
				      Top = 16
				      Width = 297
				      Height = 20
				      Color = clBtnFace
				      Enabled = False
				      TabOrder = 1
				    end
				  end
				  object gbInput: TGroupBox [11]
				    Left = 8
				    Top = 200
				    Width = 521
				    Height = 49
				    Caption = #36755#20837#35774#32622
				    TabOrder = 5
				    object lblRefName: TLabel
				      Left = 264
				      Top = 24
				      Width = 48
				      Height = 12
				      Caption = #21442#32771#21333#25454
				    end
				    object lblObject: TLabel
				      Left = 8
				      Top = 24
				      Width = 48
				      Height = 12
				      Alignment = taRightJustify
				      Caption = #30456#20851#23545#35937
				    end
				    object edtRefName: TEdit
				      Left = 320
				      Top = 16
				      Width = 193
				      Height = 20
				      TabOrder = 0
				    end
				    object cbObject: TComboBox
				      Tag = 2
				      Left = 64
				      Top = 16
				      Width = 169
				      Height = 20
				      Style = csDropDownList
				      ItemHeight = 12
				      ItemIndex = 0
				      TabOrder = 1
				      Text = #31354#30333
				      OnChange = cbTypeChange
				      Items.Strings = (
				        #31354#30333
				        #23458#25143
				        #21592#24037
				        #37096#38376)
				    end
				  end
				  object cbAccount: TCheckBox [12]
				    Left = 16
				    Top = 254
				    Width = 81
				    Height = 17
				    Caption = #36807#24080#21040#24635#24080
				    TabOrder = 6
				    OnClick = cbAccountClick
				  end
				  inherited pmUISet: TPopupMenu
				    Left = 40
				    Top = 312
				  end
				  object qryInv550: TADOQuery
				    Connection = SYSDM.ADOC
				    CursorType = ctStatic
				    AfterScroll = qryInv550AfterScroll
				    Parameters = 
				    SQL.Strings = (
				      'select * from INV550 order by I550_002')
				    Left = 8
				    Top = 312
				  end
				  object ADOQuery1: TADOQuery
				    Connection = SYSDM.ADOC
				    CursorType = ctStatic
				    Parameters = 
				    SQL.Strings = (
				      
				        'select I550_001,I550_002,I550_003 from INV550 where I550_004 in ' +
				        '(1,2) order by I550_002')
				    Left = 96
				    Top = 152
				    object ADOQuery1I550_001: TAutoIncField
				      FieldName = 'I550_001'
				      ReadOnly = True
				      Visible = False
				    end
				    object ADOQuery1I550_002: TWideStringField
				      DisplayLabel = #31867#22411#32534#21495
				      FieldName = 'I550_002'
				      Size = 10
				    end
				    object ADOQuery1I550_003: TWideStringField
				      DisplayLabel = #31867#22411#21517#31216
				      FieldName = 'I550_003'
				      Size = 30
				    end
				  end
				end
							

相关资源