Показать тень тени при использовании стилей VCL

Question

Есть ли способ показать тень окна, как в обычных форматах Windows 7, при использовании стиля VCL?

Я понимаю, что растровое изображение и настройки в стиле заменяют границы формы, но не являются ли тень какой-либо альфа-смесью/аэрообъектом, которая находится за пределами области, затронутой стилем?

Добавление CS_DROPSHADOW в WindowClass.Style, кажется, не имеет никакого эффекта.

Answer 1

Используя стиль CS_DROPSHADOW работает отлично

type 
    TMyForm = class(TForm) 
    protected 
    procedure CreateParams(var Params: TCreateParams); override; 
    end; 

procedure TMyForm.CreateParams(var Params: TCreateParams); 
begin 
    inherited; 
    with Params do 
    WindowClass.Style := WindowClass.Style or CS_DROPSHADOW; 
end;