Windows 11 Style Dark-Mode und Fensterschatten

[WiPhi]

Zitat von BigAl:

1. Ist es möglich den VCL-Formularen einen Schatten zu entlocken?

Vielleicht so?

Delphi-Quellcode:

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

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