Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.09.17;
Скачать: [xml.tar.bz2];

Вниз

Как переключаться на дочернюю форму через 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.037 c
15-1156607881
ArtemESC
2006-08-26 19:58
2006.09.17
Генератор псевдослучайных чисел...


8-1141606095
KALqYAN
2006-03-06 03:48
2006.09.17
Skins


2-1156670917
Ann123
2006-08-27 13:28
2006.09.17
Обработка исключений


1-1154964112
partizan
2006-08-07 19:21
2006.09.17
Структура данных, вроде АВЛ-дерева


15-1156936062
Layner
2006-08-30 15:07
2006.09.17
Помогите разобраться с формулировкой (1й курс) :(





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский