Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.025 c