一个用Delphi开发的ERP软件
源代码在线查看: bas200_13.dfm.svn-base
inherited Bas200_13Form: TBas200_13Form
Left = 21
Top = 1
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #21333#25454#32500#25252
ClientHeight = 530
ClientWidth = 769
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 12
object gbDetail: TGroupBox [0]
Left = 8
Top = 472
Width = 753
Height = 49
TabOrder = 2
object lblCreateDate: TLabel
Left = 24
Top = 24
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #21046#21333#26085#26399
end
object lblCreateBy: TLabel
Left = 208
Top = 24
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #21046#21333#20154#21592
end
object lblUpdateDate: TLabel
Left = 376
Top = 24
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #20462#25913#26085#26399
end
object lblUpdateBy: TLabel
Left = 568
Top = 24
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #20462#25913#20154#21592
end
object edtCreateDate: TEdit
Left = 80
Top = 16
Width = 121
Height = 20
Color = clBtnFace
Enabled = False
ImeName = ''
ReadOnly = True
TabOrder = 0
end
object edtCreateBy: TEdit
Left = 264
Top = 16
Width = 105
Height = 20
Color = clBtnFace
Enabled = False
ImeName = ''
ReadOnly = True
TabOrder = 1
end
object edtUpdateDate: TEdit
Left = 440
Top = 16
Width = 121
Height = 20
Color = clBtnFace
Enabled = False
ImeName = ''
ReadOnly = True
TabOrder = 2
end
object edtUpdateBy: TEdit
Left = 624
Top = 16
Width = 105
Height = 20
Color = clBtnFace
Enabled = False
ImeName = ''
ReadOnly = True
TabOrder = 3
end
end
object CoolBar1: TCoolBar [1]
Left = 0
Top = 0
Width = 769
Height = 43
AutoSize = True
Bands = <
item
Control = ToolBar2
ImageIndex = -1
MinHeight = 39
Width = 765
end>
object ToolBar2: TToolBar
Left = 9
Top = 0
Width = 752
Height = 39
AutoSize = True
ButtonHeight = 39
ButtonWidth = 49
Caption = 'ToolBar2'
EdgeBorders = []
Flat = True
Images = SYSDM.imgBtn
ParentShowHint = False
ShowCaptions = True
ShowHint = True
TabOrder = 0
object tlbFirst: TToolButton
Left = 0
Top = 0
Action = ActFirst
AutoSize = True
end
object tlbPrior: TToolButton
Left = 35
Top = 0
Action = ActPrior
AutoSize = True
end
object tlbNext: TToolButton
Left = 70
Top = 0
Action = ActNext
AutoSize = True
end
object tlbLast: TToolButton
Left = 105
Top = 0
Action = ActLast
AutoSize = True
end
object ToolButton1: TToolButton
Left = 140
Top = 0
Width = 8
Caption = 'ToolButton1'
ImageIndex = 13
Style = tbsSeparator
end
object tlbInsert: TToolButton
Left = 148
Top = 0
Action = ActInsert
AutoSize = True
end
object tlbUpdate: TToolButton
Left = 183
Top = 0
Action = ActUpdate
AutoSize = True
end
object tlbDelete: TToolButton
Left = 218
Top = 0
Action = ActDelete
AutoSize = True
end
object ToolButton2: TToolButton
Left = 253
Top = 0
Width = 8
Caption = 'ToolButton2'
ImageIndex = 13
Style = tbsSeparator
end
object tlbSave: TToolButton
Left = 261
Top = 0
Action = ActSave
AutoSize = True
end
object tlbCancel: TToolButton
Left = 296
Top = 0
Action = ActCancel
AutoSize = True
end
object ToolButton3: TToolButton
Left = 331
Top = 0
Width = 8
Caption = 'ToolButton3'
ImageIndex = 13
Style = tbsSeparator
end
object ToolButton4: TToolButton
Left = 339
Top = 0
Action = Action1
AutoSize = True
end
object ToolButton5: TToolButton
Left = 392
Top = 0
Action = Action2
AutoSize = True
end
object ToolButton8: TToolButton
Left = 445
Top = 0
Action = Action3
AutoSize = True
end
object ToolButton9: TToolButton
Left = 498
Top = 0
Action = Action4
AutoSize = True
end
object ToolButton7: TToolButton
Left = 551
Top = 0
Width = 8
Caption = 'ToolButton7'
ImageIndex = 16
Style = tbsSeparator
Visible = False
end
object tlbRefresh: TToolButton
Left = 559
Top = 0
Action = ActRefresh
AutoSize = True
end
object tlbLocate: TToolButton
Left = 594
Top = 0
Action = ActLocate
AutoSize = True
end
object tlbSearch: TToolButton
Left = 629
Top = 0
Action = ActSearch
AutoSize = True
end
object tlbPrint: TToolButton
Left = 664
Top = 0
Action = ActPrint
AutoSize = True
end
object ToolButton6: TToolButton
Left = 699
Top = 0
Width = 8
Caption = 'ToolButton6'
ImageIndex = 16
Style = tbsSeparator
end
object tlbExit: TToolButton
Left = 707
Top = 0
Action = ActExit
AutoSize = True
end
end
end
object gbInfo: TGroupBox [2]
Left = 8
Top = 48
Width = 753
Height = 145
Caption = #22522#26412#20449#24687
TabOrder = 0
object lblCode: TLabel
Tag = 1
Left = 24
Top = 24
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #21333#25454#32534#21495
end
object edtCode: TEdit
Left = 80
Top = 16
Width = 121
Height = 20
ImeName = ''
TabOrder = 0
end
end
object ActionList1: TActionList
Images = SYSDM.imgBtn
Left = 696
Top = 8
object ActFirst: TAction
Caption = #26368#21069
Hint = #31227#21040#31532#19968#26465#35760#24405
ImageIndex = 0
ShortCut = 32838
OnExecute = ActFirstExecute
end
object ActPrior: TAction
Caption = #19978#31227
Hint = #31227#21040#19978#19968#26465#35760#24405
ImageIndex = 1
ShortCut = 32834
OnExecute = ActPriorExecute
end
object ActNext: TAction
Caption = #19979#31227
Hint = #31227#21040#19979#19968#26465#35760#24405
ImageIndex = 2
ShortCut = 32846
OnExecute = ActNextExecute
end
object ActLast: TAction
Caption = #26368#21518
Hint = #31227#21040#26368#21518#19968#26465#35760#24405
ImageIndex = 3
ShortCut = 32844
OnExecute = ActLastExecute
end
object ActInsert: TAction
Caption = #26032#22686
Hint = #26032#22686#19968#26465#35760#24405
ImageIndex = 4
ShortCut = 32833
OnExecute = ActInsertExecute
end
object ActUpdate: TAction
Caption = #20462#25913
Hint = #20462#25913#24403#21069#35760#24405
ImageIndex = 5
ShortCut = 32837
OnExecute = ActUpdateExecute
end
object ActDelete: TAction
Caption = #21024#38500
Hint = #21024#38500#24403#21069#35760#24405
ImageIndex = 6
ShortCut = 32836
OnExecute = ActDeleteExecute
end
object ActSave: TAction
Caption = #20445#23384
Enabled = False
Hint = #20445#23384#32534#36753#30340#35760#24405
ImageIndex = 7
ShortCut = 32851
OnExecute = ActSaveExecute
end
object ActCancel: TAction
Caption = #21462#28040
Enabled = False
Hint = #21462#28040#32534#36753#30340#35760#24405
ImageIndex = 8
ShortCut = 32835
OnExecute = ActCancelExecute
end
object ActRefresh: TAction
Caption = #21047#26032
Hint = #21462#24471#26368#26032#30340#25968#25454
ImageIndex = 9
ShortCut = 32850
OnExecute = ActRefreshExecute
end
object ActLocate: TAction
Caption = #26597#25214
Hint = #24555#36895#23450#20301#35760#24405
ImageIndex = 10
ShortCut = 32847
OnExecute = ActLocateExecute
end
object ActSearch: TAction
Caption = #26597#35810
Hint = #25353#26465#20214#26597#35810#25968#25454
ImageIndex = 11
ShortCut = 32849
OnExecute = ActSearchExecute
end
object ActPrint: TAction
Caption = #25171#21360
Hint = #23558#25968#25454#25171#21360#20986#26469
ImageIndex = 12
ShortCut = 32848
OnExecute = ActPrintExecute
end
object ActExit: TAction
Caption = #36864#20986
Hint = #20851#38381#24403#21069#31383#21475
ImageIndex = 15
ShortCut = 32856
OnExecute = ActExitExecute
end
object Action1: TAction
Tag = 2
Caption = 'Action1'
Visible = False
end
object Action2: TAction
Tag = 2
Caption = 'Action2'
Visible = False
end
object Action3: TAction
Tag = 2
Caption = 'Action3'
Visible = False
end
object Action4: TAction
Tag = 2
Caption = 'Action4'
Visible = False
end
end
object ADOQuery1: TADOQuery
CacheSize = 1000
Connection = SYSDM.ADOC
AfterScroll = ADOQuery1AfterScroll
Parameters =
Left = 40
Top = 80
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 8
Top = 80
end
end