Saber si hay Querys abiertos

[ramonibk]

El caso es que en una aplicacion tengo diferentes Querys que uso para insertar y bisualizar datos.
el caso es que en algunos momento me he encontrado en que el usuario no termina de rellenar los datos de un formulario y se marcha a otro dejando los qry abierto es insercion de datos por lo cual deja todo colgado.

como puedo saber si el qry esta abierto ?????

[kalimero]

Hola.
En el caso de que se trate de un Dataset puedes ver el estado en que se encuentra. Algo como:

Código Delphi [-]

if Midataset.state in [dsEdit,dsInsert] then
begin
   //hago lo que sea 
end;

Saludos

[Hugo]

Sólo tienes que comprobar su propiedad Active:

if Query1.Active then ...

Esta propiedad, es de lectura y escritura, y lo mismo te puede servir para abrir una DataSet que para consultar su estado.

Salu2.

[[Lepe]]

hola ramonibk, el problema es del usuario, para evitar ese caso, en el onDeactivate del form de insertar revisaría si puede salir o no y no lo dejaba salir hasta que complete los datos o cancele.

SAludos

[roman]

Si el abandonar determinado módulo presenta un problema entonces no permitas que lo abandone mostrando el módulo en una ventana modal.

// Saludos