[lazarus] Delphi and FPC compatible LCL version
marc at dommelstein.net
Sun Nov 16 11:55:03 EST 2003
At 22:44 15-11-2003, Andreas Hausladen wrote:
>One last bug fix because it is not that easy to find.
>Function TWin32Object.IntSendMessage3(LM_Message: Integer; Sender:
>TObject; Data: Pointer): Integer;
> Procedure DrawOwnerButton;
> DrawText(_HDC, LPSTR(TBitBtn(Sender).Caption),
> -1, rcItem, TextPosFlags);
>** DeleteObject(BitmapHandle); <--- this line must be removed
There was possibly more wrong here. In the new DC, the bitmap wasn't
deselected before destroying the DC.
It's not documented if this is allowed, but to be on the safe side,
deselecting (== selecting the old object) does no harm.
More information about the Lazarus