Estimados colegas, ante todo, las gracias por sus respuestas, que tendre en cuenta.
Ayer segu� cacharreando y encontr� esta soluci�n
if not fdm.tTemp5.IsEmpty then
begin
if fdm.tTemp5.Active=true then fdm.tTemp5.Active:=false;
fdm.tTemp5.FileName := camino_actual + '\temp.db';
fdm.tTemp5.SQL:='DELETE FROM temp5';
fdm.tTemp5.ExecSQL;
if fdm.tTemp5.Active = False then fdm.tTemp5.Active := True
else begin end;
end
else
begin {ShowMessagePos('Vacia',10,10);} end;
ya que tengo que usar la tabla Temp5 varias veces con distintos contenidos y pens� que es mejor comenzar por limpiarla antes de meterle nuevos contenidos.
Pude comprobar que la tabla queda vacia, y puse dichas instrucciones en el bot�n Salir para cerrar la forma con la tabla limpia.
Si hay mas observaciones, ser�n bienvenidas.
Gracias de nuevos a todos.
Ing. H�ctor Fiandor
hfiandor en ceniai.inf.cu
De: Juan Perles [mailto:perlesj en gmail.com]
Enviado el: domingo, 30 de agosto de 2015 11:03 a. m. Para: Spanish version of Lazarus List
Asunto: Re: [Lazarus-es] comando EMPTY
H�ctor como yo lo tengo es
glSQL := 'delete from ' + Nombretabla + ';';
EjecutarSentenciaSQL;
Y tengo un procedimiento llamado SentenciaSQL que invoco para ejecutar cualquier comando.
Proceder� EjecutarSentenciaSQL;
TrsGeneral.Commit;
TrsGeneral.StartTransaction;
With SQLQuery do Begin;
Close;
SQL.Clear;
SQL.Text := glSQL;
ExecSql;
TrsGeneral.Commit;
De esta manera para m� tan s�lo son dos l�neas.
Juan Perles
628.482.007
Enviado desde mi iPad
El 29/8/2015, a las 20:28, H�ctor Fiandor <hfiandor en ceniai.inf.cu> escribi�:
Estoy usando sqlite.
Ya descubri que haci�ndolo por comandos SQL limpia bien. La �nica cosa en contra es que son como 6 lineas de comandos.
Saludos y escr�beme
Ing. H�ctor Fiandor
<mailto:hfiandor en ceniai.inf.cu> hfiandor en ceniai.inf.cu
De: francisco prieto [mailto:fajprieto en gmail.com] Enviado el: s�bado, 29 de agosto de 2015 12:02 p. m. Para: Spanish version of Lazarus List
Asunto: Re: [Lazarus-es] comando EMPTY
Hector,
Cual es el motor de base de datos que estas usando porque por ejemplo en Firebird si no haces un Commit es como si no hicieras nada.
Saludos,
Pancho
C�rdoba
Argentina
El 29 de agosto de 2015, 12:39, H�ctor Fiandor <hfiandor en ceniai.inf.cu> escribi�:
Estimados colegas:
Estoy haciendo una aplicaci�n donde tengo una tabla tTemp5 que deseo vaciar (borrar datos solamente) para que comience ?limpia?.
Hago while not fdm.tTemp5.IsEmpty do fdm.tTemp5.delete;
Pero con esto solamente parece que no se alcanza el objetivo.
Les agradecer� cualquier ayuda.
Gracias por anticipado
Ing. H�ctor Fiandor
hfiandor en ceniai.inf.cu
