Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Socket [D5, Win95/98]


Lamok ©   (2001-11-29 23:40:00) 

В инете есть сервер основанный на TServerSocket. Я конекчусь к нему
(спомощью TClientSocket) Так вот мне надо спомощью TClientSocket
т.е спомощью каких функций узнать запушен он там или нет как это
сделать (но чтоб на клиенте ниче не вылезало (ошибки, окна) !!!???
Всем заранее спасибо !!!


Hawk   (2001-12-01 22:47:00) [1]

всё элементарно ... тут ответ уже был... но вот поконкретнее:
procedure TForm1.ServerSocket1ClientError(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
ErrorCode:=0;
end;
всё работает -- не единой ошибки не выдает


Lamok   (2001-12-01 14:42:00) [2]

to wed я писал
try
clentsocket.open;
except
on Esocketerror do clentsocket.free;
showmessage("net soedinenia");
end;
не работает все равно винда выдает окно с ошибкой
че делать ???


Степа   (2001-11-30 22:58:00) [3]

в событии у клиента
onerror
или чето типа этого
есть входной парметр
errorcode:integer;

вот в теле процедуры присвайвай его раным нулю.
и тогда он орать перетстанет


wed   (2001-11-30 17:09:00) [4]

делай обработку ошибок, посмотри в доке, какая ошибка -нет связи- и по ней выводи сообщение о незапущенном сервере


Наверх

Титульная страница Поиск, карта сайта Написать письмо