mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-03 22:00:25 +02:00
gtk interface: made Rectangle winapi compatible (bug #8342)
git-svn-id: trunk@10782 -
This commit is contained in:
parent
14b348460c
commit
27409f3080
@ -7416,6 +7416,9 @@ begin
|
||||
end
|
||||
else begin
|
||||
CalculateLeftTopWidthHeight(X1,Y1,X2,Y2,Left,Top,Width,Height);
|
||||
// X2, Y2 is not part of the rectangle
|
||||
dec(Width);
|
||||
dec(Height);
|
||||
// first draw interior in brush color
|
||||
SelectGDKBrushProps(DC);
|
||||
DCOrigin:=GetDCOffset(TDeviceContext(DC));
|
||||
|
Loading…
Reference in New Issue
Block a user