关于dbgrid的columns的title的有关问题，多谢大家帮看看

关于dbgrid的columns的title的问题，谢谢大家帮看看
我像在代码里面根据条件设置dbgrid的columns的title的caption的值

但是不知道为什么不成功,下面的dbgrid1已经连接好数据库了。
procedure   tform1.button1click(sender:   Tobject);
begin
    dbgrid1.columns.clear;
    dbgrid1.columns[0].fieldname   :=   'rybh ';
    dbgrid1.columns[0].title.caption   :=   '人员编号 ';
    dbgrid1.columns[0].width   :=   100;
end;
测试中   按下button后   字段名还是rybh，我不知道怎么修改成我想要的，请大家帮看看

[解决办法]
var
t:TColumn;
begin
dbgrid1.columns.clear;
t:=dbgrid1.Columns.Add;
t.fieldname := 'rybh ';
t.Title.caption := '人员编号 ';
t.width := 100;
end;