kdbgrid moving columns problem

[tester-dev]

hi everybody.
when i move a column the header moves but the column data returned back.

[tester-dev]

i did this and it is fixed.

Code: Pascal  [Select][+][-]

1. procedure TNGrid.KDBGridColumnMoved(Sender: TObject; FromIndex,
2.   ToIndex: Integer);
3. begin
4.     DM.SQLQuery1.Fields[FromIndex-CFix].Index:=ToIndex-CFix;
5.     Col_Moved := true;
6. end;