Show window shadow when using VCL styles

Is there a way to show the window shadow according to the usual Windows 7 formats when using the VCL style?

I understand that a bitmap and style settings replace the borders of the form, but not the shadow of some type of alpha mix / aero, which is outside the area affected by the style?

Adding CS_DROPSHADOW to WindowClass.Style does not seem to have an effect.

+3
delphi delphi-xe2 vcl-styles
source share
1 answer

Using CS_DROPSHADOW style works great

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; 

enter image description here

+5
source share

All Articles