From e3a64850efbd932aa03f005979dd9f48fead56cf Mon Sep 17 00:00:00 2001
From: dmkwketx <dmkwketx@gmail.com>
Date: Mon, 12 May 2025 21:14:21 +0300
Subject: [PATCH] Update GraphWPF.pas (#3270)
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

если title больше одной строки, показывалась только последняя. теперь все строки будут показаны.
---
 bin/Lib/GraphWPF.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/bin/Lib/GraphWPF.pas b/bin/Lib/GraphWPF.pas
index 64d67f355..e6c07f918 100644
--- a/bin/Lib/GraphWPF.pas
+++ b/bin/Lib/GraphWPF.pas
@@ -1786,6 +1786,8 @@ type
       if real.IsNaN(YTicks) then
         YTicks := Ticks(max-min);
       var th := TextHeightP('0');
+      if title<>'' then 
+        th := TextHeightP(title);
       var tw := GetRY0.Step(YTicks).TakeWhile(ry -> ry <= max).Select(y -> TextWidthP(y.Round(YTicksPrecision).ToString)).Max;
       var dd := TextWidthP(b.Round(xTicksPrecision).ToString)/2;
 
@@ -2556,4 +2558,4 @@ initialization
   __InitModule;
 
 finalization  
-end. 
\ No newline at end of file
+end.