Mover dados na Grid

Pessoal

Tenho uma grid com vários registros. Como faço por exemplo para pegar o primeiro registro e posicionar na segunda posição.

O que estou fazendo é usar um moveby(+1), para posicionar no próximo registro. Só que tenho criar uma rotina para mudar a posição dele, tipo colocar o registro para a segunda posição.

Uso Delphi 6 + Firebird



Fico no aguardo