Текущий архив: 2002.09.23;
Скачать: CL | DM;
Вниз
Вторая загрузка одного и того же модуля Найти похожие ветки
← →
KidMan © (2002-09-10 22:52) [0]Здравствуйте!
Скажите пожалуйста как избежать вторичную загрузку уже загруженной программы?
← →
Suntechnic © (2002-09-11 00:29) [1]FAQ
← →
Keymaster © (2002-09-11 00:43) [2]
Procedure IsAppRuning : Boolean;
var
Mh : THandle;
begin
Mh := CreateSemaphore(Nil,0,1, "MyApp");
If Mh<>0 Then Ff GetLastError = ERROR_ALREADY_EXISTS then
begin
тут делаем что хочем, если программа
была запущена не впервые
end;
← →
Oleg_Gashev © (2002-09-11 01:26) [3]Очень хороший матерал есть на http://www.delphikingdom.com/helloworld/samples_win.htm .
Страницы: 1 вся ветка
Текущий архив: 2002.09.23;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.012 c