Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 17-03-2009
Gattaca Gattaca is offline
Miembro
 
Registrado: feb 2009
Posts: 31
Poder: 0
Gattaca Va por buen camino
Question Verificar si el computador tiene acceso a internet?

Hola.

Pues me preguntava si sera que hay una forma de hacer que una aplicasion detecte si hay conexion a internet?... Osea que si la aplicasion no tiene acceso a internet mostrar un mensaje de error...

Saludos
Responder Con Cita
  #2  
Antiguo 17-03-2009
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.732
Poder: 20
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
- Puedes hacer un ping a www.yahoo.es.
- Puedes conectarte a una página web.
- Puedes hacer un ftp.

Si no dan errores, tienes conexión!
Responder Con Cita
  #3  
Antiguo 17-03-2009
Avatar de Young
Young Young is offline
Miembro
 
Registrado: abr 2006
Ubicación: San Felipe, Chile
Posts: 86
Poder: 18
Young Va por buen camino
Hola, para lo que necesitas utilizo la siguiente función:

Código Delphi [-]
function OnInternet: Boolean;
var
    flags: dword;
begin
     Result := InternetGetConnectedState(@flags, 0);
end;
Debes agregar en la cláusula uses la unit WinInet.

Saludos.
Responder Con Cita
  #4  
Antiguo 19-03-2009
Avatar de MAXIUM
MAXIUM MAXIUM is offline
Miembro
 
Registrado: may 2005
Posts: 1.485
Poder: 20
MAXIUM Va camino a la fama
Siempre he encontrado errores al momento de detectar internet, probare la última indicación ya a mi parecer esto me a dado buenos resultados salvo por el detalle de que hay que crear una conección http://www.clubdelphi.com/foros/showthread.php?t=11089

Esta función solo detecta si hay un cable de red conectado, NADA MÁS.
Cita:
function OnInternet: Boolean;
var
flags: dword;
begin
Result := InternetGetConnectedState(@flags, 0);
end;

Última edición por MAXIUM fecha: 25-03-2009 a las 23:46:57.
Responder Con Cita
Respuesta


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
AYUDA! cambio de computador manteniendo internet ekisfer Redes 1 31-01-2008 07:54:10
AYUDA! cambio de computador manteniendo internet ekisfer Internet 2 31-01-2008 01:38:01
Una sueca de 75 años tiene la conexión a Internet más rápida del mundo gluglu Noticias 7 24-07-2007 03:58:23
Como quemar un CD en otro computador desde mi computador en una LAN? JuanErasmo Redes 5 13-01-2006 18:38:11
Quien tiene la Internet???? Sasuke_Cub Noticias 12 17-11-2005 21:47:51


La franja horaria es GMT +2. Ahora son las 01:08:51.


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
Copyright 1996-2007 Club Delphi