From ab3881a4d452ff4c2bac3ff1bf2b752d43e7c8e8 Mon Sep 17 00:00:00 2001 From: Xusinboy Bekchanov Date: Sun, 5 May 2024 18:28:09 +0500 Subject: [PATCH] Update Panel.bas --- mff/Panel.bas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mff/Panel.bas b/mff/Panel.bas index d524dad..34c09d5 100644 --- a/mff/Panel.bas +++ b/mff/Panel.bas @@ -193,7 +193,7 @@ Namespace My.Sys.Forms End With End If If ShowCaption Then - Canvas.Font.Size = Canvas.Font.Size + SelectObject(Canvas.Handle, Canvas.Font.Handle) Canvas.TextOut(Current.X, Current.Y, FText, Font.Color, FBackColor) End If If OnPaint Then OnPaint(*Designer, This, Canvas)