Club Delphi  
    Paypal   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 Temas de Hoy

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 22-09-2003
__cadetill __cadetill is offline
Miembro
 
Registrado: may 2003
Posts: 3.387
Poder: 27
__cadetill Va por buen camino
Otra opcion para manteniendo el try except es la utilización de raise

Código:
    try
        msBDTmP.Connected:=true;
    except
        raise;
    end;
Así también visualizarás el error que se produce.
Otra alternativa para visualizar el error y mostrar un mensaje al usuario algo más bonito, es capturarlo

Código:
var
  str : string;
begin
......
    try
        msBDTmP.Connected:=true;
    except
        on E: Exception do
        begin
           str := 'Error conectado. Mensaje de error: ' + E.Message;
           Application.MessageBox(PChar(str), 'Atención', MB_OK);
        end,
    end;
end,
Espero te sirva
Responder Con Cita
 



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


La franja horaria es GMT +2. Ahora son las 21:45:29.


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