Без запуска формы при определенном параметре

[Kronos913]

Нужно сделать программу:

Если просто запускается программа, без параметров - то запускается форма

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

Как это сделать?

[p51x]

https://docwiki.embarcadero.com/RADS...pport_Routines

[northener]

Сообщение от Kronos913

Как это сделать?

Нет проблем. Надо только понимать что код самой программы находится в файле проекта (dpr).
И надо уточнить куда и как возвращать результат.

[Arigato]

Нет под рукой Делфи, но в Лазарус это делается аналогично. Правим файл LPR для Лазарус (DPR для Делфи). Там код создания главной формы:

begin
  RequireDerivedFormResource:=True;
  Application.Scaled:=True;
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Добавляем условие:

begin
  if (ParamCount > 0) and (ParamStr(1) = '...') then begin 
    // тут действия, если переданы параметры
  end else begin
    // тут обычное создание формы
    RequireDerivedFormResource:=True;
    Application.Scaled:=True;
    Application.Initialize;
    Application.CreateForm(TForm1, Form1);
    Application.Run;
  end;
end.

[Kronos913]

Теперь 2 вопроса:
1. Если программа А запустила программу В, то как сделать так чтобы программа А продолжила работу только после закрытия программы В?

2. Ограниченна ли суммарная длина параметров? Можно ли длинную строку (больше 255 байт) засунуть в параметры?

[Arigato]

1. Вы ответы, которые вам раньше давались, игнорируете? http://programmersforum.ru/showthrea...14#post1863614

2. А что мешает самому проверить? Это будет быстрее, чем ждать ответа на форуме...