Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.01.20;
Скачать: CL | DM;

Вниз

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

 
Кеша   (2007-12-23 14:41) [0]

Здравствуйте
Хотелось бы узнать как это реализовать. То есть если моя программа уже запушена то ограничить её повторный запуск
Думаю правильно её сделать по поиску процессов,  например если есть такой-то процесс то программа вторично открываемая закрывается но я не знаю как реализовать поиск по процессам
Заранее спасибо.


 
Efir   (2007-12-23 14:46) [1]

Посмотри в сторону мьютексов.
При запуске проги проверяешь создан ли мьтекс, если да, то закрываешь программу, нет - создаёш мьютекс.


 
Григорьев Антон ©   (2007-12-23 14:48) [2]

http://www.delphikingdom.com/asp/viewitem.asp?catalogid=904


 
Кеша   (2007-12-23 15:06) [3]

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


 
niKo   (2007-12-23 15:10) [4]

program Programm;

uses
 Windows,
 Forms,
 M_FORM in "M_FORM.PAS" {Form1};

{$R *.res}

begin
CreateMutex(nil, False, "myMutex");  
if GetLastError = ERROR_ALREADY_EXISTS then halt;


 Application.Initialize;
 Application.CreateForm(TForm1, Form1);
 Application.Run;
end.


 
Кеша   (2007-12-23 15:12) [5]


> M_FORM in "M_FORM.PAS" {Form1};


А это где достать?


 
niKo   (2007-12-23 15:25) [6]


> Кеша   (23.12.07 15:12) [5]
>
>
> > M_FORM in "M_FORM.PAS" {Form1};
>
>
> А это где достать?


.dpr файл знаеш) открой его и сразу после begin вставь из [4] две жирные строчки

за > M_FORM in "M_FORM.PAS" {Form1}; < не переживай


 
Кеша   (2007-12-23 15:37) [7]

а теперь понятно
СПАСИБО niKo !!!



Страницы: 1 вся ветка

Текущий архив: 2008.01.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.021 c
4-1182432484
Nikfel
2007-06-21 17:28
2008.01.20
Как сделать окно активным.


1-1192557712
dRake
2007-10-16 22:01
2008.01.20
Browsing paths в BDS 2006


2-1198140185
namco
2007-12-20 11:43
2008.01.20
программа из delphi


15-1197382004
@!!ex
2007-12-11 17:06
2008.01.20
Потестите эмулятор виртуальных десктопов


9-1165994367
Аццкий_рыцарь
2006-12-13 10:19
2008.01.20
Options.ini