DELPHI5.0 的TColumn类对应7.0为什么类

Question

DELPHI5.0 的TColumn类对应7.0为什么类
我的一本书上有如下代码：
var
column:Tcolumn ;
beginn17.checked:=not(n17.checked);
column:=tgzcjform.dbgrid1.columns.items[tgzcjform.dbgrid1.selectedindex];
if column=tgzcjform.dbgrid1.Columns.Items[tgzcjform.dbgrid1.SelectedIndex]
then
if(n17.Checked) then begin
column.font.Color:=clblue;
column.font.Style:=[fsbold];
end else begin
column.font.color:=clinfotext;
column.font.style:=[];
end;       
end;
可编译时通不过，显示错误为：
[Error] cuzhong.pas(86): Undeclared identifier: 'Tcolumn'
我用的编译器为7.0，不知现在对应什么类。

Answer 1

这个column并没有创建啊
       Column:=Tcolumn.create(self);

Answer 2

加上您的代码以后多一条错误
[Error] cuzhong.pas(89): Missing operator or semicolon

Answer 3

在你的单元里加上　DBGrids 单元