Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];




Вниз

Программа 


Дима2   (2002-04-04 13:11) [0]

Как узнать что моя программа уже запущена?



panov   (2002-04-04 13:20) [1]

http://delphi.mastak.ru/cgi-bin/faq.pl?look=1&id=988619824&n=15



LazorenkoX   (2002-04-04 13:23) [2]

Удобно использовать главную форму (TfmMain). В таком случае ты не ошибёшься если программа запущена из другой папки или уже есть программа с таким екзешником как твой.:


uses
Windows, Forms;
var
h: LongInt

h := FindWindow("TfmMain", nil)
if h > 0 then begin
SetForegroundWindow(h) //Показываем запущенную копию
Halt;
end else //не запущена



SergeyB   (2002-04-04 13:59) [3]

Более универсальный способ - создать mutex (см. CreateMutex(..) в справке по SDK)



Fantasist   (2002-04-04 21:28) [4]

А вот тут недавно классную статью об этом прочитал:
http://rsdn.ru/article/?baseserv/avins.xml




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.021 c
1-57822           JMax                  2002-04-07 06:31  2002.04.18  
Реестр или ini


1-57691           GovoRun               2002-04-07 13:13  2002.04.18  
OpenDialog


1-57671           Darkwin               2002-04-05 19:22  2002.04.18  
Debuger


1-57763           Stexen                2002-04-04 22:11  2002.04.18  
TStream!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!1


3-57591           sad                   2002-03-21 14:19  2002.04.18  
Опять про воостановление индексов в Paradox