Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 14.06.2011, 15:47   #1
ZotaC
Форумчанин
 
Аватар для ZotaC
 
Регистрация: 25.06.2009
Сообщений: 163
По умолчанию Ниже всех окон

Здравствуйте. Скажите, есть ли возможность в Delphi как-то поставить окно, чтобы оно всегда было ниже всех окон? То есть, на рабочем столе, и чтобы ниже его были только ярлыки. Например, когда ты выделяешь его, то, если сверху есть окно другой программы, то оно так и продолжает находиться выше. Короче, операция, противоположная 'fsStayOnTop'.
ZotaC вне форума Ответить с цитированием
Старый 14.06.2011, 15:59   #2
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

Код:
SetWindowPos(Handle,HWND_BOTTOM,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE);
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 14.06.2011, 16:33   #3
eoln
Старожил
 
Аватар для eoln
 
Регистрация: 26.04.2008
Сообщений: 2,645
По умолчанию

Ещё можно переопределить оконную процедуру WndProc
Код:
procedure TForm1.WndProc (var message: TMessage);
begin
   case message.Msg of
     WM_WINDOWPOSCHANGING: PWindowPos(Message.LParam)^.hwndInsertAfter:=HWND_BOTTOM;
   end;
   inherited;
end;
eoln вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Поверх всех окон timyr1997 Общие вопросы Delphi 12 05.08.2010 15:49
поверх всех окон blackstersl Общие вопросы Delphi 6 05.08.2010 15:36
поверх всех окон Temka Общие вопросы Delphi 4 31.05.2009 14:09
Поверх всех окон delphin100 Общие вопросы Delphi 2 19.04.2008 19:00
Поверх всех окон Патрон Общие вопросы Delphi 1 18.04.2008 16:57