Delphi

Megabyte · Отправлено: **15:12, 14-04-2003** | #2

1) Где-то на форуме об этом спрашивалось кучу раз, можешь поискать на delphi.mastak.ru статью про это. Насколько я помню, можно только определить, достижим ли определённый хост.
2) Для Дельфи есть великолепный набор сетевых компонентов FPiette (http://www.rtfm.be/fpiette), там есть SMTP-клиент, им цепляешься к smtp-серверу получателя и отправляешь.

Megabizon · Отправлено: **18:17, 14-04-2003** | #3

Есть функция API, сам ее не пробовал.

InetIsOffline

Функция InetIsOffline определяет, подключена ли система к интернету или нет.

BOOL InetIsOffline( DWORD dwFlags);

Параметры

dwFlags – входные флаги функции. Значение параметра должно быть равно нулю.

Возвращаемые значения

Возвращается TRUE, если локальная система не подключена в настоящий момент к интернету.
Возвращается FALSE, если локальная система подключена в настоящий момент к интернету,
или еще не было попыток соединиться с интернетом.

Guest · Отправлено: **21:49, 21-03-2004** | #4

InetIsOffline -- это шутка? Нет такой функции!

Megabizon · Отправлено: **22:23, 21-03-2004** | #5

Цитата:

InetIsOffline -- это шутка? Нет такой функции!

Стыдно должно быть, лень в MSDN заглянуть
http://msdn.microsoft.com/library/de...tisoffline.asp

JCooper · Отправлено: **18:10, 28-03-2004** | #6

Без шуток!

Код:

импорт ф-ции
function InetIsOffline(Flag: Integer): Boolean;
stdcall; external 'URL.DLL';

где-то в коде...

if InetIsOffline(0) then
  ShowMessage('This computer is not connected to Internet!')
else
  ShowMessage('You are connected to Internet!');