Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Windows/Aero Schatten-Effekt anpassen? (https://www.delphipraxis.net/214494-windows-aero-schatten-effekt-anpassen.html)

naazguul 19. Jan 2024 21:29

Windows/Aero Schatten-Effekt anpassen?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo Zusammen,

ich modernisiere gerade das GUI-Design einer meiner Anwendungen.

Das Haupt-Form ist borderless (borderstyle=bsnone).

Für Borderless Forms erzeugt Windows/Aero ja keinen Schatteneffekt.

Ich lasse diesen Schatten für mein Broderless Form nun aber trotzdem erzeugen,
indem ich in Formshow folgendes ausführe:


setclasslong(handle, GCL_STYLE, GetClassLong(handle,GCL_STYLE) or CS_DropShadow);



So weit, so gut, der Schatten ist da. Allerdings ein wenig "dünn". Ich hätte gerne
einen großen, weichen Schatten ähnlich wie bei iTunes.

So ungefähr:

Anhang 56566



Weiß jemand, wie sich die Darstellung des Schattens anpassen/verändern läßt? Ich habe
bisher nichts dazu gefunden.



Danke Euch und viele Grüße,

Philipp

himitsu 20. Jan 2024 10:49

AW: Windows/Aero Schatten-Effekt anpassen?
 
Im Grunde ist der Schatten nicht wirklich um das Fenster, sondern Windows macht das Innere des Fensters eigentlich kleiner und malt den transparenten Schatten in/auf das Fenster.
unschöne Auswirkung: Eigentlich müsse der Schatten größer werden, wenn man mehre Fenster übereinander legt, aber er wird einfach nur dunkler.

Da die native API aber nur Booleans für diesen Schatten anbietet, gibt es also bloß an und aus.
Tipp: https://www.youtube.com/watch?v=NxWI13phf30

Na gut, wenn man sowieso keinen Rahmen/Titelleiste hat, sowie den Systemschatten entfernen täte, kann man nun also einfach selbst einen gewünschten Schatten in/auf sein eigenes Fenster malen.
Mit Rahmen und/oder Titelleiste, müsste man diese dann ebenfalls selbst malen (ein bissl weiter innen), aber dafür gibt auch es eine passende API.


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:14 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz