IdTCPClient1 принять сообщение.

[niockasd]

Всем примет, я тут пытаюсь узнать о готовности к работе TOR.exe.
Запустил его присвоив управляющий порт, далее

IdTCPClient1.host:='127.0.0.1';
IdTCPClient1.port:=9051;

IdTCPClient1.ConnectTimeout := 10000; // 10.0 sec
IdTCPClient1.ReadTimeout := 10000; // 10.0 sec

 IdTCPClient1.Connect;
 IdTCPClient1.SendCmd ('AUTHENTICATE ""');

 if IdTCPClient1.LastCmdResult.Code='250' then
  begin
         IdTCPClient1.SendCmd('GETINFO status/bootstrap-phase');
         memo1.Lines.Add(IdTCPClient1.LastCmdResult.Text.Text);
   end;

на выходе получаю

status/bootstrap-phase=NOTICE BOOTSTRAP PROGRESS=100 TAG=done SUMMARY="Done"
OK

Можно ли как то сделать цикличное получение сообщений?

Или только в таймере постоянно делать коннект, запрос и выводить ответ..

[niockasd]

      repeat
              IdTCPClient1.SendCmd('GETINFO status/bootstrap-phase');
              memo1.Lines.Add(IdTCPClient1.LastCmdResult.Text.Text);
        until Pos('100',IdTCPClient1.LastCmdResult.Text.Text )>=1;

  end;

)))) только такое на ум пришло, может что получше предложите ? )