Lanzar aplicacion al detectar conexion a internet

[[Delphius]]

Roman si entiendo lo que dices... si o si tiene que haber "algo" activo para que lanze mi aplicación.
Me resultó (hasta el momento) más fácil usar un timer para que cada 1 segundo cheque si está conectado y si realmente lo está empieza a cronometrar. Si la conexión se interrumpe... se detiene.

[JOSEPE]

Alguan vez encontre una funcion windows llamada mediante una Callback para detectar si habia una conexion a INTERNET, la verdad que la perdi, UDs., al parecer sabe como hacerlo me pueden indicar cual es esa funcion o como lo hacen Uds.

Salu2

JOSEPE
Lima-Peru

[roman]

Hablando de cosas que alguna vez hemos visto y no recordamos donde menciono que recuerdo haber leído en alguna parte que la única manera verdaderamente confiable para detectar si existe una conexión a Internet es haciendo un ping a una dirección que sepamos a ciencia cierta que está activa. Si no obtenemos respuesta es que no hay conexión.

// Saludos

[argami]

es verdad pero eso tiene un problema que tienes que estar seguro que a largo plazo esa direccion estara activa

[JOSEPE]

Para los que necesiten detectar Internet.

function IsConnected: Boolean;
var
 ConnectedState: Integer;
begin
 ConnectedState := INTERNET_CONNECTION_MODEM +   INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY;
 Result := InternetGetConnectedState(@ConnectedState, 0);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
	  if IsConnected = False then Panel1.Caption :='You are not connected to internet'
	  else
	  panel1.Caption :='You are connected to internet';
   end;

[JoseQ]

k unidades hacen falta para ejecutar esa funcion ?

[roman]

Empezado por JoseQ

k unidades hacen falta para ejecutar esa funcion ?

¿Te refieres a InternetGetConnectedState? Pues me parece que está en la unidad WinInet?

// Saludos