From fa63f1feef40be6455848a7e605737b0caed5a62 Mon Sep 17 00:00:00 2001 From: FellippeHeitor Date: Thu, 21 Apr 2016 18:10:56 -0300 Subject: [PATCH] Color dialog: allow an empty field while editing RGB values. --- source/ide/ide_methods.bas | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas index 04e7d363a..7727a1d90 100644 --- a/source/ide/ide_methods.bas +++ b/source/ide/ide_methods.bas @@ -10555,14 +10555,17 @@ DO 'main loop END IF END IF + ChangedWithKeys = 0 IF K$ = CHR$(0) + CHR$(72) AND (focus = 2 OR focus = 3 OR focus = 4) THEN 'Up idetxt(o(focus).txt) = str2$(VAL(idetxt(o(focus).txt)) + 1) o(focus).issel = -1: o(focus).sx1 = 0: o(focus).v1 = LEN(idetxt(o(focus).txt)) + ChangedWithKeys = -1 END IF IF K$ = CHR$(0) + CHR$(80) AND (focus = 2 OR focus = 3 OR focus = 4) THEN 'Down idetxt(o(focus).txt) = str2$(VAL(idetxt(o(focus).txt)) - 1) o(focus).issel = -1: o(focus).sx1 = 0: o(focus).v1 = LEN(idetxt(o(focus).txt)) + ChangedWithKeys = -1 END IF IF SelectedITEM <> o(1).sel AND o(1).sel > 0 THEN @@ -10607,7 +10610,7 @@ DO 'main loop IF a > 255 THEN a$ = "255" IF a < 0 THEN a$ = "0" ELSE - a$ = "0" + IF ChangedWithKeys = -1 THEN a$ = "0" END IF idetxt(o(checkRGB).txt) = a$ NEXT checkRGB