label lExit;

begin
  // проверяем предыдущую копию приложения
  if AppPreviousCopyExists then goto lExit;

  // Создаем приложение
  Application.Initialize;

  // Разбираем командную строку
  stat.dyn.ParseCommandLine;

  // Задержка обновления действий
  // Помогает от загрузки процесора в режиме дочерних форм wsMaximized
  Application.ActionUpdateDelay := 50;

  // Создаем форму спрайта
  SetBlock('Загрузка модуля "Статистика"', 100, True);
  frmBlockWindow.Caption := 'Загрузка приложения';
  SetBlock('Создание среды...');

  Application.Title := 'АРМ "Энергетика" модуль "Статистика"';
//  TStyleManager.TrySetStyle('Windows10');
  // Создаем модуль данных
  Application.CreateForm(TSDM, SDM);
  // Соединяемся с базой данных
  SDM.Connected := True;
  // Проверяем авторизацию
  if SDM.LoadMain then

    Application.CreateForm(TMainWindowCS, MainWindowCS)
  else begin

    Application.Terminate;
  end;

  // Вынесено сюда, чтобы убрать вкладку спрайта из таскбара
  Application.MainFormOnTaskbar := True;
  Application.Run;

lExit:

if AppPreviousCopyExists then goto lExit;

if AppPreviousCopyExists then Exit;

Out Directory =  v:\out\$(MSBuildProjectName)\$(Platform)\$(Config)\

Shift-F9 = Success

F9 = Error Could not find program, 'v:\out\%MSBuildProjectName%\Win32\Debug\proga.exe'