Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Cerrar conexión al cerrar formulario (https://www.clubdelphi.com/foros/showthread.php?t=34354)

arantzal 07-08-2006 12:48:07

Cerrar conexión al cerrar formulario
 
Buenas, tengo un problema con las conexiones.

Me han pasado un código que hace lo siguiente:

En el show de un formulario:
Código:

//crea el TADOCOnnection
Copia:= TAdoconnection.create(nil);
copia.connectionstring:= cadconremota;
copia.loginprompt:= false;
 
//pasa las conexiones a los ADOQuerys
QProducto.connection:= copia;
QRela.connection:= copia;
 
//los abre
 
QProducto.open;
QRela.open;

Lo que no consigo es cerrar la conexión.

En el close del formulario lo he intentado con cerrando la conexión (copia), cerrando los AdoQuerys y nada.... No se cierra hasta que no cierro la aplicación y necesito que se cierre al cerrar el formulario.

Alguna idea????

Saludos.
Gracias.

vtdeleon 07-08-2006 15:42:39

Cita:

No se cierra hasta que no cierro la aplicación...
Cita:

y necesito que se cierre al cerrar el formulario.
Eeh? Cómo?

Por decir algo..., utiliza el evento OnCloseQuery.:confused:

luisgutierrezb 07-08-2006 15:45:02

y si pruebas despues de cerrar la conexion, hacerla "nil"?

arantzal 08-08-2006 09:31:29

Buenas,

lo que me pasa es que yo compruebo las conexiones abiertas con:

select HostName, program_name, net_library, login_time, last_batch from master.dbo.SysProcesses where Program_name = 'Productos'

Y me gustaría cerrarlas en los close de los formularios.
Lo he intentado haciendo close de la connection y nada.

Alguna idea?

Saludos y gracias.

vtdeleon 08-08-2006 15:57:21

Saludod

No te funciona:
Adoconnection.Close;
ó
AdoQuery1.close
ó
AdoTable1.Close
?????????

No me queda clara tu duda aun. Pon algo de código, mas detalles.

arantzal 09-08-2006 12:43:52

Buenas,
lo que me pasa es que no consigo controlar el cierre de las conexiones.

En el vento onclose del formulario pongo:

copia.free;

y no me cierra la conexión.

Alguna idea?

Saludos


La franja horaria es GMT +2. Ahora son las 16:35:55.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi