mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-10-02 23:00:28 +02:00
LCL/Win32: Fixed Notebook.GetTabRect
git-svn-id: trunk@25336 -
This commit is contained in:
parent
dc88662419
commit
b5059ab9c6
@ -627,7 +627,7 @@ begin
|
||||
Result.Top := Result.Top - Orect.Top;
|
||||
Result.Bottom := Result.Bottom - Orect.Top;
|
||||
Result.Left := Result.Left - Orect.Left;
|
||||
Result.Right := Result.Right - Orect.Right;
|
||||
Result.Right := Result.Right - Orect.Left;
|
||||
end
|
||||
else
|
||||
Result := inherited GetTabRect(ANotebook, AIndex);
|
||||
|
Loading…
Reference in New Issue
Block a user