Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 09-01-2018
acanogal acanogal is offline
Registrado
 
Registrado: May 2006
Posts: 3
Poder: 0
acanogal Va por buen camino
Conocer si un programa está conectado en local o remoto

Hola a todos y Feliz 2018!!

Actualmente para saber si un programa se ejecuta en local o remoto usamos la siguiente función:
Código Delphi [-]
class function TSqlConfig.EstoyEnServidor: Boolean;
var
  vBaseDatos:TFDConnection;
  vConfig: TSqlConfig;
begin
  //Intento una conexion con la base de datos en modo local (localhost)
  vConfig := TSqlConfig.ReadIni;
  if Assigned(vConfig) then
    try
      try
        vBaseDatos:=TFDConnection.Create(nil);
        vBaseDatos.Params.Assign(TSqlConfig.ConnectionParams('localhost',vConfig.Port,vConfig.Path));
        Result := vBaseDatos.Ping;
      except
        On Exception do
          Result := false;
      end
    finally
      vBaseDatos.Free;
    end;
end;

Evidentemente, cuando la conexión es remota se genera una excepción y el consiguiente retardo en el tratamiento de la excepción, además del tiempo de conexión.

¿Conocéis alguna forma más eficiente de hacer esto?
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Saber si un PC esta conectado Alexander API de Windows 4 14-07-2011 17:16:49
saber quien esta conectado a mi programa delphi ingabraham Varios 25 21-06-2011 23:12:35
IdUDPServer Saver IP Local conectado cliente wuepe Internet 1 03-01-2010 02:58:08
Sincronizar contenido de dos directorios(local-remoto) maxvera Internet 6 04-10-2007 19:46:27
Saber si esta conectado Kaesbu Internet 1 22-09-2003 14:09:45


La franja horaria es GMT +2. Ahora son las 18:53:08.


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