[[JClink]]

buenass holas a todos

Mi gran preocupacion en estos momentos es que llevo dias intentando meter el texto de un componente memo en un campo de tipo memo de una base de datos access.

Cuando escribo en el memo e inserto algun tabulador o algún intro y doy a guardarlo me da un error que pone cadena truncada por la derecha y no se como solucionarlo.

los datos los meto en la base de datos de la siguiente manera:

self.Query2.close;
self.Query2.sql.clear;
self.Query2.sql.add('insert into tratamientos Nombre,NifDoctor,NifPaciente,fecha,tipo,descripcion,cerrado) values(:Nombre,:NifDoctor,:NifPaciente,:fecha,:tipo,:descripcion,:cerrado)');
self.query2.Params[0].AsString:=nombre;
self.query2.Params[1].AsString:=NifDoctor;
self.query2.Params[2].AsString:=NifPaciente;
self.query2.Params[3].AsString:=datetostr(date);
self.query2.Params[4].AsString:=tipo;
self.query2.Params[5].AsMemo:=descripcion;
self.query2.Params[6].AsBoolean:=cerrado;
self.Query2.ExecSql;

en el que descripcion le paso el contenido del memo a traves de su propiedad text.

Gracias de antemano.