Форум: "Сети";
Поиск по всему сайту: 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
4-66712           SkyR                  2001-12-24 01:29  2002.02.21  
Такая проблема с Edit - полем...


3-66478           iXANiA                2002-01-28 20:40  2002.02.21  
Проблемы с и Interbase!!!!!!!!!


1-66624           maxi                  2002-02-06 17:09  2002.02.21  
Как минимизировать объем exe файла в Делфи С++Билдер ?


14-66678          Nikolay               2002-01-01 17:44  2002.02.21  
Всех с наступившим!


1-66616           irq                   2002-02-06 15:31  2002.02.21  
Каледарь