Как в TIdTelnet передать несколько комманд?

← →
tytus (2008-06-09 16:43) [0]

Доброго дня всем. Подскажите как с пом. Telnet-клиента передать несколько камманд?
Примерно так:
procedure TForm1.Button1Click(Sender: TObject); begin IdTelnet1.IOHandler.WriteLn("комманда 1"); IdTelnet1.IOHandler.WriteLn("комманда 2"); IdTelnet1.IOHandler.WriteLn("комманда 3"); end;
Только после каждой комманды нужно подождать выполнения предыдущей. Конечно, скажите - в событии OnDataAvailable - но как потом передать в Button1Click что событие OnData... наступило?
Подскажите способы решения.

← →
Поросенок Винни-Пух © (2008-06-09 16:44) [1]

Очередь и ея обработка

← →
tytus (2008-06-09 16:50) [2]

>Поросенок Винни-Пух © (09.06.08 16:44) [1]
а по-подробнее плз...

← →
Поросенок Винни-Пух © (2008-06-09 16:58) [3]

пхаешь все в очередь, запускаешь обработчик.
репит
при ОнДата инициируешь следующую посылку.
антил у_кролика_ничего_не_осталось;

← →
Поросенок Винни-Пух © (2008-06-09 17:05) [4]

А вообще разве в инди после врителна туда, у тебя уже нет данных "оттуда" последством ридэлэна?
зачем вообще событийная-то модель?

← →
tytus (2008-06-09 17:15) [5]

>Поросенок Винни-Пух © (09.06.08 17:05) [4]
данные "от-туда" будут.
Просто после последней комманды буду давать "exit".
Вообще-то событийная модель имхо работоспособна.
Пробовал IdTelnet1.IOHandler.WaitFor("login:"); - не работает.
Виснет и все...

код вэйтфор у тебя есть. смотри чего ему надо для возврата.

Как в TIdTelnet передать несколько комманд? Найти похожие ветки