Спасибо огромное.
Не проверил еще как работает, но пока есть время написать, то пишу.
интернет соединение можно проверить так:
function NetConect: Boolean;
var
dwConnectionTypes: DWORD;
begin
dwConnectionTypes:= INTERNET_CONNECTION_MODEM+INTERNET_CONNECTION_LAN+INTERNET_CONNECTION_PROXY;
Result := InternetGetConnectedState(@dwConnectionTypes, 0);
end;
.
Можно собрать одну большую функцию по такому алгоритму:
Если есть интернет соединение, то проверить наличие URL,
если такой URL существует, то скачать его,
если же интернет соединения нет или оно разорвано, то сообщить о его потере и ожидать.
Такая функция пригодиться для написания DownLoad программ.
Но сам я делфи знаю средне, поэтому не берусь собирать всё это в кучку.