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

Вниз

Кто знает альтернативу JustOne ?   Найти похожие ветки 

 
Rule ©   (2004-03-31 16:00) [0]

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


 
panov ©   (2004-03-31 16:06) [1]

function isRunning(aUniqueString:String): Boolean;
var
 hMutex: THandle;
begin
  Result := False;
  hMutex := CreateMutex(nil,False,PChar(aUniqueString));
  if GetLastError = ERROR_ALREADY_EXISTS then
  begin
    Result := True;
    CloseHandle(hMutex);
  end;
end;

Добавляешь в файл проекта, вызываешь перед Applicaton.Initialize:

if isRunning("Это мой крутая прога!") then Exit;


 
Rule ©   (2004-03-31 16:11) [2]

>panov ©   (31.03.04 16:06) [1]
да это я и сам знаю, вот для кой каких целей вот это нада компоненту, может самому написать ?


 
panov ©   (2004-03-31 16:31) [3]

Ну так напиши... не так сложно это...


 
Rule ©   (2004-03-31 17:21) [4]

>panov ©   (31.03.04 16:31) [3]
если все писать то до конца жизни не хватит ...



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

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

Наверх




Память: 0.47 MB
Время: 0.024 c
1-1081419884
vlv
2004-04-08 14:24
2004.04.25
Отлов нажатия клавиш в MDI-приложении


14-1081168789
Nikolay M.
2004-04-05 16:39
2004.04.25
Программисты - натуры творческие ;-))


1-1081257050
olhovik
2004-04-06 17:10
2004.04.25
Как вставить в .ехе


9-1067757990
Micah'GF
2003-11-02 10:26
2004.04.25
Из Picture исчез DIB


3-1080255402
Volodya_
2004-03-26 01:56
2004.04.25
locate