mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-29 21:10:42 +02:00
Qt: do not paint background of widgets whos FHasPaint=False and LCLObject.Color = clDefault.
git-svn-id: trunk@25576 -
This commit is contained in:
parent
ffca852a3e
commit
c266e136cf
@ -2006,7 +2006,7 @@ begin
|
||||
QEventContentsRectChange: LCLObject.DoAdjustClientRectChange(False);
|
||||
QEventPaint:
|
||||
begin
|
||||
if canPaintBackground then
|
||||
if canPaintBackground and (LCLObject.Color <> clDefault) then
|
||||
SlotPaintBg(Sender, Event);
|
||||
if FHasPaint then
|
||||
SlotPaint(Sender, Event);
|
||||
|
Loading…
Reference in New Issue
Block a user