¿Cómo inserto los campos con formato TGraphic y TMemo en una tabla?

[nuri]

Hola a todos:
¿Cómo modifico los campos con formato TGraphic y TMemo en una tabla?, es que los quiero insertar por medio de parámetros.
Son tablas de paradox.

Este es mi código:

Código Delphi [-]
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('UPDATE TABLA SET nombre=:nom,');
Query1.SQL.Add('FOTO=:foto where letra=:nom');
 
//Parámetros correspondientes a cada uno de los campos insertados.
Query1.paramByName('nom').AsString:=ComboBox_Nombre.Text;
 
//Copio el fichero de la foto en una carpeta adecuada para ello.
origen:=OpenPictureDialog1.Filename;
 
//Al destino le adjudico una ruta y un nombre al archiv poniendo la
//extensión del archivo origen.
 
destino:='C:\Coches\'+ComboBoxNombre.Text+Copy(origen,Pos('.',origen),4);
 
porigen:=@origen[1];
pdestino:=@destino[1];
 
CopyFile(porigen,pdestino,false);
Query1.ParamByName('foto').AsString:=pdestino;
 
 
Query1.ExecSQL;
 
//Con este código vuelvo a mostrar todos los registros en la tabla
Query1.SQL.Text:='Select * from TABLA';
Query1.Active:=False;
Query1.Active:=True;
Query1.Open;

el campo foto es de tipo TGraphic, tras este código me modifica perfectamente el campo nombre pero el campo foto no me lo modifica, es como si no hubiera escrito el código.
Para insertar utilizo el mismo código cambiando la orden de mysql adecuada para insertar y no tengo ningún problema.
¿?
¿cuál puede ser el error, por + vueltas que le doy no lo veo.


Tengo el Delphi 5
Gracias a quien pueda ayudarme
Atentamente
Nuri