Hola Kia, no es necesario que hagas el select, puedes hacer directamente el update y ejecutarlo con tu DataSet.
Código Delphi
[-]
With MDOQuery2 do
begin
Close;
SQL.Clear;
SQL.Add('UPDATE Hierro SET ORO='+QuotedStr('PLATINO')+' WHERE ORO='+QuotedStr('PLATA'));
ExecSql;
end;
Saluditos