Запрет на повторный запуск

[rsv]

Спасибо, Borjomy_1 и dadreamer. Думал уже есть известные способы решения

P.S. Когда-то на Delphi это злементарно решалось. Сейчас, наверное, можно на плюсах чего-нибудь своять и запускать из VI при старте приложения...

[Artem.spb]

P.S. Когда-то на Delphi это злементарно решалось.

как именно?

[rsv]

Вот нашёл код в древнем приложении (Delphi 2006).
Используется WinAPI (модуль Windows).

Код: Выделить всё

const  
  AppLockingAtomName: PAnsiChar = 'STAND';

var
  AppLockingAtom: ATOM;

  // Проверка на запуск копии приложения
  AppLockingAtom := GlobalFindAtom(AppLockingAtomName);
  if AppLockingAtom = 0 then
    // Создать Атом-локер
    AppLockingAtom := GlobalAddAtom(AppLockingAtomName)
  else
    // Атом-локер найден. Останов.
    begin
      Halt(0);
    end;

При закрытии приложения атом надо было уничтожить. Если выход был некорректный, то приходилось перезагружать комп.

[Artem.spb]

Используется WinAPI (модуль Windows).

Если у вас это элементарно и хочется извращаться, особенно с учётом этого

При закрытии приложения атом надо было уничтожить. Если выход был некорректный, то приходилось перезагружать комп.

То в чём проблема, используйте этот же метод

atom.png (9.25 КБ) 127 просмотров

По мне так вариант Borjomy_1 гораздо проще. А ещё можно что-то писать в реестре (так до сих пор кто-то делает?), создать файл в appData и т.п. Это и проще, и перезагружаться не надо в случае ошибок, можно руками открыть "замок".
В любом случае это на совести вашего кода - проверил, что красный свет светофора, стою на перекрёстке, а не еду дальше.

[dadreamer]

rsv
Кроме атома с его недостатками можно использовать именованный канал или глобальный системный мьютекс. Вариантов масса. А вообще, предусмотрите в своей программе также очистку атомов по спец. ключу или ещё как. Ну, или сделайте отдельную утилиту. Перезагружать комп - это как из пушки по воробьям. Есть также Atom Table Monitor, правда, у меня кнопка Delete не работает, видимо, надо писать автору.

Artem.spb

Caution Do not specify the location of a system shared library, such as kernel32.dll, by path. Because LabVIEW automatically includes by-path shared libraries in build specifications, you might distribute a by-path system shared library to another computer inadvertently. Redistributing some shared libraries, such as kernel32.dll, might cause the target computer to crash. Therefore, always specify system shared libraries by name.

Configuring the Call Library Function Node

[Artem.spb]

Artem.spb

Caution Do not specify the location of a system shared library, such as kernel32.dll, by path.

Не надо воспринимать это как руководство к действию
Я показал автору вопроса, что "элементарный" метод из Delphi всё ещё рабочий.

[rsv]

Хорошо, что тему подробно разобрали и привели несколько возможных решений. С ходу не всё понял, но разберусь, когда дойдёт дело до реализации. Спасибо.