From 20445109d517367b1eece3a76f5f1b12f1128ba2 Mon Sep 17 00:00:00 2001 From: Martin Date: Thu, 15 Aug 2024 23:52:12 +0200 Subject: [PATCH] LazControl: LazIntegerEdit, result not set --- components/lazcontrols/laznumedit.pas | 2 ++ 1 file changed, 2 insertions(+) diff --git a/components/lazcontrols/laznumedit.pas b/components/lazcontrols/laznumedit.pas index ee54a5d4f1..720ecd2546 100644 --- a/components/lazcontrols/laznumedit.pas +++ b/components/lazcontrols/laznumedit.pas @@ -411,6 +411,7 @@ var s: String; n: Boolean; begin + Result := True; APrefix := ''; AVal := 0; s := RealGetText; @@ -433,6 +434,7 @@ begin AVal := -AVal; {$POP} except + Result := False; if n then AVal := Min_Limit else