Estimados listeros:
Estoy trabajando con Lazarus y tablas SQLite.
Estoy desarrollando una aplicación que tiene una form para Seleccionar, donde hay un botón para hacer una consulta. Cuando se presiona y aparece la pantalla, se activan dos tablas con valores para ser cargados a una nueva tabla: tTemp2. Esta consulta para mi resulta algo compleja, y la solución que aplico es cargar en la nueva tabla (tTemp2) algunos valores. Esto se muestra en un Reporte usando SQLQuery1. Cuando termina, hago lo siguiente:

    fdm.SQLQuery1.Close;
    fdm.SQLTransaction1.Active := False;
    fdm.SQLite3Connection1.Connected := False;
seguido de:
    fdm.tTemp2.Close;
    if fdm.ttemp2.TableExists then
    begin
      try
        fdm.ttemp2.FileName := camino_BD + '\temp.db';
        fdm.ttemp2.SQL := 'DROP TABLE Temp2';
        fdm.ttemp2.ExecSQL;
      except ShowMessagePos('No dropeo',10,10);
      end;
    end else begin ShowMessagePos('al final de SelNSA temp2 no existe',10,10); end;

Hasta aquí, por primera vez, todo lo hace bien. Regreso a la pantalla de Selección.

Si presiono por segunda vez el botón de hacer la consulta, el proceso comienza, pero la tabla tTemp2 no se activa (como lo hace la primera vez).

Esto me obliga a "salir" y comenzar de nuevo para que trabaje bien (solamente es feliz la primera vez).

Quiero aprender por qué no se activa. Si me pueden ayudar, lo voy a agradecer infinitamente

Saludos
Ing. Héctor F. Fiandor Rosario

Muy buenas Héctor.

¿Puede ocurrir que no vuelvas a conectar SQLite3Connection1?

Abrazos

Iván

hfiandor wrote

fdm.SQLite3Connection1.Connected := False;

Puede tener que ver con las transacciones automaticas (se abre una cuando haces cualquier operacion)

Si antes de salir haces un Commit, deberia funcionar cada vez.

2016-11-05 12:12 GMT-03:00 hfiandor via Lazarus-es < lazarus-es en lists.lazarus-ide.org>: