[lazarus] CVS changes

Peter Dyson peter at skel.demon.co.uk
Wed Mar 8 21:40:58 EST 2000

> Added changes from Peter Dyson <peter at skel.demon.co.uk>
> - a new GetSysColor
> - some improvements on ExTextOut
> Known problems:
>    On the new editor the backcolor turnst into black. For some reason
>    the clWindow color isn't read.
> Marc
did you change the last line in function ColorToRGB(Color: TColor): Longint;
Result := Color and $FFFFFF;
Result := Result and $FFFFFF;

This would cause the problem you are seeing, $80000005  And $FFFFFF = 5
which is just about black and not white as $80000005  is by default


More information about the Lazarus mailing list