forked from BlueMystical/Dark-Mode-Forms
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathDarkModeCS.cs
1475 lines (1247 loc) · 54.5 KB
/
DarkModeCS.cs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
using Microsoft.Win32;
using System.Drawing;
using System;
using System.ComponentModel;
using System.Drawing.Drawing2D;
using System.Linq;
using System.Reflection;
using System.Runtime.CompilerServices;
using System.Runtime.InteropServices;
using System.Windows.Forms;
using System.Diagnostics;
namespace DarkModeForms
{
/// <summary>This tries to automatically apply Windows Dark Mode (if enabled) to a Form.
/// <para>Author: BlueMystic ([email protected]) 2024</para></summary>
public class DarkModeCS
{
#region Win32 API Declarations
public struct DWMCOLORIZATIONcolors
{
public uint ColorizationColor,
ColorizationAfterglow,
ColorizationColorBalance,
ColorizationAfterglowBalance,
ColorizationBlurBalance,
ColorizationGlassReflectionIntensity,
ColorizationOpaqueBlend;
}
[Flags]
public enum DWMWINDOWATTRIBUTE : uint
{
/// <summary>
/// Use with DwmGetWindowAttribute. Discovers whether non-client rendering is enabled. The retrieved value is of type BOOL. TRUE if non-client rendering is enabled; otherwise, FALSE.
/// </summary>
DWMWA_NCRENDERING_ENABLED = 1,
/// <summary>
/// Use with DwmSetWindowAttribute. Sets the non-client rendering policy. The pvAttribute parameter points to a value from the DWMNCRENDERINGPOLICY enumeration.
/// </summary>
DWMWA_NCRENDERING_POLICY,
/// <summary>
/// Use with DwmSetWindowAttribute. Enables or forcibly disables DWM transitions. The pvAttribute parameter points to a value of type BOOL. TRUE to disable transitions, or FALSE to enable transitions.
/// </summary>
DWMWA_TRANSITIONS_FORCEDISABLED,
/// <summary>
/// Use with DwmSetWindowAttribute. Enables content rendered in the non-client area to be visible on the frame drawn by DWM. The pvAttribute parameter points to a value of type BOOL. TRUE to enable content rendered in the non-client area to be visible on the frame; otherwise, FALSE.
/// </summary>
DWMWA_ALLOW_NCPAINT,
/// <summary>
/// Use with DwmGetWindowAttribute. Retrieves the bounds of the caption button area in the window-relative space. The retrieved value is of type RECT. If the window is minimized or otherwise not visible to the user, then the value of the RECT retrieved is undefined. You should check whether the retrieved RECT contains a boundary that you can work with, and if it doesn't then you can conclude that the window is minimized or otherwise not visible.
/// </summary>
DWMWA_CAPTION_BUTTON_BOUNDS,
/// <summary>
/// Use with DwmSetWindowAttribute. Specifies whether non-client content is right-to-left (RTL) mirrored. The pvAttribute parameter points to a value of type BOOL. TRUE if the non-client content is right-to-left (RTL) mirrored; otherwise, FALSE.
/// </summary>
DWMWA_NONCLIENT_RTL_LAYOUT,
/// <summary>
/// Use with DwmSetWindowAttribute. Forces the window to display an iconic thumbnail or peek representation (a static bitmap), even if a live or snapshot representation of the window is available. This value is normally set during a window's creation, and not changed throughout the window's lifetime. Some scenarios, however, might require the value to change over time. The pvAttribute parameter points to a value of type BOOL. TRUE to require a iconic thumbnail or peek representation; otherwise, FALSE.
/// </summary>
DWMWA_FORCE_ICONIC_REPRESENTATION,
/// <summary>
/// Use with DwmSetWindowAttribute. Sets how Flip3D treats the window. The pvAttribute parameter points to a value from the DWMFLIP3DWINDOWPOLICY enumeration.
/// </summary>
DWMWA_FLIP3D_POLICY,
/// <summary>
/// Use with DwmGetWindowAttribute. Retrieves the extended frame bounds rectangle in screen space. The retrieved value is of type RECT.
/// </summary>
DWMWA_EXTENDED_FRAME_BOUNDS,
/// <summary>
/// Use with DwmSetWindowAttribute. The window will provide a bitmap for use by DWM as an iconic thumbnail or peek representation (a static bitmap) for the window. DWMWA_HAS_ICONIC_BITMAP can be specified with DWMWA_FORCE_ICONIC_REPRESENTATION. DWMWA_HAS_ICONIC_BITMAP normally is set during a window's creation and not changed throughout the window's lifetime. Some scenarios, however, might require the value to change over time. The pvAttribute parameter points to a value of type BOOL. TRUE to inform DWM that the window will provide an iconic thumbnail or peek representation; otherwise, FALSE. Windows Vista and earlier: This value is not supported.
/// </summary>
DWMWA_HAS_ICONIC_BITMAP,
/// <summary>
/// Use with DwmSetWindowAttribute. Do not show peek preview for the window. The peek view shows a full-sized preview of the window when the mouse hovers over the window's thumbnail in the taskbar. If this attribute is set, hovering the mouse pointer over the window's thumbnail dismisses peek (in case another window in the group has a peek preview showing). The pvAttribute parameter points to a value of type BOOL. TRUE to prevent peek functionality, or FALSE to allow it. Windows Vista and earlier: This value is not supported.
/// </summary>
DWMWA_DISALLOW_PEEK,
/// <summary>
/// Use with DwmSetWindowAttribute. Prevents a window from fading to a glass sheet when peek is invoked. The pvAttribute parameter points to a value of type BOOL. TRUE to prevent the window from fading during another window's peek, or FALSE for normal behavior. Windows Vista and earlier: This value is not supported.
/// </summary>
DWMWA_EXCLUDED_FROM_PEEK,
/// <summary>
/// Use with DwmSetWindowAttribute. Cloaks the window such that it is not visible to the user. The window is still composed by DWM. Using with DirectComposition: Use the DWMWA_CLOAK flag to cloak the layered child window when animating a representation of the window's content via a DirectComposition visual that has been associated with the layered child window. For more details on this usage case, see How to animate the bitmap of a layered child window. Windows 7 and earlier: This value is not supported.
/// </summary>
DWMWA_CLOAK,
/// <summary>
/// Use with DwmGetWindowAttribute. If the window is cloaked, provides one of the following values explaining why. DWM_CLOAKED_APP (value 0x0000001). The window was cloaked by its owner application. DWM_CLOAKED_SHELL(value 0x0000002). The window was cloaked by the Shell. DWM_CLOAKED_INHERITED(value 0x0000004). The cloak value was inherited from its owner window. Windows 7 and earlier: This value is not supported.
/// </summary>
DWMWA_CLOAKED,
/// <summary>
/// Use with DwmSetWindowAttribute. Freeze the window's thumbnail image with its current visuals. Do no further live updates on the thumbnail image to match the window's contents. Windows 7 and earlier: This value is not supported.
/// </summary>
DWMWA_FREEZE_REPRESENTATION,
/// <summary>
/// Use with DwmSetWindowAttribute. Enables a non-UWP window to use host backdrop brushes. If this flag is set, then a Win32 app that calls Windows::UI::Composition APIs can build transparency effects using the host backdrop brush (see Compositor.CreateHostBackdropBrush). The pvAttribute parameter points to a value of type BOOL. TRUE to enable host backdrop brushes for the window, or FALSE to disable it. This value is supported starting with Windows 11 Build 22000.
/// </summary>
DWMWA_USE_HOSTBACKDROPBRUSH,
/// <summary>
/// Use with DwmSetWindowAttribute. Allows the window frame for this window to be drawn in dark mode colors when the dark mode system setting is enabled. For compatibility reasons, all windows default to light mode regardless of the system setting. The pvAttribute parameter points to a value of type BOOL. TRUE to honor dark mode for the window, FALSE to always use light mode. This value is supported starting with Windows 10 Build 17763.
/// </summary>
DWMWA_USE_IMMERSIVE_DARK_MODE_BEFORE_20H1 = 19,
/// <summary>
/// Use with DwmSetWindowAttribute. Allows the window frame for this window to be drawn in dark mode colors when the dark mode system setting is enabled. For compatibility reasons, all windows default to light mode regardless of the system setting. The pvAttribute parameter points to a value of type BOOL. TRUE to honor dark mode for the window, FALSE to always use light mode. This value is supported starting with Windows 11 Build 22000.
/// </summary>
DWMWA_USE_IMMERSIVE_DARK_MODE = 20,
/// <summary>
/// Use with DwmSetWindowAttribute. Specifies the rounded corner preference for a window. The pvAttribute parameter points to a value of type DWM_WINDOW_CORNER_PREFERENCE. This value is supported starting with Windows 11 Build 22000.
/// </summary>
DWMWA_WINDOW_CORNER_PREFERENCE = 33,
/// <summary>
/// Use with DwmSetWindowAttribute. Specifies the color of the window border. The pvAttribute parameter points to a value of type COLORREF. The app is responsible for changing the border color according to state changes, such as a change in window activation. This value is supported starting with Windows 11 Build 22000.
/// </summary>
DWMWA_BORDER_COLOR,
/// <summary>
/// Use with DwmSetWindowAttribute. Specifies the color of the caption. The pvAttribute parameter points to a value of type COLORREF. This value is supported starting with Windows 11 Build 22000.
/// </summary>
DWMWA_CAPTION_COLOR,
/// <summary>
/// Use with DwmSetWindowAttribute. Specifies the color of the caption text. The pvAttribute parameter points to a value of type COLORREF. This value is supported starting with Windows 11 Build 22000.
/// </summary>
DWMWA_TEXT_COLOR,
/// <summary>
/// Use with DwmGetWindowAttribute. Retrieves the width of the outer border that the DWM would draw around this window. The value can vary depending on the DPI of the window. The pvAttribute parameter points to a value of type UINT. This value is supported starting with Windows 11 Build 22000.
/// </summary>
DWMWA_VISIBLE_FRAME_BORDER_THICKNESS,
/// <summary>
/// The maximum recognized DWMWINDOWATTRIBUTE value, used for validation purposes.
/// </summary>
DWMWA_LAST,
}
[Flags]
public enum DWM_WINDOW_CORNER_PREFERENCE
{
DWMWCP_DEFAULT = 0,
DWMWCP_DONOTROUND = 1,
DWMWCP_ROUND = 2,
DWMWCP_ROUNDSMALL = 3
}
[Serializable, StructLayout(LayoutKind.Sequential)]
public struct RECT
{
public int Left;
public int Top;
public int Right;
public int Bottom;
public Rectangle ToRectangle()
{
return Rectangle.FromLTRB(Left, Top, Right, Bottom);
}
}
public const int EM_SETCUEBANNER = 5377;
[DllImport("user32.dll", CharSet = CharSet.Auto)]
public static extern IntPtr SendMessage(IntPtr hWnd, int msg, IntPtr wParam, [MarshalAs(UnmanagedType.LPWStr)] string lParam);
[DllImport("DwmApi")]
public static extern int DwmSetWindowAttribute(IntPtr hwnd, int attr, int[] attrValue, int attrSize);
[DllImport("dwmapi.dll")]
public static extern int DwmGetWindowAttribute(IntPtr hwnd, int dwAttribute, out RECT pvAttribute, int cbAttribute);
[DllImport("uxtheme.dll", CharSet = CharSet.Unicode)]
private static extern int SetWindowTheme(IntPtr hWnd, string pszSubAppName, string pszSubIdList);
[DllImport("dwmapi.dll", EntryPoint = "#127")]
public static extern void DwmGetColorizationParameters(ref DWMCOLORIZATIONcolors colors);
[DllImport("Gdi32.dll", EntryPoint = "CreateRoundRectRgn")]
private static extern IntPtr CreateRoundRectRgn
(
int nLeftRect, // x-coordinate of upper-left corner
int nTopRect, // y-coordinate of upper-left corner
int nRightRect, // x-coordinate of lower-right corner
int nBottomRect, // y-coordinate of lower-right corner
int nWidthEllipse, // height of ellipse
int nHeightEllipse // width of ellipse
);
[DllImport("user32")]
private static extern IntPtr GetDC(IntPtr hwnd);
[DllImport("user32")]
private static extern IntPtr ReleaseDC(IntPtr hwnd, IntPtr hdc);
public static IntPtr GetHeaderControl(ListView list)
{
const int LVM_GETHEADER = 0x1000 + 31;
return SendMessage(list.Handle, LVM_GETHEADER, IntPtr.Zero, "");
}
#endregion Win32 API Declarations
#region Static Local Members
/// <summary>
/// prevents applying a theme multiple times to the same control
/// without this, it happens at least is some MDI forms
/// currently, only Key is being used, the Value is not.
/// Using ConditionalWeakTable because I found no suitable ISet<Control> implementation
/// </summary>
private static ConditionalWeakTable<Control, object> ControlsProcessed = new ConditionalWeakTable<Control, object>();
#endregion
#region Public Static Members
/// <summary>
/// setting to false (ideally before any Form is created) disables DarkModeCS
/// </summary>
public static bool IsDarkModeCSEnabled { get; set; } = true;
#endregion
#region Public Members
/// <summary>'true' if Dark Mode Color is set in Windows's Settings.</summary>
public bool IsDarkMode { get; set; } = false;
/// <summary>Option to re-colorize all Icons in Toolbars and Menus.</summary>
public bool ColorizeIcons { get; set; } = true;
/// <summary>Option to make all Panels Borders Rounded</summary>
public bool RoundedPanels { get; set; } = false;
/// <summary>The PArent form for them all.</summary>
public Form OwnerForm { get; set; }
/// <summary>Windows Colors. Can be customized.</summary>
public OSThemeColors OScolors { get; set; }
#endregion Public Members
#region Constructors
/// <summary>This tries to automatically apply Windows Dark Mode (if enabled) to a Form.</summary>
/// <param name="_Form">The Form to become Dark</param>
/// <param name="_ColorizeIcons">[OPTIONAL] re-colorize all Icons in Toolbars and Menus.</param>
/// <param name="_RoundedPanels">[OPTIONAL] make all Panels Borders Rounded</param>
public DarkModeCS(Form _Form, bool _ColorizeIcons = true, bool _RoundedPanels = false)
{
//Sets the Properties:
OwnerForm = _Form;
ColorizeIcons = _ColorizeIcons;
RoundedPanels = _RoundedPanels;
IsDarkMode = IsDarkModeCSEnabled && GetWindowsColorMode() <= 0 ? true : false;
//if (!IsDarkModeCSEnabled) return;
ApplyTheme(IsDarkMode);
}
#endregion Constructors
#region Public Methods
/// <summary>Apply the Theme into the Window and all its controls.</summary>
/// <param name="pIsDarkMode">'true': apply Dark Mode, 'false': apply Clear Mode</param>
public void ApplyTheme(bool pIsDarkMode = true)
{
try
{
IsDarkMode = pIsDarkMode;
OScolors = GetSystemColors(OwnerForm, pIsDarkMode ? 0 : 1);
ControlsProcessed = new ConditionalWeakTable<Control, object>();
if (OScolors != null)
{
//Apply Window's Dark Mode to the Form's Title bar:
ApplySystemDarkTheme(OwnerForm, pIsDarkMode);
OwnerForm.BackColor = OScolors.Background;
OwnerForm.ForeColor = OScolors.TextInactive;
if (OwnerForm != null && OwnerForm.Controls != null)
{
foreach (Control _control in OwnerForm.Controls)
{
ThemeControl(_control);
}
OwnerForm.ControlAdded += (object sender, ControlEventArgs e) =>
{
ThemeControl(e.Control);
};
}
}
}
catch (Exception ex)
{
MessageBox.Show(ex.Message + ex.StackTrace, "ERROR", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
/// <summary>Recursively apply the Colors from 'OScolors' to the Control and all its childs.</summary>
/// <param name="control">Can be a Form or any Winforms Control.</param>
public void ThemeControl(Control control)
{
//prevent applying a theme multiple times to the same control
//without this, it happens at least is some MDI forms
if (ControlsProcessed.TryGetValue(control, out object _)) return;
ControlsProcessed.Add(control, null);
BorderStyle BStyle = (IsDarkMode ? BorderStyle.FixedSingle : BorderStyle.Fixed3D);
FlatStyle FStyle = (IsDarkMode ? FlatStyle.Flat : FlatStyle.Standard);
control.HandleCreated += (object sender, EventArgs e) =>
{
ApplySystemDarkTheme(control, IsDarkMode);
};
control.ControlAdded += (object sender, ControlEventArgs e) =>
{
ThemeControl(e.Control);
};
string Mode = IsDarkMode ? "DarkMode_Explorer" : "ClearMode_Explorer";
SetWindowTheme(control.Handle, Mode, null); //<- Attempts to apply Dark Mode using Win32 API if available.
control.GetType().GetProperty("BackColor")?.SetValue(control, OScolors.Control);
control.GetType().GetProperty("ForeColor")?.SetValue(control, OScolors.TextActive);
/* Here we Finetune individual Controls */
if (control is Label)
{
control.GetType().GetProperty("BackColor")?.SetValue(control, control.Parent.BackColor);
control.GetType().GetProperty("BorderStyle")?.SetValue(control, BorderStyle.None);
control.Paint += (object sender, PaintEventArgs e) =>
{
if (control.Enabled == false && this.IsDarkMode)
{
var radio = (sender as Label);
Brush B = new SolidBrush(control.ForeColor);
e.Graphics.DrawString(radio.Text, radio.Font,
B, new System.Drawing.PointF(1, 0));
}
};
}
if (control is LinkLabel)
{
control.GetType().GetProperty("LinkColor")?.SetValue(control, OScolors.AccentLight);
control.GetType().GetProperty("VisitedLinkColor")?.SetValue(control, OScolors.Primary);
}
if (control is TextBox)
{
//SetRoundBorders(tb, 4, OScolors.SurfaceDark, 1);
control.GetType().GetProperty("BorderStyle")?.SetValue(control, BStyle);
}
if (control is NumericUpDown)
{
//Mode = IsDarkMode ? "DarkMode_CFD" : "ClearMode_CFD";
Mode = IsDarkMode ? "DarkMode_ItemsView" : "ClearMode_ItemsView";
SetWindowTheme(control.Handle, Mode, null);
}
if (control is Button)
{
var button = control as Button;
button.FlatStyle = FlatStyle.System;
button.FlatAppearance.CheckedBackColor = OScolors.Accent;
button.BackColor = OScolors.Control;
button.FlatAppearance.BorderColor = (OwnerForm.AcceptButton == button) ?
OScolors.Accent : OScolors.Control;
}
if (control is ComboBox)
{
Mode = IsDarkMode ? "DarkMode_CFD" : "ClearMode_CFD";
control.BeginInvoke(new Action(() => (control as ComboBox).SelectionLength = 0));
if (control.Enabled == false && this.IsDarkMode)
{
(control as ComboBox).DropDownStyle = ComboBoxStyle.DropDownList;
}
SetWindowTheme(control.Handle, Mode, null);
}
if (control is Panel)
{
var panel = control as Panel;
// Process the panel within the container
panel.BackColor = OScolors.Surface;
panel.BorderStyle = BorderStyle.None;
if (!(panel.Parent is TabControl) || !(panel.Parent is TableLayoutPanel))
{
if (RoundedPanels)
{
SetRoundBorders(panel, 6, OScolors.SurfaceDark, 1);
}
}
}
if (control is GroupBox)
{
control.GetType().GetProperty("BackColor")?.SetValue(control, control.Parent.BackColor);
control.GetType().GetProperty("ForeColor")?.SetValue(control, OScolors.TextActive);
control.Paint += (object sender, PaintEventArgs e) =>
{
if (control.Enabled == false && this.IsDarkMode)
{
var radio = (sender as GroupBox);
Brush B = new SolidBrush(control.ForeColor);
e.Graphics.DrawString(radio.Text, radio.Font,
B, new System.Drawing.PointF(6, 0));
}
};
}
if (control is TableLayoutPanel)
{
control.GetType().GetProperty("BackColor")?.SetValue(control, control.Parent.BackColor);
control.GetType().GetProperty("ForeColor")?.SetValue(control, OScolors.TextInactive);
control.GetType().GetProperty("BorderStyle")?.SetValue(control, BorderStyle.None);
}
if (control is TabControl)
{
var tab = control as TabControl;
tab.Appearance = TabAppearance.Normal;
tab.DrawMode = System.Windows.Forms.TabDrawMode.OwnerDrawFixed;
tab.DrawItem += (object sender, DrawItemEventArgs e) =>
{
//Draw the background of the main control
using (SolidBrush backColor = new SolidBrush(tab.Parent.BackColor))
{
e.Graphics.FillRectangle(backColor, tab.ClientRectangle);
}
using (Brush tabBack = new SolidBrush(OScolors.Surface))
{
for (int i = 0; i < tab.TabPages.Count; i++)
{
TabPage tabPage = tab.TabPages[i];
tabPage.BackColor = OScolors.Surface;
tabPage.BorderStyle = BorderStyle.FixedSingle;
tabPage.ControlAdded += (object _s, ControlEventArgs _e) =>
{
ThemeControl(_e.Control);
};
var tBounds = e.Bounds;
//tBounds.Inflate(100, 100);
bool IsSelected = (tab.SelectedIndex == i);
if (IsSelected)
{
e.Graphics.FillRectangle(tabBack, tBounds);
TextRenderer.DrawText(e.Graphics, tabPage.Text, tabPage.Font, e.Bounds, OScolors.TextActive);
}
else
{
TextRenderer.DrawText(e.Graphics, tabPage.Text, tabPage.Font, tab.GetTabRect(i), OScolors.TextInactive);
}
}
}
};
}
if (control is FlatTabControl)
{
control.GetType().GetProperty("BackColor")?.SetValue(control, OScolors.Background);
control.GetType().GetProperty("TabColor")?.SetValue(control, OScolors.Surface);
control.GetType().GetProperty("SelectTabColor")?.SetValue(control, OScolors.Control);
control.GetType().GetProperty("SelectedForeColor")?.SetValue(control, OScolors.TextActive);
control.GetType().GetProperty("ForeColor")?.SetValue(control, OScolors.TextInactive);
control.GetType().GetProperty("LineColor")?.SetValue(control, OScolors.Background);
}
if (control is PictureBox)
{
control.GetType().GetProperty("BackColor")?.SetValue(control, control.Parent.BackColor);
control.GetType().GetProperty("ForeColor")?.SetValue(control, OScolors.TextActive);
control.GetType().GetProperty("BorderStyle")?.SetValue(control, BorderStyle.None);
}
if (control is CheckBox)
{
control.GetType().GetProperty("BackColor")?.SetValue(control, control.Parent.BackColor);
control.ForeColor = control.Enabled ? OScolors.TextActive : OScolors.TextInactive;
control.Paint += (object sender, PaintEventArgs e) =>
{
if (control.Enabled == false && this.IsDarkMode)
{
var radio = (sender as CheckBox);
Brush B = new SolidBrush(control.ForeColor);
e.Graphics.DrawString(radio.Text, radio.Font,
B, new System.Drawing.PointF(16, 0));
}
};
}
if (control is RadioButton)
{
control.GetType().GetProperty("BackColor")?.SetValue(control, control.Parent.BackColor);
control.ForeColor = control.Enabled ? OScolors.TextActive : OScolors.TextInactive;
control.Paint += (object sender, PaintEventArgs e) =>
{
if (control.Enabled == false && this.IsDarkMode)
{
var radio = (sender as RadioButton);
Brush B = new SolidBrush(control.ForeColor);
e.Graphics.DrawString(radio.Text, radio.Font,
B, new System.Drawing.PointF(16, 0));
}
};
}
if (control is MenuStrip)
{
(control as MenuStrip).RenderMode = ToolStripRenderMode.Professional;
(control as MenuStrip).Renderer = new MyRenderer(new CustomColorTable(OScolors), ColorizeIcons)
{
MyColors = OScolors
};
}
if (control is ToolStrip)
{
(control as ToolStrip).RenderMode = ToolStripRenderMode.Professional;
(control as ToolStrip).Renderer = new MyRenderer(new CustomColorTable(OScolors), ColorizeIcons) { MyColors = OScolors };
}
if (control is ToolStripPanel) //<- empty area around ToolStrip
{
control.GetType().GetProperty("BackColor")?.SetValue(control, control.Parent.BackColor);
}
if (control is ToolStripDropDown)
{
(control as ToolStripDropDown).Opening += Tsdd_Opening;
}
if (control is ToolStripDropDownMenu)
{
(control as ToolStripDropDownMenu).Opening += Tsdd_Opening;
}
if (control is ContextMenuStrip)
{
(control as ContextMenuStrip).RenderMode = ToolStripRenderMode.Professional;
(control as ContextMenuStrip).Renderer = new MyRenderer(new CustomColorTable(OScolors), ColorizeIcons) { MyColors = OScolors };
(control as ContextMenuStrip).Opening += Tsdd_Opening;
}
if (control is MdiClient) //<- empty area of MDI container window
{
control.GetType().GetProperty("BackColor")?.SetValue(control, OScolors.Surface);
}
if (control is PropertyGrid)
{
var pGrid = control as PropertyGrid;
pGrid.BackColor = OScolors.Control;
pGrid.ViewBackColor = OScolors.Control;
pGrid.LineColor = OScolors.Surface;
pGrid.ViewForeColor = OScolors.TextActive;
pGrid.ViewBorderColor = OScolors.ControlDark;
pGrid.CategoryForeColor = OScolors.TextActive;
pGrid.CategorySplitterColor = OScolors.ControlLight;
}
if (control is ListView)
{
var lView = control as ListView;
Mode = IsDarkMode ? "DarkMode_ItemsView" : "ClearMode_ItemsView";
SetWindowTheme(control.Handle, Mode, null);
if (lView.View == View.Details)
{
lView.OwnerDraw = true;
lView.DrawColumnHeader += (object sender, DrawListViewColumnHeaderEventArgs e) =>
{
//e.DrawDefault = true;
//e.DrawBackground();
//e.DrawText();
using (SolidBrush backBrush = new SolidBrush(OScolors.ControlLight))
{
using (SolidBrush foreBrush = new SolidBrush(OScolors.TextActive))
{
using (var sf = new StringFormat())
{
sf.Alignment = StringAlignment.Center;
e.Graphics.FillRectangle(backBrush, e.Bounds);
e.Graphics.DrawString(e.Header.Text, lView.Font, foreBrush, e.Bounds, sf);
}
}
}
};
lView.DrawItem += (sender, e) => { e.DrawDefault = true; };
lView.DrawSubItem += (sender, e) =>
{
e.DrawDefault = true;
//IntPtr headerControl = GetHeaderControl(lView);
//IntPtr hdc = GetDC(headerControl);
//Rectangle rc = new Rectangle(
// e.Bounds.Right, //<- Right instead of Left - offsets the rectangle
// e.Bounds.Top,
// e.Bounds.Width,
// e.Bounds.Height
//);
//rc.Width += 200;
//using (SolidBrush backBrush = new SolidBrush(OScolors.ControlLight))
//{
// e.Graphics.FillRectangle(backBrush, rc);
//}
//ReleaseDC(headerControl, hdc);
};
Mode = IsDarkMode ? "DarkMode_ItemsView" : "ClearMode_ItemsView";
SetWindowTheme(control.Handle, Mode, null);
}
}
if (control is TreeView)
{
control.GetType().GetProperty("BorderStyle")?.SetValue(control, BorderStyle.None);
//tree.DrawNode += (object? sender, DrawTreeNodeEventArgs e) =>
//{
// if (e.Node.ImageIndex != -1)
// {
// Image image = tree.ImageList.Images[e.Node.ImageIndex];
// using (Graphics g = Graphics.FromImage(image))
// {
// g.InterpolationMode = InterpolationMode.HighQualityBilinear;
// g.CompositingQuality = CompositingQuality.HighQuality;
// g.SmoothingMode = SmoothingMode.HighQuality;
// g.DrawImage(DarkModeCS.ChangeToColor(image, OScolors.TextInactive), new Point(0,0));
// }
// tree.ImageList.Images[e.Node.ImageIndex] = image;
// }
// tree.Invalidate();
//};
}
if (control is DataGridView)
{
var grid = control as DataGridView;
grid.EnableHeadersVisualStyles = false;
grid.BorderStyle = BorderStyle.FixedSingle;
grid.BackgroundColor = OScolors.Control;
grid.GridColor = OScolors.Control;
//paint the bottom right corner where the scrollbars meet
grid.Paint += (object sender, PaintEventArgs e) =>
{
DataGridView dgv = sender as DataGridView;
//get the value of dgv.HorizontalScrollBar protected property
HScrollBar hs = (HScrollBar)typeof(DataGridView).GetProperty("HorizontalScrollBar", BindingFlags.Instance | BindingFlags.NonPublic).GetValue(dgv);
if (hs.Visible)
{
//get the value of dgv.VerticalScrollBar protected property
VScrollBar vs = (VScrollBar)typeof(DataGridView).GetProperty("VerticalScrollBar", BindingFlags.Instance | BindingFlags.NonPublic).GetValue(dgv);
if (vs.Visible)
{
//only when both the scrollbars are visible, do the actual painting
Brush brush = new SolidBrush(OScolors.SurfaceDark);
var w = vs.Size.Width;
var h = hs.Size.Height;
e.Graphics.FillRectangle(brush, dgv.ClientRectangle.X + dgv.ClientRectangle.Width - w - 1,
dgv.ClientRectangle.Y + dgv.ClientRectangle.Height - h - 1, w, h);
}
}
};
grid.DefaultCellStyle.BackColor = OScolors.Surface;
grid.DefaultCellStyle.ForeColor = OScolors.TextActive;
grid.ColumnHeadersDefaultCellStyle.BackColor = OScolors.Surface;
grid.ColumnHeadersDefaultCellStyle.ForeColor = OScolors.TextActive;
grid.ColumnHeadersDefaultCellStyle.SelectionBackColor = OScolors.Surface;
grid.ColumnHeadersBorderStyle = DataGridViewHeaderBorderStyle.Single;
grid.ColumnHeadersHeight = 140;
grid.RowHeadersDefaultCellStyle.BackColor = OScolors.Surface;
grid.RowHeadersDefaultCellStyle.ForeColor = OScolors.TextActive;
grid.RowHeadersDefaultCellStyle.SelectionBackColor = OScolors.Surface;
grid.RowHeadersBorderStyle = DataGridViewHeaderBorderStyle.Single;
}
if (control is RichTextBox richText)
{
richText.BackColor = richText.Parent.BackColor;
richText.BorderStyle = BorderStyle.None;
}
if (control is FlowLayoutPanel flowLayout)
{
flowLayout.BackColor = flowLayout.Parent.BackColor;
flowLayout.BorderStyle = BorderStyle.None;
}
Debug.Print(string.Format("{0}: {1}", control.Name, control.GetType().Name));
if (control.ContextMenuStrip != null)
ThemeControl(control.ContextMenuStrip);
foreach (Control childControl in control.Controls)
{
// Recursively process its children
ThemeControl(childControl);
}
}
/// <summary>Returns Windows Color Mode for Applications.
/// <para>0=dark theme, 1=light theme</para>
/// </summary>
public static int GetWindowsColorMode(bool GetSystemColorModeInstead = false)
{
try
{
return (int)Microsoft.Win32.Registry.GetValue(
@"HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes\Personalize",
GetSystemColorModeInstead ? "SystemUsesLightTheme" : "AppsUseLightTheme",
-1);
}
catch
{
return 1;
}
}
/// <summary>Returns the Accent Color used by Windows.</summary>
/// <returns>a Color</returns>
public static Color GetWindowsAccentColor()
{
DWMCOLORIZATIONcolors colors = new DWMCOLORIZATIONcolors();
DwmGetColorizationParameters(ref colors);
//get the theme --> only if Windows 10 or newer
if (IsWindows10orGreater())
{
var color = colors.ColorizationColor;
var colorValue = long.Parse(color.ToString(), System.Globalization.NumberStyles.HexNumber);
var transparency = (colorValue >> 24) & 0xFF;
var red = (colorValue >> 16) & 0xFF;
var green = (colorValue >> 8) & 0xFF;
var blue = (colorValue >> 0) & 0xFF;
return Color.FromArgb((int)transparency, (int)red, (int)green, (int)blue);
}
else
{
return Color.CadetBlue;
}
}
/// <summary>Returns the Accent Color used by Windows.</summary>
/// <returns>an opaque Color</returns>
public static Color GetWindowsAccentOpaqueColor()
{
DWMCOLORIZATIONcolors colors = new DWMCOLORIZATIONcolors();
DwmGetColorizationParameters(ref colors);
//get the theme --> only if Windows 10 or newer
if (IsWindows10orGreater())
{
var color = colors.ColorizationColor;
var colorValue = long.Parse(color.ToString(), System.Globalization.NumberStyles.HexNumber);
var red = (colorValue >> 16) & 0xFF;
var green = (colorValue >> 8) & 0xFF;
var blue = (colorValue >> 0) & 0xFF;
return Color.FromArgb(255, (int)red, (int)green, (int)blue);
}
else
{
return Color.CadetBlue;
}
}
/// <summary>Returns Windows's System Colors for UI components following Google Material Design concepts.</summary>
/// <param name="Window">[OPTIONAL] Applies DarkMode (if set) to this Window Title and Background.</param>
/// <returns>List of Colors: Background, OnBackground, Surface, OnSurface, Primary, OnPrimary, Secondary, OnSecondary</returns>
public static OSThemeColors GetSystemColors(Form Window = null, int ColorMode = 0) //<- O: DarkMode, 1: LightMode
{
OSThemeColors _ret = new OSThemeColors();
//bool IsDarkMode = IsDarkModeCSEnabled && (GetWindowsColorMode() <= 0); //<- O: DarkMode, 1: LightMode
//if (IsDarkMode)
if (ColorMode <= 0)
{
_ret.Background = Color.FromArgb(32, 32, 32); //<- Negro Claro
_ret.BackgroundDark = Color.FromArgb(18, 18, 18);
_ret.BackgroundLight = ControlPaint.Light(_ret.Background);
_ret.Surface = Color.FromArgb(43, 43, 43); //<- Gris Oscuro
_ret.SurfaceLight = Color.FromArgb(50, 50, 50);
_ret.SurfaceDark = Color.FromArgb(29, 29, 29);
_ret.TextActive = Color.White;
_ret.TextInactive = Color.FromArgb(176, 176, 176); //<- Blanco Palido
_ret.TextInAccent = GetReadableColor(_ret.Accent);
_ret.Control = Color.FromArgb(55, 55, 55); //<- Gris Oscuro
_ret.ControlDark = ControlPaint.Dark(_ret.Control);
_ret.ControlLight = Color.FromArgb(67, 67, 67);
_ret.Primary = Color.FromArgb(3, 218, 198); //<- Verde Pastel
_ret.Secondary = Color.MediumSlateBlue; //<- Magenta Claro
}
return _ret;
}
/// <summary>Apply Round Corners to the indicated Control or Form.</summary>
/// <param name="_Control">the one who will have rounded Corners. Set BorderStyle = None.</param>
/// <param name="Radius">Radious for the Corners</param>
/// <param name="borderColor">Color for the Border</param>
/// <param name="borderSize">Size in pixels of the border line</param>
/// <param name="underlinedStyle"></param>
public static void SetRoundBorders(Control _Control, int Radius = 10, Color? borderColor = null, int borderSize = 2, bool underlinedStyle = false)
{
try
{
borderColor = borderColor ?? Color.MediumSlateBlue;
if (_Control != null)
{
_Control.GetType().GetProperty("BorderStyle")?.SetValue(_Control, BorderStyle.None);
_Control.Region = System.Drawing.Region.FromHrgn(CreateRoundRectRgn(0, 0, _Control.Width, _Control.Height, Radius, Radius));
_Control.Paint += (object sender, PaintEventArgs e) =>
{
//base.OnPaint(e);
Graphics graph = e.Graphics;
if (Radius > 1)//Rounded TextBox
{
//-Fields
var rectBorderSmooth = _Control.ClientRectangle;
var rectBorder = Rectangle.Inflate(rectBorderSmooth, -borderSize, -borderSize);
int smoothSize = borderSize > 0 ? borderSize : 1;
using (GraphicsPath pathBorderSmooth = GetFigurePath(rectBorderSmooth, Radius))
using (GraphicsPath pathBorder = GetFigurePath(rectBorder, Radius - borderSize))
using (Pen penBorderSmooth = new Pen(_Control.Parent.BackColor, smoothSize))
using (Pen penBorder = new Pen((Color)borderColor, borderSize))
{
//-Drawing
_Control.Region = new Region(pathBorderSmooth);//Set the rounded region of UserControl
if (Radius > 15) //Set the rounded region of TextBox component
{
using (GraphicsPath pathTxt = GetFigurePath(_Control.ClientRectangle, borderSize * 2))
{
_Control.Region = new Region(pathTxt);
}
}
graph.SmoothingMode = SmoothingMode.AntiAlias;
penBorder.Alignment = System.Drawing.Drawing2D.PenAlignment.Center;
//if (isFocused) penBorder.Color = borderFocusColor;
if (underlinedStyle) //Line Style
{
//Draw border smoothing
graph.DrawPath(penBorderSmooth, pathBorderSmooth);
//Draw border
graph.SmoothingMode = SmoothingMode.None;
graph.DrawLine(penBorder, 0, _Control.Height - 1, _Control.Width, _Control.Height - 1);
}
else //Normal Style
{
//Draw border smoothing
graph.DrawPath(penBorderSmooth, pathBorderSmooth);
//Draw border
graph.DrawPath(penBorder, pathBorder);
}
}
}
};
}
}
catch { throw; }
}
/// <summary>Colorea una imagen usando una Matrix de Color.</summary>
/// <param name="bmp">Imagen a Colorear</param>
/// <param name="c">Color a Utilizar</param>
public static Bitmap ChangeToColor(Bitmap bmp, Color c)
{
Bitmap bmp2 = new Bitmap(bmp.Width, bmp.Height);
using (Graphics g = Graphics.FromImage(bmp2))
{
g.InterpolationMode = InterpolationMode.HighQualityBilinear;
g.CompositingQuality = CompositingQuality.HighQuality;
g.SmoothingMode = SmoothingMode.HighQuality;
float tR = c.R / 255f;
float tG = c.G / 255f;
float tB = c.B / 255f;
System.Drawing.Imaging.ColorMatrix colorMatrix = new System.Drawing.Imaging.ColorMatrix(new float[][]
{
new float[] { 1, 0, 0, 0, 0 },
new float[] { 0, 1, 0, 0, 0 },
new float[] { 0, 0, 1, 0, 0 },
new float[] { 0, 0, 0, 1, 0 }, //<- not changing alpha
new float[] { tR, tG, tB, 0, 1 }
});
System.Drawing.Imaging.ImageAttributes attributes = new System.Drawing.Imaging.ImageAttributes();
attributes.SetColorMatrix(colorMatrix);
g.DrawImage(bmp, new Rectangle(0, 0, bmp.Width, bmp.Height),
0, 0, bmp.Width, bmp.Height, GraphicsUnit.Pixel, attributes);
}
return bmp2;
}
public static Image ChangeToColor(Image bmp, Color c) => (Image)ChangeToColor((Bitmap)bmp, c);
#endregion Public Methods
#region Private Methods
/// <summary>
/// handle hierarchical context menus (otherwise, only the root level gets themed)
/// </summary>
private void Tsdd_Opening(object sender, CancelEventArgs e)
{
ToolStripDropDown tsdd = sender as ToolStripDropDown;
if (tsdd == null) return; //should not occur
foreach (ToolStripMenuItem toolStripMenuItem in tsdd.Items.OfType<ToolStripMenuItem>())
{
toolStripMenuItem.DropDownOpening += Tsmi_DropDownOpening;
}
}
/// <summary>
/// handle hierarchical context menus (otherwise, only the root level gets themed)
/// </summary>
private void Tsmi_DropDownOpening(object sender, EventArgs e)
{
ToolStripMenuItem tsmi = sender as ToolStripMenuItem;
if (tsmi == null) return; //should not occur
if (tsmi.DropDown.Items.Count > 0) ThemeControl(tsmi.DropDown);
//once processed, remove itself to prevent multiple executions (when user leaves and reenters the sub-menu)
tsmi.DropDownOpening -= Tsmi_DropDownOpening;
}
/// <summary>Attemps to apply Window's Dark Style to the Control and all its childs.</summary>
/// <param name="control"></param>
private static void ApplySystemDarkTheme(Control control = null, bool IsDarkMode = true)
{
/*
DWMWA_USE_IMMERSIVE_DARK_MODE: https://learn.microsoft.com/en-us/windows/win32/api/dwmapi/ne-dwmapi-dwmwindowattribute
Use with DwmSetWindowAttribute. Allows the window frame for this window to be drawn in dark mode colors when the dark mode system setting is enabled.
For compatibility reasons, all windows default to light mode regardless of the system setting.
The pvAttribute parameter points to a value of type BOOL. TRUE to honor dark mode for the window, FALSE to always use light mode.
This value is supported starting with Windows 11 Build 22000.
SetWindowTheme: https://learn.microsoft.com/en-us/windows/win32/api/uxtheme/nf-uxtheme-setwindowtheme
Causes a window to use a different set of visual style information than its class normally uses. Fix for Scrollbars!
*/
int[] DarkModeOn = IsDarkMode ? new[] { 0x01 } : new[] { 0x00 }; //<- 1=True, 0=False
string Mode = IsDarkMode ? "DarkMode_Explorer" : "ClearMode_Explorer";
SetWindowTheme(control.Handle, Mode, null); //DarkMode_Explorer, ClearMode_Explorer, DarkMode_CFD, DarkMode_ItemsView,
if (DwmSetWindowAttribute(control.Handle, (int)DWMWINDOWATTRIBUTE.DWMWA_USE_IMMERSIVE_DARK_MODE_BEFORE_20H1, DarkModeOn, 4) != 0)
DwmSetWindowAttribute(control.Handle, (int)DWMWINDOWATTRIBUTE.DWMWA_USE_IMMERSIVE_DARK_MODE, DarkModeOn, 4);
foreach (Control child in control.Controls)
{
if (child.Controls.Count != 0)
ApplySystemDarkTheme(child, IsDarkMode);
}
}
private static bool IsWindows10orGreater()
{
if (WindowsVersion() >= 10)
return true;
else