Подписаться на RSS рассылку
Главная » Статьи по 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;

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

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

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


Имя *:
Email:


Код *:

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

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

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

Хостинг от uCoz

Автор проекта: Борисов Сергей

e-mail: save-x@yandex.ru

Связь с администрацией сайта