Главная страница
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.023 c
8-1067023874
FiLimon
2003-10-24 23:31
2004.04.25
Изменить размер картинки


3-1080737811
Mazer
2004-03-31 16:56
2004.04.25
Ошибка "Master record missing" при вставке данных в таблицу...


3-1080548729
dzhon
2004-03-29 12:25
2004.04.25
Как установить кодировку для TBlobField?


1-1081414798
BorisMor
2004-04-08 12:59
2004.04.25
Обработыка событий в классах


1-1081598236
VVK
2004-04-10 15:57
2004.04.25
Отображение HTML файла