How to add columns in DGgrid at runtime ?

Var
    dbCol : TColumn ;

dbCol := dbGrid1.Columns.Add ;
dbCol.Title.Caption := 'New Column' ;
dbCol.Field := MyTable.FieldByName('Phone') ;

-Steve-

Quote
denver <den...@hightalent.com.hk> wrote in message

news:7ud9kt$63v18@forums.borland.com...
Hello ,

Could anyone tell me how to add columns in DGgrid at runtime ?

thanks
Denver