Окно поверх всех - Общие вопросы Delphi

Billys · 03.04.2010, 22:26

Как сделать форму поверх всех окон, пуска и даже когда открываеться пуск всёравно было выше

Arigato · 03.04.2010, 23:01

Задать свойству формы FormStyle значение fsStayOnTop.
Однако открытое меню Пуска будет выше, т.к. оно тоже поверх всех окон, в этом случае приоритет у того окна, на котором фокус.

Lauri · 03.04.2010, 23:35

Кстати интересный вопрос! Интересует тоже! Но делают же как то поверх всех что б даже пуск не видно было(

DeDoK · 04.04.2010, 01:25

пуск виден всегда. пробовал. отлов клавиши пуска тоже не дал результата.

Пепел Феникса · 04.04.2010, 01:34

Код:

SetWindowPos(Form1.Handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE);

сколько раз примеры приводились.

casio23 · 25.02.2011, 22:07

if (GetWindowRect(GetDesktopWindow, rect1)) then
begin
SetWindowPos(Handle, HWND_TOPMOST, rect1.Left, rect1.Top, rect1.Right, rect1.Bottom, SWP_SHOWWINDOW or SWP_SHOWWINDOW);
end;

$T@LKER · 25.02.2011, 22:17

или я вот тему писал пару часов назад)

http://programmersforum.ru/showthread.php?t=139949

03.04.2010, 22:26	#1
Billys Новичок Джуниор Регистрация: 03.04.2010 Сообщений: 1	Окно поверх всех Как сделать форму поверх всех окон, пуска и даже когда открываеться пуск всёравно было выше

03.04.2010, 23:01	#2
Arigato Высокая репутация СуперМодератор Регистрация: 27.07.2008 Сообщений: 15,551	Задать свойству формы FormStyle значение fsStayOnTop. Однако открытое меню Пуска будет выше, т.к. оно тоже поверх всех окон, в этом случае приоритет у того окна, на котором фокус. E-Mail: arigato.freelance@gmail.com

04.04.2010, 01:34	#5
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	Код: `SetWindowPos(Form1.Handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE);` сколько раз примеры приводились. Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

25.02.2011, 22:17	#7
$T@LKER Форумчанин Регистрация: 28.03.2009 Сообщений: 393	или я вот тему писал пару часов назад) http://programmersforum.ru/showthread.php?t=139949 ""Сериалы и компьютерные игры это словно вторая жизнь, которою ты проживаешь, во главе главного героя или персонажа, параллельно своей!""

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Всегда неактивное окно, поверх всех остальных	Zeraim	Общие вопросы Delphi	0	24.01.2010 18:36
поверх всех окон	Temka	Общие вопросы Delphi	4	31.05.2009 14:09
Окно поверх всех остальных	Vikelf	Помощь студентам	2	28.05.2009 17:11
Поверх всех окон	delphin100	Общие вопросы Delphi	2	19.04.2008 19:00
Поверх всех окон	Патрон	Общие вопросы Delphi	1	18.04.2008 16:57

03.04.2010, 23:35	#3
Lauri Форумчанин Регистрация: 01.04.2010 Сообщений: 171	Кстати интересный вопрос! Интересует тоже! Но делают же как то поверх всех что б даже пуск не видно было(

04.04.2010, 01:25	#4
DeDoK Форумчанин Регистрация: 05.11.2007 Сообщений: 392	пуск виден всегда. пробовал. отлов клавиши пуска тоже не дал результата.

25.02.2011, 22:07	#6
casio23 Форумчанин Регистрация: 29.12.2010 Сообщений: 186	if (GetWindowRect(GetDesktopWindow, rect1)) then begin SetWindowPos(Handle, HWND_TOPMOST, rect1.Left, rect1.Top, rect1.Right, rect1.Bottom, SWP_SHOWWINDOW or SWP_SHOWWINDOW); end;