mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-02 03:50:36 +00:00
Fixes RGB mixer not inserting the result properly.
This commit is contained in:
parent
f7cd2b2ede
commit
65beb28033
|
@ -3565,7 +3565,14 @@ FUNCTION ide2 (ignore)
|
||||||
retval$ = idergbmixer$(-1)
|
retval$ = idergbmixer$(-1)
|
||||||
END IF
|
END IF
|
||||||
END IF
|
END IF
|
||||||
IF LEN(retval$) THEN insertAtCursor retval$
|
IF LEN(retval$) THEN
|
||||||
|
'the mixer dialog could not insert the value, so let's do it here
|
||||||
|
IF EnteringRGB THEN
|
||||||
|
insertAtCursor MID$(retval$, INSTR(retval$, "(") + 1)
|
||||||
|
ELSE
|
||||||
|
insertAtCursor retval$
|
||||||
|
END IF
|
||||||
|
END IF
|
||||||
GOTO specialchar
|
GOTO specialchar
|
||||||
ELSE
|
ELSE
|
||||||
ideselect = 0
|
ideselect = 0
|
||||||
|
@ -11919,11 +11926,6 @@ FUNCTION idergbmixer$ (editing)
|
||||||
FindBracket1 = INSTR(Found_RGB, a$, "(")
|
FindBracket1 = INSTR(Found_RGB, a$, "(")
|
||||||
FindBracket2 = INSTR(FindBracket1, a$, ")")
|
FindBracket2 = INSTR(FindBracket1, a$, ")")
|
||||||
IF FindBracket1 > 0 AND FindBracket2 > 0 THEN
|
IF FindBracket1 > 0 AND FindBracket2 > 0 THEN
|
||||||
''Check the number of commas in the brackets.
|
|
||||||
''2 or 3 are accepted.
|
|
||||||
'RGBArgs$ = MID$(a$, FindBracket1 + 1, FindBracket2 - FindBracket1 - 1)
|
|
||||||
'TotalCommas = CountItems(RGBArgs$, ",")
|
|
||||||
'IF TotalCommas = 2 OR TotalCommas = 3 THEN All_RGB$ = All_RGB$ + MKI$(Found_RGB)
|
|
||||||
All_RGB$ = All_RGB$ + MKI$(Found_RGB)
|
All_RGB$ = All_RGB$ + MKI$(Found_RGB)
|
||||||
END IF
|
END IF
|
||||||
LOOP
|
LOOP
|
||||||
|
|
Loading…
Reference in a new issue