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

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

 
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", конечно, удали). Отвечу только завтра, т.к. домой пошел уже.


 
DelphiN! ©   (2004-11-19 10:44) [10]

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;



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

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



Память: 0.47 MB
Время: 0.023 c
3-1102478024
dolphin
2004-12-08 06:53
2005.01.09
ошибка по псевдониму или ... ???


3-1102664574
DimonNew
2004-12-10 10:42
2005.01.09
ClientDataSet &amp; UpdateSQL


1-1103625147
}|{yk
2004-12-21 13:32
2005.01.09
Memo и Unicode


3-1102505582
Stas Kalishenko
2004-12-08 14:33
2005.01.09
Смена языкового драйвера для DBASE


1-1103706374
V l a d i m i r
2004-12-22 12:06
2005.01.09
Компонент для ввода и отображения даты




   Наверх