TTable: desplazar el contenido de los campos

[Susanna]

Hola,

tengo un objeto TTable enlazado con una tabla de DBase.
La tabla tiene 60 campos, igual que el TTable.
Quiero mover el contenido de los campos del TTable:
el primer campo coja los valores del segundo campo,
el segundo los valores del tercero,
y así hasta el último campo, que tiene que contener nuevos valores.

A más a más, la operación tiene que ser muy rápida porqué hay un grid vinculado al TTable.

Gracias por adelantado.