Форум: "Сети";
Поиск по всему сайту: 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.71 MB
Время: 0.02 c
4-90410           hn                    2001-11-27 16:50  2002.01.28  
gethostbyaddr


14-90352          Brand                 2001-11-30 23:35  2002.01.28  
Кодирование информации


1-90297           Romul                 2002-01-09 09:52  2002.01.28  
Удаление непечатных символов из строки


7-90402           Ketmar                2001-10-14 14:10  2002.01.28  
как заменить своим или отрубить окошко менеджера задач (ctrl+alt+del) в Win98?


3-90217           kay                   2001-12-24 22:12  2002.01.28  
BDE