PDA

Ver la Versión Completa : Insertar texto de un Tmemo a un TQuery y a una Tabla


mrmanuel
29-06-2005, 18:27:37
Hola a todos/as

Lo que quiero hacer es insertar el contenido de un campo TMemo de mi form a una tabla de tipo DBase IV.

Hasta ahora, lo que he hecho es meter los datos en un Registro, y luego mediate sentecia sql, pasar los datos del registro a una TQuery, que al ejecutarla me inserta los datos en la tabla.

El problema se me da a la hora de insertar los datos del Memo a la Query, ya que me dice que los datos son de distinto tipo. (String y TMemo).
Se que directamente no se puede hacer, ya que son de distinto tipo. He pensado en hacerlo linea a linea, pero no lo veo muy factible.

¿a alguien se le ocurre alguna forma?


Lo que hago es esto:


Reg_Datos = Record
Campo_1: ...
Campo_Memo: TMemo;
End;

....
//Meto los datos en el registro
Reg_Datos.Campo_Memo.Lines:= Memo.Lines;

....
//Inserto los datos en la Query
Query.Sql.Add ('Insert into 'c:\tabla_DBase_IV.dbf' +
'(Campo_1, ... Campo_Memo)' +
'values (''' + Reg_Datos.Campo_1 + ''',' +
'''' + Reg_DAtos_Campo_Memo + '''');

Query.ExecSql;



Gracias por adelantado

defcon1_es
30-06-2005, 11:03:11
Hola,
Lo que estás intentando introducir en la sentencia SQL es el Objeto memo, no el contenido, que es lo que te interesa.

¿has probado esto?


//Inserto los datos en la Query
Query.Sql.Add ('Insert into 'c:\tabla_DBase_IV.dbf' +'(Campo_1, ... Campo_Memo)' +
'values (''' + Reg_Datos.Campo_1 + ''',' + '''' + Reg_DAtos_Campo_Memo.Lines.Text + '''');

Query.ExecSql;

mrmanuel
06-07-2005, 22:10:16
sip, y no funciona.

:confused:

maeyanes
06-07-2005, 22:32:36
No funciona? Que error te da?