Программа

← →
Дима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

Программа Найти похожие ветки