Как сделать форму всегда на высоте, даже если активирована Windows 7 Flip 3D

Question

Как сделать форму всегда на высоте, даже если активирована Windows 7 Flip 3D

Я создаю приложение, которое должно отображать определенную форму всегда сверху (это запрос клиента), поэтому пока я использую функцию SetWindowPos со значением HWND_TOPMOST, и это прекрасно работает, но когда функция Windows 7 Flip 3D мое приложение не остается в топе.

Windows 7 Flip 3D

Вопрос в том, как моя форма может оставаться поверх всех остальных окон, даже если активирована Windows 7 Flip 3D?

5

delphi delphi-xe2 aero dwm flip3d

Источник

user167454 06 фев '12 в 23:19

1 ответ

Решение

Другие вопросы по тегам delphi delphi-xe2 aero dwm flip3d

user91299 06 фев '12 в 23:33 2012-02-06 23:33 · Accepted Answer · 2012-02-06 23:33

Я делаю это некоторое время назад, используя DwmSetWindowAttribute Функция модифицирует атрибут DWMWA_FLIP3D_POLICY значением DWMFLIP3D_EXCLUDEABOVE.

Попробуйте этот код

uses
  Winapi.DwmApi;

procedure TForm40.FormCreate(Sender: TObject);
var
  pvAttribute: Integer;
begin
  pvAttribute:= DWMFLIP3D_EXCLUDEABOVE;
  if DwmCompositionEnabled then
   DwmSetWindowAttribute(Handle, DWMWA_FLIP3D_POLICY, @pvAttribute, Sizeof(Integer));
end;

И это результат