Chequear conexión a internet

[delphi.com.ar]

Posteado originalmente por hector
el finally no le veia la utilidad en tu caso,

¿Cómo que no?... el Finally le garatiza que siempre se ejecute el free, sinó si se produce un error nunca se va a liberar el Stream.

Un comentario: si van a hacer un except vacío, solo para que capture el error, también se podría hacer esto (aunque no lo recomiendo)

stream:= TFileStream.Create('c:\miarchivo.txt',fmCreate);
try
  idhttp1.Get('http://www.mipagina.com/miarchivo.txt',stream);
except
end;
stream.Free;

Y haría otra aclaración, el create del objeto, va fuera del try.., porque si no se crea el objeto porque produce un error, no quedará asignado a la variable.

Saludos!