Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];




Вниз

Socket 


Lamok   (2001-11-29 23:40) [0]

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



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

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



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

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

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



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

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



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

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




Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.017 c
1-66585           Eagle                 2002-02-04 18:56  2002.02.21  
текстовый формат ячейки в Excel


3-66499           Garmahis              2002-01-29 21:24  2002.02.21  
Опять SQL


1-66565           Mitrofan              2002-02-04 14:18  2002.02.21  
Библиотека имитационного моделирования для Дельфи


6-66644           Jaya1                 2001-11-29 19:17  2002.02.21  
глюки IIS


3-66497           Rash                  2002-01-28 12:15  2002.02.21  
Удаление строки в stringgrid, разные кодировки и временные файлы запросов.