Delphi console program?

Question

Delphi

I'm not too strong in programming yet, I'm learning. I'm writing the first console program, help someone with what you can, with some piece of code or some information to complete the program. I don’t know how to make everything run in order, and then return to the beginning of the program.

program Project2;
 
{$APPTYPE CONSOLE}
 
uses
SysUtils,
IdHTTP,
IdComponent,
classes;
 
 
 
 
В начало хотел вставить рандомное выпадает время в секундах отсчитывает время,
а потом как время заканчивается начинается дальше выполняться программа. Не знаю как таймер замутить в консоли
 
 
var
IdHTTP1: TIdHTTP;
 
        s: String;
POSTData: TStringList;
 
        begin
        IdHTTP1:= TIdHTTP.Create(nil);
    s:=idhttp1.Get('http://mysite/get.php?bot_id=paramet'); // беру параметр POST Данных
 
    begin
POSTData := TStringList.Create;
IdHTTP1:= TIdHTTP.Create(nil);
 idhttp1.HandleRedirects:=true;
 idhttp1.Request.UserAgent:='Mozilla/123123.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.0.10) Gecko/2009042316 Firefox/3.0.10';
//IdHTTP1:= IdHTTP;
try
{$R *.res}
 
POSTData.add('utilizador='+'МОЙЛОГИН'); 
POSTData.add('password='+'ПАРОЛЬ');
POSTData.add('&loginSub='+'Вход');
 
IdHTTP1.Post('http://www.Браузерная игра' ,POSTData);
 
finally
POSTData.Free;
IdHTTP1.Free;
 
 
    sleep(10000);
 
    // после sleep нужно отправить POST данные которые полученые были в начале программы
    // Пробовал сам сделать не получалось.
    
      sleep(10000);
      
      Выходим игры // Выход знаю как здесь
      
      
    После того как вышли,чтобы программа обратно вернулась в начало программы к таймеру и начала опять отсчёт  
      
 
     end;
  end;
 
end.

Answer 1

For this, excuse me, cycles are used. The easiest way is an infinite loop with break inside

repeat
  ваш код
  if [что-то там] then break;
  ваш код
until false;

Answer 2

I don’t know what the timer and the random number have to do with it, but it’s enough to loop everything with the help of for, while или until, and while и untilit’s more preferable, because you can make an infinite loop. At the same time, do not forget to set the condition for exiting the loop. For example, at the end of the execution, the console asks whether to exit the program and if the user enters 'y', then the loop is interrupted.

Answer 3

Labels and Transition Operators