一个用Delphi开发的ERP软件
源代码在线查看： cwa110_01.dfm.svn-base
inherited Cwa110_01Form: TCwa110_01Form
Left = 136
Top = 91
Width = 658
Height = 471
HelpContext = 32
Caption = #29677#21035#25991#20214#32500#25252
PixelsPerInch = 96
TextHeight = 12
inherited CoolBar1: TCoolBar
Width = 650
Bands = <
item
Control = ToolBar2
ImageIndex = -1
MinHeight = 39
Width = 646
end>
inherited ToolBar2: TToolBar
Width = 633
end
end
inherited Panel1: TPanel
Width = 650
inherited Image1: TImage
Width = 646
end
end
inherited PageControl1: TPageControl
Width = 650
Height = 364
inherited TabSheet1: TTabSheet
inherited ScrollBox2: TScrollBox
Width = 642
Height = 334
inherited dxDBGrid1: TdxDBGrid
Width = 638
Height = 330
Bands = <
item
Width = 253
end
item
Caption = #19978#21320
Width = 89
end
item
Caption = #19979#21320
end
item
Caption = #26202#19978
end
item
Width = 80
end>
DefaultLayout = False
KeyField = 'C110_001'
BandColor = 15262169
Filter.Criteria = {00000000}
PreviewLines = 1
ShowBands = True
object dxDBGrid1C110_002: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 0
RowIndex = 0
FieldName = 'C110_002'
end
object dxDBGrid1C110_003: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 0
RowIndex = 0
FieldName = 'C110_003'
end
object dxDBGrid1C110_004: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 55
BandIndex = 1
RowIndex = 0
FieldName = 'C110_004'
end
object dxDBGrid1C110_005: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 55
BandIndex = 1
RowIndex = 0
FieldName = 'C110_005'
end
object dxDBGrid1C110_006: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 55
BandIndex = 2
RowIndex = 0
FieldName = 'C110_006'
end
object dxDBGrid1C110_007: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 55
BandIndex = 2
RowIndex = 0
FieldName = 'C110_007'
end
object dxDBGrid1C110_008: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 55
BandIndex = 3
RowIndex = 0
FieldName = 'C110_008'
end
object dxDBGrid1C110_009: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
Width = 55
BandIndex = 3
RowIndex = 0
FieldName = 'C110_009'
end
object dxDBGrid1C110_011: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 1
RowIndex = 0
FieldName = 'C110_011'
end
object dxDBGrid1C110_012: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 2
RowIndex = 0
FieldName = 'C110_012'
end
object dxDBGrid1C110_013: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 3
RowIndex = 0
FieldName = 'C110_013'
end
object dxDBGrid1C110_010: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 4
RowIndex = 0
FieldName = 'C110_010'
end
end
end
end
inherited TabSheet2: TTabSheet
inherited ScrollBox1: TScrollBox
Width = 642
Height = 334
object Label1: TLabel
Tag = 1
Left = 72
Top = 72
Width = 48
Height = 12
Caption = #29677#21035#32534#21495
FocusControl = DBEdit1
end
object Label2: TLabel
Tag = 1
Left = 256
Top = 72
Width = 48
Height = 12
Caption = #29677#21035#21517#31216
FocusControl = DBEdit2
end
object Label3: TLabel
Tag = 1
Left = 72
Top = 104
Width = 48
Height = 12
Caption = #19978#21320#19978#29677
end
object Label5: TLabel
Tag = 1
Left = 72
Top = 168
Width = 48
Height = 12
Caption = #26202#19978#19978#29677
end
object Label4: TLabel
Tag = 1
Left = 72
Top = 136
Width = 48
Height = 12
Caption = #19979#21320#19978#29677
end
object Label6: TLabel
Left = 96
Top = 200
Width = 24
Height = 12
Caption = #22791#27880
FocusControl = DBEdit9
end
object Label7: TLabel
Tag = 1
Left = 256
Top = 104
Width = 48
Height = 12
Caption = #19978#21320#19979#29677
end
object Label8: TLabel
Tag = 1
Left = 256
Top = 168
Width = 48
Height = 12
Caption = #26202#19978#19979#29677
end
object Label9: TLabel
Tag = 1
Left = 256
Top = 136
Width = 48
Height = 12
Caption = #19979#21320#19979#29677
end
object Label10: TLabel
Tag = 1
Left = 432
Top = 104
Width = 60
Height = 12
Caption = #19978#21320#19979#29677#26085
end
object Label11: TLabel
Tag = 1
Left = 432
Top = 136
Width = 60
Height = 12
Caption = #19979#21320#19979#29677#26085
end
object Label12: TLabel
Tag = 1
Left = 432
Top = 168
Width = 60
Height = 12
Caption = #26202#19978#19979#29677#26085
end
object DBEdit1: TDBEdit
Left = 128
Top = 64
Width = 105
Height = 20
DataField = 'C110_002'
DataSource = DataSource1
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 312
Top = 64
Width = 257
Height = 20
DataField = 'C110_003'
DataSource = DataSource1
TabOrder = 1
end
object DBEdit9: TDBEdit
Left = 128
Top = 192
Width = 441
Height = 20
DataField = 'C110_010'
DataSource = DataSource1
TabOrder = 11
end
object DBEdit3: TdxTimeEdit
Left = 128
Top = 96
Width = 105
TabOrder = 2
TimeEditFormat = tfHourMin
StoredValues = 4
end
object DBEdit4: TdxTimeEdit
Left = 312
Top = 96
Width = 105
TabOrder = 3
TimeEditFormat = tfHourMin
StoredValues = 4
end
object DBEdit5: TdxTimeEdit
Left = 128
Top = 128
Width = 104
TabOrder = 5
TimeEditFormat = tfHourMin
StoredValues = 4
end
object DBEdit6: TdxTimeEdit
Left = 312
Top = 128
Width = 105
TabOrder = 6
TimeEditFormat = tfHourMin
StoredValues = 4
end
object DBEdit7: TdxTimeEdit
Left = 128
Top = 160
Width = 104
TabOrder = 8
TimeEditFormat = tfHourMin
StoredValues = 4
end
object DBEdit8: TdxTimeEdit
Left = 312
Top = 160
Width = 105
TabOrder = 9
TimeEditFormat = tfHourMin
StoredValues = 4
end
object ComboBox1: TComboBox
Left = 496
Top = 96
Width = 73
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 4
Items.Strings = (
#24403#26085
#26126#26085
#21518#26085)
end
object ComboBox2: TComboBox
Left = 496
Top = 128
Width = 73
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 7
Items.Strings = (
#24403#26085
#26126#26085
#21518#26085)
end
object ComboBox3: TComboBox
Left = 496
Top = 160
Width = 73
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 10
Items.Strings = (
#24403#26085
#26126#26085
#21518#26085)
end
end
end
end
inherited ADOQuery1: TADOQuery
CursorType = ctStatic
SQL.Strings = (
'select * from CWA110')
object ADOQuery1C110_001: TAutoIncField
FieldName = 'C110_001'
ReadOnly = True
Visible = False
end
object ADOQuery1C110_002: TStringField
DisplayLabel = #29677#21035#32534#21495
FieldName = 'C110_002'
FixedChar = True
Size = 6
end
object ADOQuery1C110_003: TStringField
DisplayLabel = #29677#21035#21517#31216
FieldName = 'C110_003'
end
object ADOQuery1C110_004: TStringField
DisplayLabel = #19978#29677
FieldName = 'C110_004'
FixedChar = True
Size = 5
end
object ADOQuery1C110_005: TStringField
DisplayLabel = #19979#29677
FieldName = 'C110_005'
FixedChar = True
Size = 5
end
object ADOQuery1C110_006: TStringField
DisplayLabel = #19978#29677
FieldName = 'C110_006'
FixedChar = True
Size = 5
end
object ADOQuery1C110_007: TStringField
DisplayLabel = #19979#29677
FieldName = 'C110_007'
FixedChar = True
Size = 5
end
object ADOQuery1C110_008: TStringField
DisplayLabel = #19978#29677
FieldName = 'C110_008'
FixedChar = True
Size = 5
end
object ADOQuery1C110_009: TStringField
DisplayLabel = #19979#29677
FieldName = 'C110_009'
FixedChar = True
Size = 5
end
object ADOQuery1C110_011: TSmallintField
DisplayLabel = #19978#21320#19979#29677#26085
FieldName = 'C110_011'
OnGetText = ADOQuery1C110_011GetText
end
object ADOQuery1C110_012: TSmallintField
DisplayLabel = #19979#21320#19979#29677#26085
FieldName = 'C110_012'
OnGetText = ADOQuery1C110_012GetText
end
object ADOQuery1C110_013: TSmallintField
DisplayLabel = #26202#19978#19979#29677#26085
FieldName = 'C110_013'
OnGetText = ADOQuery1C110_013GetText
end
object ADOQuery1C110_010: TStringField
DisplayLabel = #22791#27880
FieldName = 'C110_010'
Size = 30
end
end
inherited pmGrid: TPopupMenu
Left = 512
Top = 248
end
end
