Активность окна

← →
markers © (2004-11-17 17:40) [0]

Вообщем разобрался я полностью с хоткеями, но вопрос такой, когда я поймал определенную клавишу я вызываю диолог, но активной моя прога не становится (Естественно) активным остается преждняя прога, вот вопрос, как сделать активным моё окно, я многое пробовал банальный SetFocus не помогает пробовал Application.RestoreToMosts Нифига... А надо чтоб форма была активна... Помогите пли;)

← →
ssk © (2004-11-17 17:48) [1]

SetActiveWindow() ?

← →
cvg (2004-11-17 17:53) [2]

windows.BringWindowToTop(h_pars);
где wHandle -- это что-то типа
h_mdi := FindWindow(wHandle,"MDIClient",nil,0);

← →
markers © (2004-11-17 17:54) [3]

Чё-то не канает.........

← →
cvg (2004-11-17 17:58) [4]

Запускаешь свою прогу, запускаешь Spyxx.exe, определяешь handle окна, далее см. выше.

← →
markers © (2004-11-17 18:00) [5]

А что-нибудь без дополнительного екзешника

← →
markers © (2004-11-17 18:01) [6]

А что-нибудь без дополнительного екзешника

← →
cvg (2004-11-17 18:06) [7]

Дык один раз определишь -- и потом ведь на всю жизнь :)

← →
markers © (2004-11-17 18:10) [8]

cvg (17.11.04 18:06) [7]
Всмысле?

← →
cvg (2004-11-17 18:21) [9]

В смысле, что один раз хэндл определил -- и больше тебе этот spyxx не нужон. Если надо, пиши на alternativvaNOSPAM@yandex.ru ("NOSPAM", конечно, удали). Отвечу только завтра, т.к. домой пошел уже.

SetForegroundWindow(FindWindow("YourMainFormClass","YourMainFormCaption"));

← →
Elena (2004-11-25 10:05) [11]

HPrevWin := FindWindow("TMainForm", "MainForm");
if HPrevWin <> 0 then
SetForegroundWindow(HPrevWin);
end;
В теории должно работать на практике не работает.
Добавляю
ShowWindow(HPrevWin,SW_SHOW);
Окно активизируется, только не минимизируется, если было до вызова метода минимизировано

HPrevWin := FindWindow("TMainForm", "MainForm");
if HPrevWin <> 0 then
SetForegroundWindow(HPrevWin);
ShowWindow(HPrevWin,SW_SHOW);
end;

Активность окна Найти похожие ветки