好像也没有错啊
你看:
object Form1: TForm1
Left = 207
Top = 72
Width = 803
Height = 605
Caption = '数据浏览'
Color = clTeal
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
Position = poDesktopCenter
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 568
Top = 88
Width = 72
Height = 24
Caption = '数据浏览'
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -20
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 48
Top = 96
Width = 144
Height = 24
Caption = '请选择浏览的表格'
Color = clBackground
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -20
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label3: TLabel
Left = 320
Top = 24
Width = 176
Height = 33
Caption = '数据表浏览'
Font.Charset = DEFAULT_CHARSET
Font.Color = clYellow
Font.Height = -33
Font.Name = '隶书'
Font.Style = [fsBold]
ParentFont = False
end
object Panel1: TPanel
Left = 40
Top = 464
Width = 489
Height = 49
Caption = 'Panel1'
TabOrder = 6
end
object DBGrid1: TDBGrid
Left = 224
Top = 120
Width = 553
Height = 305
BiDiMode = bdRightToLeftNoAlign
Color = clInfoBk
DataSource = DataSource1
FixedColor = clScrollBar
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentBiDiMode = False
ParentFont = False
ParentShowHint = False
ReadOnly = True
ShowHint = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object ListBox1: TListBox
Left = 48
Top = 120
Width = 161
Height = 305
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 16
Items.Strings = (
'本厂石灰表'
'外来石灰表'
'铁水成分表'
'甲班炉前操作记录表'
'乙班炉前操作记录表'
'丙班炉前操作记录表'
'丁班炉前操作记录表'
'终渣成分表'
'甲班炉前操作记录表2'
'乙班炉前操作记录表2'
'丙班炉前操作记录表2'
'丁班炉前操作记录表2'
'终渣成分表2'
'石灰成分表2'
'磷分配比2'
'磷分配比'
'硫分配比2'
'硫分配比')
ParentFont = False
TabOrder = 1
OnClick = ListBox1Click
end
object Button1: TButton
Left = 216
Top = 472
Width = 129
Height = 33
Caption = '数据查找和统计'
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clMaroon
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 392
Top = 472
Width = 121
Height = 33
Caption = '数据分布图'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = Button2Click
end
object Button4: TButton
Left = 704
Top = 480
Width = 75
Height = 25
Caption = '退出'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = Button4Click
end
object Button3: TButton
Left = 48
Top = 472
Width = 121
Height = 33
Caption = '数据录入与修改'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = Button3Click
end
object DataSource1: TDataSource
DataSet = Table1
Left = 8
Top = 136
end
object Table1: TTable
Left = 285
Top = 428
end
object MainMenu1: TMainMenu
Left = 8
Top = 72
object N1: TMenuItem
Caption = '原始数据'
object N15: TMenuItem
Caption = '数据录入和修改'
OnClick = N15Click
end
object N2: TMenuItem
Caption = '数据查找'
OnClick = N2Click
end
object N3: TMenuItem
Caption = '数据分布'
OnClick = N3Click
end
end
object N4: TMenuItem
Caption = '物料平衡计算'
end
object N5: TMenuItem
Caption = '数学分析'
object N8: TMenuItem
Caption = '回归分析'
end
object N9: TMenuItem
Caption = '线性规划'
end
end
object N6: TMenuItem
Caption = '经验模型'
object N10: TMenuItem
Caption = '脱磷'
end
object N11: TMenuItem
Caption = '脱硫'
end
object N12: TMenuItem
Caption = '炉渣熔点'
end
end
object N7: TMenuItem
Caption = '帮助'
object N13: TMenuItem
Caption = '帮助'
end
object N14: TMenuItem
Caption = '关于'
end
end
end
end