Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


markers ©   (2004-11-17 17:40:00) 

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


Elena   (2004-11-25 10:05:00) [1]

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;


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

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


cvg   (2004-11-17 18:21:00) [3]

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


markers   (2004-11-17 18:10:00) [4]

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


cvg   (2004-11-17 18:06:00) [5]

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


markers   (2004-11-17 18:01:00) [6]

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


markers   (2004-11-17 18:00:00) [7]

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


cvg   (2004-11-17 17:58:00) [8]

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


markers   (2004-11-17 17:54:00) [9]

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


cvg   (2004-11-17 17:53:00) [10]


windows.BringWindowToTop(h_pars);

где wHandle -- это что-то типа

h_mdi := FindWindow(wHandle,'MDIClient',nil,0);


ssk   (2004-11-17 17:48:00) [11]

SetActiveWindow() ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо