Скачать: CL | DM;

Как в TidTCPClient принять строку?   Найти похожие ветки 

← →
dr Tr0jan ©   (2004-02-04 07:39) [0]

Как в TidTCPClient принять строку, которую передал TidTCPServer?
Я знаю, что есть такая функция TidTCPClient.ReadLn(): string;.
Но как принимать эти строки постоянно, при использовании таймера клиент наглухо виснет (да и думаю, что это не самый подходящий способ).

---

← →
Reindeer Moss Eater ©   (2004-02-04 08:44) [1]

repeat
MyString:=TidTCPClient.ReadLn;
until not постоянно;

---

← →
dr Tr0jan ©   (2004-02-04 14:15) [2]

Это то же самое, опять клиент наглухо виснет.

---

← →
Reindeer Moss Eater ©   (2004-02-04 14:17) [3]

Никакой клиент не виснет.
Клиент постоянно принимает строки.

---

← →
Manulo ©   (2004-02-04 15:30) [4]

добавь на форму IdAnteFreeze. Должно попустить

---

← →
Александр из Минска ©   (2004-02-04 21:20) [5]

Согласен с Reindeer Moss Eater, в Demos\Internet\Chat\Client всё нормально берёт, даже используя таймер.

---

← →
dr Tr0jan ©   (2004-02-05 02:44) [6]

2 Reindeer Moss Eater ©:

>Никакой клиент не виснет.
Клиент постоянно принимает строки.

Ну я это и имею ввиду, вот только ни в какие окна клиента ничё прописать нельзя.

2 Manulo ©:

Спасибо, попробую!

2 Александр из Минска ©:

разве в Delphi 7 есть такая папка, чё-то я не видел.

---

← →
dr Tr0jan ©   (2004-02-05 02:44) [7]

Удалено модератором
Примечание: Дубль...

---

← →
Reindeer Moss Eater ©   (2004-02-05 10:31) [8]

Ну я это и имею ввиду, вот только ни в какие окна клиента ничё прописать нельзя.

В исходном вопросе ни слова ни про какие окна нет.

---

← →
dr Tr0jan ©   (2004-02-05 14:58) [9]

2 Reindeer Moss Eater ©:

> В исходном вопросе ни слова ни про какие окна нет.

При использовании таймера клиент наглухо виснет. А клиент постороен на окнах.

Звиняйте времени проверить антифриз не было, может завтра проверю.

---

← →
dr Tr0jan ©   (2004-02-05 14:58) [10]

2 Reindeer Moss Eater ©:

> В исходном вопросе ни слова ни про какие окна нет.

При использовании таймера клиент наглухо виснет. А клиент постороен на окнах.

Звиняйте времени проверить антифриз не было, может завтра проверю.

---

← →
Reindeer Moss Eater ©   (2004-02-05 15:31) [11]

Вопрос:

...Но как принимать эти строки постоянно, при использовании таймера клиент наглухо виснет ...

Ответ:

repeat
MyString:=TidTCPClient.ReadLn;
until not постоянно;

Таймера нет, и строки принимаются постоянно.
Если что-то в вопросе подразумевалось еще, то я тоже в свою очередь подразумевал, что спрашивающий знаком с многопоточностью в Windows и вспомогательными классами используемой библиотеки

---

← →
Александр из Минска ©   (2004-02-09 15:55) [12]

> dr Tr0jan ©   (05.02.04 02:44) [6]

в Delphi6 есть...

---

← →
Devel ©   (2004-02-09 16:10) [13]

dr Tr0jan © (04.02.04 07:39):

function ReadLn(ATerminator: string = LF; const ATimeout: Integer = IdTimeoutDefault; AMaxLineLength: Integer = -1): string;

чтобы не висло в таймере делай ReadLn с таймаутом например 5 ms.

---

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

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.026 c