mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 07:09:09 +02:00
+ unicode fix
git-svn-id: branches/unicodekvm@48636 -
This commit is contained in:
parent
6cbf84eca6
commit
5d3d64b340
@ -2695,7 +2695,7 @@ PROCEDURE TMultiCheckBoxes.Draw;
|
|||||||
CONST Button = ' [ ] ';
|
CONST Button = ' [ ] ';
|
||||||
BEGIN
|
BEGIN
|
||||||
Inherited Draw;
|
Inherited Draw;
|
||||||
DrawMultiBox(Button, States^); { Draw the items }
|
DrawMultiBox(Button, States Sw_PString_DeRef); { Draw the items }
|
||||||
END;
|
END;
|
||||||
|
|
||||||
{--TMultiCheckBoxes---------------------------------------------------------}
|
{--TMultiCheckBoxes---------------------------------------------------------}
|
||||||
|
Loading…
Reference in New Issue
Block a user