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]

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

TClientSocket Найти похожие ветки