Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

is application launched ? [D7, WinXP]


ikolopiz ©   (2008-07-23 19:44:00) 

Как проверить, запущена ли программа ? (в процесах ли она)


Vlad Oshin   (2008-07-24 12:05:00) [1]

не обязательно, Application.exename можно передать


TUserClass   (2008-07-24 11:55:00) [2]

ааа, так вы про чужую прогу имели ввиду ... :)


Vlad Oshin   (2008-07-24 11:37:00) [3]

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=5281


TUserClass   (2008-07-24 11:12:00) [4]

Бежим в Projects->View Source и там дописываем:

.....
var
 CheckEvent : TEvent;
begin
 Application.Initialize;
 CheckEvent := TEvent.Create( nil, false, true, 'MOYA_PROGA');
 If CheckEvent.WaitFor(10) <> wrSignaled then begin
   MessageDlg('MOYA_PROGA уже запущена!', mtInformation, [mbOk], 0);
   ...
 end;

...


tesseract   (2008-07-23 20:28:00) [5]

Какая программа ? Своя или чужая ?


Eraser   (2008-07-23 20:03:00) [6]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо