Вниз
Скачать: CL | DM;

Мутексы, черт их подери...   Найти похожие ветки 

← →
smok_er   (2002-12-08 00:10) [0]

Уважаемые!
Мутекс есть, но как по нему узнать хэндл окна? Это требуется для того, чтобы при повторном запуске приложения первая копия стала активной.


← →
Sha ©   (2002-12-08 00:16) [1]

procedure ActivateOldInstance;
var
FoundWindow, FoundPopup : THandle;
begin;
try;
FoundWindow:=FindWindow(nil,PChar(AppTitle));
if FoundWindow<>0 then begin;
FoundPopup:=GetLastActivePopup(FoundWindow);
if IsIconic(FoundWindow) then ShowWindow(FoundWindow,SW_RESTORE);
BringWindowToTop(FoundWindow);
if FoundPopup<>0 then begin;
if IsIconic(FoundPopup) then ShowWindow(FoundPopup,SW_RESTORE);
BringWindowToTop(FoundPopup);
SetForegroundWindow(FoundPopup);
end;
end;
except end;
end;


← →
smok_er   (2002-12-08 00:22) [2]

Огромное спасибо, но...
В том то и дело, что нужно получить хэндл по мутексу, или как-то еще, но без использования Application.Title.


← →
Юрий Зотов ©   (2002-12-08 00:52) [3]

А какое отношение имеет мьютекс к окнам? Никакого. А раз они никак не связаны, то никак и не узнаешь.

А решение посмотрите здесь:
http://www.delphikingdom.com/helloworld/samples_win.htm


← →
smok_er   (2002-12-08 01:11) [4]

Спасибо. Не совсем конечно то, что нужно, но буду пытаться что-нибудь сотворить...



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
14-61759
ЮРИЙ_К
2002-11-20 16:21
2002.12.19
Удалить счетчик шарной программы


3-61506
skirdov
2002-12-02 16:18
2002.12.19
Копирование данных из Query в Table


3-61431
alxx
2002-11-29 17:19
2002.12.19
Относительно триггеров.


3-61409
Eduard
2002-12-02 15:09
2002.12.19
Подвисание программы на время выборки большого объёма данных.


1-61602
Bishop
2002-12-08 23:56
2002.12.19
Быстрая очистка StringGrid




   Наверх