Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.01.20;
Скачать: [xml.tar.bz2];

Вниз

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

 
Кеша   (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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.041 c
2-1197905519
andreoman
2007-12-17 18:31
2008.01.20
перебор форм в прилодении


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


2-1198337091
223001
2007-12-22 18:24
2008.01.20
помогите задачу решить


15-1197358652
megabyte
2007-12-11 10:37
2008.01.20
Тема диплома...


4-1182432484
Nikfel
2007-06-21 17:28
2008.01.20
Как сделать окно активным.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский