Главная » Статьи по Delphi » Программа и интерфейс » Создать форму которая всегда будет позади всех окон

Создать форму которая всегда будет позади всех окон

Автор: Борисов С. А.

Используем функцию SetWindowPos и распологаем окно позадивсех окон каждый раз когда приходит сообщение WM_Activate, т.е. активируется окно.

public
 procedure WMActivate(var Message: TMessage); message WM_Activate;
...
procedure TForm1.WMActivate(var Message: TMessage);
begin
  SetWindowPos(Handle, HWND_BOTTOM, left, top, Width, Height, 
 SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE or SWP_NOREDRAW);
end;

Просмотров: 4415

Обсудить на форуме

0   Спам (22.02.2010) 1. Сергей (Xaker) Если использовать данный код форма получается выше значков...нельзя ли её поместить ещё ниже т.е. за ними...?) Ответ: Это невозможно! Хотя можно используя Overlay отрисовывать на фоне за иконками, но это совсем другое. Так например Winamp делать умеет. Подробнее тут http://www.delphimaster.ru/articles/directx/index.html

---

Имя *:
Email:
Все смайлы
Код *:

Copyright © 2008 - 2018 Программирование на Delphi для начинающих и не только.

Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам.

Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации.