mirror of
https://github.com/QB64Official/qb64.git
synced 2024-09-28 11:17:47 +00:00
Fix alignment issues in listbox controls
This commit is contained in:
parent
88505bea87
commit
6e385df280
1 changed files with 2 additions and 1 deletions
|
@ -10894,7 +10894,7 @@ SUB idedrawobj (o AS idedbotype, f)
|
||||||
'skip
|
'skip
|
||||||
ELSE
|
ELSE
|
||||||
IF y <= o.h THEN
|
IF y <= o.h THEN
|
||||||
a3$ = " " + a3$
|
a3$ = " " + RTRIM$(a3$)
|
||||||
IF o.sel = n THEN
|
IF o.sel = n THEN
|
||||||
COLOR 7, 0
|
COLOR 7, 0
|
||||||
o.selY = o.par.y + o.y + y
|
o.selY = o.par.y + o.y + y
|
||||||
|
@ -10948,6 +10948,7 @@ SUB idedrawobj (o AS idedbotype, f)
|
||||||
PRINT LEFT$(a3$, 3);
|
PRINT LEFT$(a3$, 3);
|
||||||
IF o.sel = n THEN COLOR 7, 0 ELSE COLOR 0, 7
|
IF o.sel = n THEN COLOR 7, 0 ELSE COLOR 0, 7
|
||||||
character = 3
|
character = 3
|
||||||
|
cf = cf + 3
|
||||||
_CONTINUE
|
_CONTINUE
|
||||||
END IF
|
END IF
|
||||||
PRINT MID$(a3$, character, 1);
|
PRINT MID$(a3$, character, 1);
|
||||||
|
|
Loading…
Reference in a new issue