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




Вниз

TClientSocket 


Layet   (2001-11-07 08:13) [0]

Помогите отловить ошибку!

for a := 1 to 15 do
begin

// if Client.Active then Client.Close;
Client.Address := "192.168.1."+IntToStr(a);
Client.Open;
Client.Socket.SendText("...");
Client.Close;
end;

Пишет ошибка 10061, т.е. "Can"t change value while socket is active". Вставил прокоментированную строку, чтобы закрывал сокет если он активен - никакого результата.

ПОДСКАЖИТЕ пожалуйста что я сделал неверно



Anatoly Podgoretsky   (2001-11-07 09:28) [1]

Поставил символы "//", верни в зад
И не плохо бы было перевести сообщение.




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




Наверх







Память: 0.73 MB
Время: 0.015 c
3-90230           Mr.Sane               2001-12-25 10:45  2002.01.28  
SQL


3-90225           DiggerAbstract        2001-12-24 11:28  2002.01.28  
Кэширование изменений


6-90336           Yuri Btr              2001-11-07 11:20  2002.01.28  
TWebBrowser


7-90400           TSR                   2001-10-11 15:41  2002.01.28  
Порты


1-90318           oleksa                2002-01-11 15:58  2002.01.28  
ListView и Checked Item-ы