Saber si hay Querys abiertos
 

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 ?????

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

Saber si un Query está abierto
 

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.

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

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

// Saludos