Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как в TIdTelnet передать несколько комманд? [D7, XP]


tytus ©   (2008-06-09 16:43:00) 

Доброго дня всем. Подскажите как с пом. Telnet-клиента передать несколько камманд?
Примерно так:
procedureTForm1.Button1Click(Sender: TObject);
begin
 IdTelnet1.IOHandler.WriteLn('комманда 1');
 IdTelnet1.IOHandler.WriteLn('комманда 2');
 IdTelnet1.IOHandler.WriteLn('комманда 3');
end;

Только после каждой комманды нужно подождать выполнения предыдущей. Конечно, скажите - в событии OnDataAvailable - но как потом передать в Button1Click что событие OnData... наступило?
Подскажите способы решения.


Поросенок Винни-Пух   (2008-06-09 17:17:00) [1]

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


tytus   (2008-06-09 17:15:00) [2]

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


Поросенок Винни-Пух   (2008-06-09 17:05:00) [3]

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


Поросенок Винни-Пух   (2008-06-09 16:58:00) [4]

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


tytus   (2008-06-09 16:50:00) [5]

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


Поросенок Винни-Пух   (2008-06-09 16:44:00) [6]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо