Difference between revisions of "Win32TitleStyler"
From Free Pascal wiki
Jump to navigationJump to search (Created page with "==About== This is unit, it works on Windows Vista+ only (it doesn't do anything on older Windows). [https://github.com/Alexey-T/CudaText/blob/master/comp/win32titlestyler.pas...") |
|||
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. | |
+ | |||
+ | [[File:cudatext-dark-title.png]] | ||
+ | |||
+ | ==Usage== | ||
+ | Unit gives the procedure to make the form's title - dark, using Win32 API. | ||
<syntaxhighlight lang="pascal"> | <syntaxhighlight lang="pascal"> |
Revision as of 10:12, 26 April 2022
About
This is unit, it works on Windows Vista+ only (it doesn't do anything on older Windows).
Screenshot of CudaText with applied dark color.
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).