Hola Casimiro, es que ando un poco triste y no sabía ni cómo titular el hilo...
ya intente lo que me conmentaste y me sigue apareciendo el mismo error... no permite la conexion si llevo una consulta en ejecución...
Me explico
Resulta que me llevo el aplicativo para otro equipo y hago desconectarlo, pruebo la Reconexión y todo bien, pero cuando estoy realizando una consulta, y desconecto el equipo, al momento de hacer la reconexión, me muestra una exception que indica que existe una consulta preparada... y es ahí donde muero.
este es el código que tengo para la reconexión
Código Delphi
[-]procedure TfDatos.RecDB;
var
Handle: Integer;
Buffer: array [0..7] of Cardinal;
begin
Handle := IcmpCreateFile;
Coneccion.CloseDataSets;
Coneccion.Close;
if Handle = -1 then
Exit; if not LongBool(IcmpSendEcho(Handle, inet_addr('192.168.1.108'), nil, 0,
nil, @Buffer, SizeOf(Buffer), 1000)) then
begin
CloseHandle(Handle);
Coneccion.Connected:= False;
MsgBox(Titulo, 'Imposible realizar la conexión con la BD', mtError,
['Aceptar'], 0);
end
else
begin
Coneccion.Connected:= False;
Coneccion.Connected:= True;
Coneccion.Open();
MsgBox(Titulo, 'Conexión realizada correctamente', mtInformation,
['Aceptar'], 0);
end;
end;
He llegado incluso a pensar en pasarme a otro motor de base de datos. Con tal de superar este problema.
Gracia por vuestro tiempo
GustavoCruz