1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-20 09:04:43 +00:00

Fix alignment issues in listbox controls

This commit is contained in:
Fellippe Heitor 2022-03-10 13:04:36 -03:00
parent 88505bea87
commit 6e385df280

View file

@ -10894,7 +10894,7 @@ SUB idedrawobj (o AS idedbotype, f)
'skip
ELSE
IF y <= o.h THEN
a3$ = " " + a3$
a3$ = " " + RTRIM$(a3$)
IF o.sel = n THEN
COLOR 7, 0
o.selY = o.par.y + o.y + y
@ -10948,6 +10948,7 @@ SUB idedrawobj (o AS idedbotype, f)
PRINT LEFT$(a3$, 3);
IF o.sel = n THEN COLOR 7, 0 ELSE COLOR 0, 7
character = 3
cf = cf + 3
_CONTINUE
END IF
PRINT MID$(a3$, character, 1);