Pues actuarías de forma similar a como ha dicho Federico, pero almacenando el valor en el Query correspondiente y no en un TEdit.
Código Delphi
[-]
DataSet.Edit;
DataSet.FieldByName('MiCampoDestino').Value := DataSet.FieldByName('MiCampoOrigen').Value;
DataSet.Post;
Saludos!