Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.09.17;
Скачать: CL | DM;

Вниз

Как переключаться на дочернюю форму через Alt+Tab   Найти похожие ветки 

 
AlexeyT ©   (2006-08-27 10:26) [0]

Создаю дочернюю форму так
with TFormView.Create(Self) do
 try
   Show;
 except
 end;


соответственно, как добавить форму в очередь переключения по Alt+Tab?


 
PSPF2003 ©   (2006-08-27 11:31) [1]


> добавить форму в очередь переключения

Это что?


 
PSPF2003 ©   (2006-08-27 11:38) [2]

private
   procedure WMHotKey(var Mess : TWMHotKey); message WM_HOTKEY;

procedure TFastForm.FormCreate(Sender: TObject);
begin
 RegisterHotKey(Handle, 1, MOD_CONTROL, VK_F12) ;
end;

procedure TFastForm.FormDestroy(Sender: TObject);
begin
 UnregisterHotKey(Handle, 1) ;
end;

procedure TFastForm.WMHotKey(var Mess: TWMHotKey);
begin
 if not Mess.HotKey = 1 then Exit;
 FormView.Show
end;


 
Ketmar ©   (2006-08-27 14:55) [3]

хинт: для того, чтобы окошко считали "окном верхнего уровня" и позволялли на него "альттабнутся", оно должно иметь стиль WS_EX_APPWINDOW.


 
AlexeyT ©   (2006-08-27 16:14) [4]


> хинт: для того, чтобы окошко считали "окном верхнего уровня"
> и позволялли на него "альттабнутся", оно должно иметь стиль
> WS_EX_APPWINDOW.


Вот! То, что нужно было.
Выставлять этот стиль надо в CreateParams, как я понимаю.


 
Ketmar ©   (2006-08-27 17:30) [5]

> [4] AlexeyT ©   (27.08.06 16:14)
угу.



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

Текущий архив: 2006.09.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.033 c
2-1156513884
XTD
2006-08-25 17:51
2006.09.17
Как найти нужное мне слово в (TStrings)?


15-1156705716
Nic
2006-08-27 23:08
2006.09.17
Майл-счётчик


15-1156759329
Nic
2006-08-28 14:02
2006.09.17
К вопросу о стоимости приложений


2-1157012712
Perf2k2
2006-08-31 12:25
2006.09.17
Как лучше подключаться к MySQL через Delphi


2-1156932952
XTD
2006-08-30 14:15
2006.09.17
Не получается поменять парам. регистра REG_SZ. (TRegistry)