Difference between revisions of "Win32TitleStyler"

From Free Pascal wiki
Jump to navigationJump to search
Line 4: Line 4:
 
[https://github.com/Alexey-T/CudaText/blob/master/comp/win32titlestyler.pas Download link on GitHub]
 
[https://github.com/Alexey-T/CudaText/blob/master/comp/win32titlestyler.pas Download link on GitHub]
  
Screenshot of CudaText with applied dark color.
+
Screenshot of CudaText with applied dark color. The TMainMenu color was changed by [[Win32MenuStyler]].
  
 
[[File:cudatext-dark-title.png]]
 
[[File:cudatext-dark-title.png]]

Revision as of 09:13, 26 April 2022

About

This is unit, it works on Windows Vista+ only (it doesn't do anything on older Windows).

Download link on GitHub

Screenshot of CudaText with applied dark color. The TMainMenu color was changed by Win32MenuStyler.

cudatext-dark-title.png

Usage

Unit gives the procedure to make the form's title - dark, using Win32 API.

 ApplyFormDarkTitle(AForm: TForm; ADarkMode: bool; AForceApply: bool);
  • Parameter ADarkMode: set to True for dark title, set to False for default title (white on Windows 10).
  • Parameter AForceApply: was needed for CudaText, you can always pass True here. With value False, CudaText cannot make the title dark - after restoring from the full-screen mode (Win10 resets dark style to white style).