From 9671aec7fe9cc662033509ffe288fac9652f333f Mon Sep 17 00:00:00 2001
From: FellippeHeitor <fellippeheitor@gmail.com>
Date: Wed, 5 Sep 2018 23:14:07 -0300
Subject: [PATCH] Shows message when an invalid value is returned.

---
 InForm/UiEditor.bas | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/InForm/UiEditor.bas b/InForm/UiEditor.bas
index 5fff58f..95e5ba2 100644
--- a/InForm/UiEditor.bas
+++ b/InForm/UiEditor.bas
@@ -1782,6 +1782,17 @@ SUB __UI_BeforeUpdateDisplay
         Control(ContextMenuControlsList).Value = 1
     END IF
 
+    STATIC ShowInvalidValueWarning AS _BYTE
+    IF Control(__UI_Focus).BorderColor = ShadeOfRed THEN
+        IF ShowInvalidValueWarning = False THEN
+            ShowInvalidValueWarning = True
+            Caption(StatusBar) = "Invalid value; ESC for previous or adjusted value"
+            BlinkStatusBar = TIMER
+        END IF
+    ELSE
+        ShowInvalidValueWarning = False
+    END IF
+
     'Disable properties that don't apply
     Control(AlignOptions).Disabled = True
     Control(BooleanOptions).Disabled = True