Форум: "Сети";
Поиск по всему сайту: 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.031 c