Показать сообщение отдельно

  #2  
Старый 26.07.2007, 09:24
WAR!9G
Участник форума
Регистрация: 24.06.2007
Сообщений: 299
Провел на форуме:
467372

Репутация: 212
По умолчанию

b2mbey, имхо тоже самое:

Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
if TcpClient1.LocalHostAddr = '0.0.0.0' then
ShowMessage('Your not connected!');
end;
TCPClient на вкладке Internet.

Последний раз редактировалось WAR!9G; 26.07.2007 в 09:28..
 
Ответить с цитированием