/DelphiWindowStyle

Window stylization for FMX and VCL

Primary LanguagePascalMIT LicenseMIT

FMXWindowStyle

Window stylization for FMX and VCL

The ability to stylize the window and background with modern WinAPI (WinUI 3). Mica, Acrylic, MicaAlt

You can control both the background of the application and the frame. Change the rounding of the window, add and change the color of the window stroke, change the color and text of the window header. You can also apply a dark mode without changing the window of the window of the window (only a dark frame)

 TFormHelper = class helper for TForm
   function SetSystemBackdropType(const Value: TSystemBackdropType): Boolean;
   function SetExtendFrameIntoClientArea(const Value: TRect): Boolean;
   function SetWindowCaptionColor(const Value: TColor): Boolean;
   function SetWindowTextColor(const Value: TColor): Boolean;
   function SetWindowBorderColor(const Value: TColor): Boolean;
   function SetWindowCorner(const Value: TWindowCornerPreference): Boolean;
   function SetWindowColorModeAsSystem: Boolean;
   function SetWindowColorMode(const IsDark: Boolean): Boolean;
   //
   procedure RefreshTitleBarThemeColor;
   function IsHighContrast: Boolean;
   function SystemIsDarkMode: Boolean;
   function IsDarkModeAllowedForWindow: Boolean;
   function GetIsImmersiveColorUsingHighContrast(Mode: TImmersiveHCCacheMode): Boolean;
   function ShouldAppsUseDarkMode: Boolean;
 end;

Light

Auto

Preview

Mica

Preview

Acrilyc

Preview

Tabbed

Preview

Dark

Auto

Preview

Mica

Preview

Acrilyc

Preview

Tabbed

Preview