一个用Delphi开发的ERP软件
源代码在线查看： rab100_01.dfm.svn-base
inherited Rab100_01Form: TRab100_01Form
Left = 192
Top = 92
HelpContext = 51
Caption = #23487#33293#36164#26009#32500#25252
PixelsPerInch = 96
TextHeight = 12
inherited PageControl1: TPageControl
inherited TabSheet1: TTabSheet
inherited ScrollBox2: TScrollBox
inherited dxDBGrid1: TdxDBGrid
Filter.Criteria = {00000000}
object dxDBGrid1R100_002: TdxDBGridColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 0
RowIndex = 0
FieldName = 'R100_002'
end
object dxDBGrid1R100_003: TdxDBGridColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 0
RowIndex = 0
FieldName = 'R100_003'
end
object dxDBGrid1R100_004: TdxDBGridColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 0
RowIndex = 0
FieldName = 'R100_004'
end
object dxDBGrid1R100_005: TdxDBGridMaskColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 0
RowIndex = 0
FieldName = 'R100_005'
end
object dxDBGrid1R100_006: TdxDBGridColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 0
RowIndex = 0
FieldName = 'R100_006'
end
object dxDBGrid1R100_007: TdxDBGridColumn
DisableEditor = True
HeaderAlignment = taCenter
BandIndex = 0
RowIndex = 0
FieldName = 'R100_007'
end
end
end
end
inherited TabSheet2: TTabSheet
inherited ScrollBox1: TScrollBox
object Label1: TLabel
Tag = 1
Left = 124
Top = 36
Width = 48
Height = 12
Caption = #23487#33293#32534#21495
FocusControl = DBEdit1
end
object Label2: TLabel
Tag = 1
Left = 124
Top = 63
Width = 48
Height = 12
Caption = #23487#33293#35828#26126
FocusControl = DBEdit2
end
object Label3: TLabel
Left = 124
Top = 117
Width = 48
Height = 12
Caption = #23487#33293#22320#22336
FocusControl = DBEdit3
end
object Label4: TLabel
Tag = 1
Left = 124
Top = 90
Width = 48
Height = 12
Caption = #20303#25151#25968#37327
FocusControl = DBEdit4
end
object Label5: TLabel
Left = 124
Top = 144
Width = 48
Height = 12
Caption = #30005' '#35805
FocusControl = DBEdit5
end
object Label6: TLabel
Left = 124
Top = 171
Width = 48
Height = 12
Caption = #22791' '#27880
FocusControl = DBEdit6
end
object DBEdit1: TDBEdit
Left = 185
Top = 32
Width = 104
Height = 20
DataField = 'R100_002'
DataSource = DataSource1
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 185
Top = 59
Width = 200
Height = 20
DataField = 'R100_003'
DataSource = DataSource1
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 185
Top = 113
Width = 197
Height = 20
DataField = 'R100_004'
DataSource = DataSource1
TabOrder = 3
end
object DBEdit4: TDBEdit
Left = 185
Top = 86
Width = 104
Height = 20
DataField = 'R100_005'
DataSource = DataSource1
TabOrder = 2
end
object DBEdit5: TDBEdit
Left = 185
Top = 139
Width = 133
Height = 20
DataField = 'R100_006'
DataSource = DataSource1
TabOrder = 4
end
object DBEdit6: TDBEdit
Left = 185
Top = 166
Width = 197
Height = 20
DataField = 'R100_007'
DataSource = DataSource1
TabOrder = 5
end
end
end
end
inherited ADOQuery1: TADOQuery
SQL.Strings = (
'select * from RAB100')
object ADOQuery1R100_001: TAutoIncField
DisplayLabel = #30005#33041#32534#21495
FieldName = 'R100_001'
ReadOnly = True
Visible = False
end
object ADOQuery1R100_002: TStringField
DisplayLabel = #23487#33293#32534#21495
FieldName = 'R100_002'
FixedChar = True
Size = 10
end
object ADOQuery1R100_003: TStringField
DisplayLabel = #23487#33293#35828#26126
FieldName = 'R100_003'
end
object ADOQuery1R100_004: TStringField
DisplayLabel = #23487#33293#22320#22336
FieldName = 'R100_004'
Size = 30
end
object ADOQuery1R100_005: TIntegerField
DisplayLabel = #20303#25151#25968#37327
FieldName = 'R100_005'
end
object ADOQuery1R100_006: TStringField
DisplayLabel = #30005#35805
FieldName = 'R100_006'
end
object ADOQuery1R100_007: TStringField
DisplayLabel = #22791#27880
FieldName = 'R100_007'
Size = 30
end
end
end
