Показать сообщение отдельно
  #2  
Старый 28.05.2014, 01:46
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от Fakov
Подскажите. Без злого умысла пытаюсь сделать программу, которая после запуска оставляет в автозагрузке системы форму. Не пойму, объясните: могу ли я сделать в одном проекте две формы таким образом, чтобы одна форма была как бы основной, которую использует пользователь, а вторая - техническая, которая при запуске первой формы запускается и прячется в автозагрузке, и что самое главное - после запуска системы загружается уже только вторая форма.

Разъясните пожалуйста логику создания таких форм, спасибо.
Можно использовать параметры командной строки, а в самом приложении проверять, если приложение было запущено с нужным параметром, то создавать вторую форму вместо первой.

Вот в этом примере если запустить приложение с параметром "autostart", то будет создана вторая форма, иначе первая:
Код:
program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2};

{$R *.res}

begin
  Application.Initialize;

  if (ParamCount > 0) and (ParamStr(1) = 'autostart')
    then Application.CreateForm(TForm2, Form2)
    else Application.CreateForm(TForm1, Form1);

  Application.Run;
end.
Ответить с цитированием