在窗口创建时移动DBGrid中各列？？？

Question

请问Delphi6中如何在窗口创建时根据设置值移动DBGrid中各列顺序？
如同一个窗口中同一个DBGrid有的部门需要把有关金额的列放在最前面，有的部门需要把有关数量的列放在最前面，方便查看，在DBGrid中可以用鼠标来拖放各列，但我不想每次打开窗口时都去拖一次，哪样太麻烦了，我试过用
DBGrid1.OnColumnMoved(sender,DBGridEh1.FieldColumns['thisyear'].Index,i);不行请大师们指教......

Answer 1

上面写错了,应该是：
for i:=0 to 29 do
begin
    DBGrid1.OnColumnMoved(sender,DBGrid1.FieldColumns['thisyear'].Index,i);
end;

Answer 2

DBGrid1.Columns[2].Index:=1;   //把第三列数据移到第二列

Answer 3

假如金额是第N列
 DBGrid1.Columns[N-1].Index:=0;  //移动到第一列

Answer 4

哈哈，谢谢，我竟没想到这样了，一头钻在'move'上了......