Тень формы на Delphi

[Kotofff]

Помогите если это конечно возможно ...
Как можно отобразить тень по контуру формы ?
Спасибо.

 

[asm64d]

Помогите если это конечно возможно ...
Как можно отобразить тень по контуру формы ?
Спасибо.

Первое что нашел у себя, средствами WinAPI

procedure TForm1.FormCreate(Sender: TObject);
const
CS_DROPSHADOW=$00020000;
begin
SetClassLong(Handle,GCL_STYLE,GetWindowLong(Handle , GCL_STYLE) or CS_DROPSHADOW);
end;