Заблокировать запуск программы

← →
irishka001 © (2005-11-23 10:00) [0]

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

← →
Reindeer Moss Eater © (2005-11-23 10:00) [1]

Удалить её

← →
Джо © (2005-11-23 10:04) [2]

> [1] Reindeer Moss Eater © (23.11.05 10:00)
> Удалить её

Не, тогда и первого запуска не произведешь :))

← →
Джо © (2005-11-23 10:07) [3]

> irishka001 © (23.11.05 10:00)
> Подскажите, как можно заблокировать повторный запуск программы.

См. статью Ю.Зотова:
http://delphikingdom.ru/asp/viewitem.asp?catalogid=903
(если я правильно понял вопрос)

← →
Reindeer Moss Eater © (2005-11-23 10:09) [4]

Там недопущение повторного запуска делается во время этого самого повторного запуска. Уже случившегося.

← →
Alex_KV (2005-11-23 10:14) [5]

Используй mutex.
...
var
SysOneCopyMutex: THandle = 0;
...
При запуске программы:
SysOneCopyMutex := CreateMutex(nil, false, AMutexName);
где AMutexName - имя мьютекса, например "MyMutex"

← →
Джо © (2005-11-23 10:18) [6]

> [4] Reindeer Moss Eater © (23.11.05 10:09)

Да ладно, не зря ж вопрос в "Начинающих".

← →
Reindeer Moss Eater © (2005-11-23 10:19) [7]

Ну и мой ответ для них же.

← →
Alex_KV (2005-11-23 10:21) [8]

Да, и самое главное после создания проверить
le := GetLastError;
Result := (SysOneCopyMutex <> 0) and (le <> ERROR_ALREADY_EXISTS);

А при завершении программы
if (SysOneCopyMutex <> 0) then CloseHandle(SysOneCopyMutex);

Девушка, увлекающаяся психологией, а какой смысл вы вкладываете в понятие "повторный запуск программы"?

Alex_KV

Я запустил программу первый раз в понедельник.
Во вторник комьютер не работал.
Второй раз я её собираюсь запустить в субботу.
Где к тому времени будет твой мьютекс?

> Alex_KV

Спасибо. Все получилось. Еще, если кому понадобится, есть неплохая статья: http://subscribe.ru/archive/comp.soft.prog.delphi4all/200203/18182252.html

2 Reindeer Moss Eater
Понятие повторного запуска - это отсутствие экземпляра программы в данный момент в памяти. :) Мне кажется, что это легко и понятно. А фраза про запуск проги понедельник-суббота - непрофессионально.

Заблокировать запуск программы Найти похожие ветки