Текущий архив: 2003.10.06;
Скачать: CL | DM;

Вниз

странные веши творятся с TClientSocket   Найти похожие ветки 

← →
ilka ©   (2003-08-07 16:17) [0]

почемут не посылается сообшение
вот код
ClientSocket:=TClientSocket.Create(nil);
//заполняем все остальное

// ХХХ
ClientSocket.Socket.SendText("hello");

если поставить вместо XXX Sleep(1000); все равно неработает
однако если поставить вместо XXX ShowMessage то заработает
если посылать по нажатию другой кнопки то работает
если вызвать програмно функцию нажатия кнокки_посылки то не работает
как устранить данный эффект?

---

← →
Polevi ©   (2003-08-07 16:24) [1]

попробуй в обработчике OnWrite

---

← →
ilka ©   (2003-08-07 16:32) [2]

ClientSocket.OnWrite прога вылетает

---

← →
panov ©   (2003-08-07 16:59) [3]

//заполняем все остальное

Вот здесь-то и скрывается самое интересное.

---

← →
ilka ©   (2003-08-07 17:02) [4]


ClientSocket:=TClientSocket.Create(nil);
ClientSocket.Active:=false;
ClientSocket.Address:="127.0.0.1";
ClientSocket.ClientType:=ctNonBlocking;
ClientSocket.Port:=777;
ClientSocket.Tag:=0;

if not ClientSocket.Active then
ClientSocket.Active:=true;
//ХХХ
СlientSocket.Socket.SendText("hello");

---

← →
Digitman ©   (2003-08-07 17:06) [5]

либо вместо //ХХХ делай

while not ClientSocket.Active do
Application.ProcessMessages

либо перед

ClientSocket.Active:=true;

делай ClientSocket.ClientType := ctBlocking;

---

← →
ilka ©   (2003-08-07 17:24) [6]

Digitman огромное спасибо

---

Страницы: 1 вся ветка

Текущий архив: 2003.10.06;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.013 c