一个用Delphi开发的ERP软件

				inherited Ser110_02Form: TSer110_02Form
				  Left = 166
				  Top = 180
				  Width = 513
				  Height = 177
				  Caption = #26469#30005#29366#24577#32500#25252
				  OldCreateOrder = True
				  PixelsPerInch = 96
				  TextHeight = 12
				  object Bevel1: TBevel [0]
				    Left = 8
				    Top = 8
				    Width = 489
				    Height = 105
				    Shape = bsFrame
				  end
				  object lblCode: TLabel [1]
				    Left = 16
				    Top = 40
				    Width = 48
				    Height = 12
				    Caption = #29366#24577#32534#21495
				  end
				  object lblName: TLabel [2]
				    Left = 168
				    Top = 40
				    Width = 48
				    Height = 12
				    Caption = #29366#24577#21517#31216
				  end
				  object lblRemark: TLabel [3]
				    Left = 168
				    Top = 72
				    Width = 48
				    Height = 12
				    Caption = #22791#27880#35828#26126
				  end
				  object lblColor: TLabel [4]
				    Left = 16
				    Top = 72
				    Width = 48
				    Height = 12
				    Caption = #29366#24577#39068#33394
				  end
				  object edtCode: TEdit [5]
				    Left = 72
				    Top = 32
				    Width = 81
				    Height = 20
				    ImeName = ''
				    TabOrder = 0
				  end
				  object edtName: TEdit [6]
				    Left = 224
				    Top = 32
				    Width = 257
				    Height = 20
				    ImeName = ''
				    TabOrder = 1
				  end
				  object edtRemark: TEdit [7]
				    Left = 224
				    Top = 64
				    Width = 257
				    Height = 20
				    ImeName = ''
				    TabOrder = 2
				  end
				  object cbColor: TColorBox [8]
				    Left = 72
				    Top = 64
				    Width = 81
				    Height = 22
				    ItemHeight = 16
				    TabOrder = 3
				  end
				  object bbtnOk: TBitBtn [9]
				    Left = 320
				    Top = 120
				    Width = 75
				    Height = 25
				    Caption = #30830#23450'(&O)'
				    TabOrder = 4
				    OnClick = bbtnOkClick
				  end
				  object bbtnExit: TBitBtn [10]
				    Left = 408
				    Top = 120
				    Width = 75
				    Height = 25
				    Caption = #36864#20986'(&X)'
				    TabOrder = 5
				    OnClick = bbtnExitClick
				  end
				  object PopupMenu1: TPopupMenu
				    Left = 16
				    Top = 120
				    object MenuItem1: TMenuItem
				      Caption = #30028#38754#35789#27719#32534#36753'(&L)...'
				      Visible = False
				    end
				    object MenuItem2: TMenuItem
				      Caption = #30028#38754#26679#24335#35774#35745'(&I)...'
				      Visible = False
				    end
				    object MenuItem3: TMenuItem
				      Caption = #34920#32467#26500#32500#25252'(&T)...'
				      Visible = False
				    end
				  end
				  object qrySer110: TADOQuery
				    CacheSize = 1000
				    Connection = SYSDM.ADOC
				    CursorType = ctStatic
				    AfterScroll = qrySer110AfterScroll
				    Parameters = 
				    SQL.Strings = (
				      'select * from ser110 ')
				    Left = 56
				    Top = 128
				    object qrySer110S110_001: TAutoIncField
				      FieldName = 'S110_001'
				      ReadOnly = True
				    end
				    object qrySer110S110_002: TWideStringField
				      FieldName = 'S110_002'
				      Size = 10
				    end
				    object qrySer110S110_003: TWideStringField
				      FieldName = 'S110_003'
				      Size = 50
				    end
				    object qrySer110S110_004: TWideStringField
				      FieldName = 'S110_004'
				      Size = 100
				    end
				    object qrySer110S110_005: TIntegerField
				      FieldName = 'S110_005'
				    end
				  end
				end