Fixed: Blinking of the close, maximize, minimize buttons of the form …

…when the mouse over them in Windows 7.
XusinboyBekchanov · Dec 19, 2021 · 5eaf6c1 · 5eaf6c1
1 parent 02a00e5
commit 5eaf6c1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/mff/Control.bas b/mff/Control.bas
@@ -954,7 +954,7 @@ Namespace My.Sys.Forms
 					This.Font.Parent = @This 'If This.Font Then
 					#ifdef __USE_WINAPI__
 						SendMessage FHandle, CM_CREATE, 0, 0
-						If ShowHint Then AllocateHint
+						If ShowHint AndAlso Hint <> "" Then AllocateHint
 					#endif
 					If FParent Then
 						FAnchoredParentWidth = Cast(Control Ptr, FParent)->Width