Последние записи

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

16th
Июн

Как сделать запрет на повторный запуск приложения?

Posted by Chas under Пост-обзор

Здравствуйте, в общем проблема такая: хочу сделать запрет на повторный запуск приложения, НО так как название окна меняется на имя открытого в данный момент файла, то ничего не получается сделать.

Аватар:
А зачем привязываться к заголовку окна? Как по мне гораздо удобнее для этих целей использовать OpenMutex и CreateMutex
Код для .dpr

var

  f_m: THandle;	// mutex

begin

  f_m := CreateMutex(nil, true, srMutexName);

  if ( (ERROR_ALREADY_EXISTS = GetLastError()) or (ERROR_ACCESS_DENIED  = GetLastError()) ) then begin

    //

    if (0 <> f_m) then CloseHandle(f_m);

    MessageBox('Another instance is already running');

  end

  else try

    //

    Application.Initialize;

    ...

    Application.Run;

    //

  finally

    CloseHandle(f_m);

  end;

end.