mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 17:59:36 +02:00
Qt5: fixed bug with wrong mouse offset inside TGroupBox. issue #38659
git-svn-id: trunk@64866 -
This commit is contained in:
parent
e86f37adb5
commit
09c43715cf
@ -787,7 +787,6 @@ type
|
||||
function CanPaintBackground: Boolean; override;
|
||||
function EventFilter(Sender: QObjectH; Event: QEventH): Boolean; cdecl; override;
|
||||
function getClientBounds: TRect; override;
|
||||
function getClientOffset: TPoint; override;
|
||||
function getText: WideString; override;
|
||||
procedure preferredSize(var PreferredWidth, PreferredHeight: integer;
|
||||
{%H-}WithThemeSpace: Boolean); override;
|
||||
@ -8284,15 +8283,6 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
function TQtGroupBox.getClientOffset: TPoint;
|
||||
begin
|
||||
Result:=inherited getClientOffset;
|
||||
// issue #28155
|
||||
// there's no client offset since FCentralWidget is at it's position 0,0
|
||||
if testAttribute(QtWA_Mapped) and QWidget_testAttribute(FCentralWidget, QtWA_Mapped) then
|
||||
Result := Point(0, 0);
|
||||
end;
|
||||
|
||||
function TQtGroupBox.getClientBounds: TRect;
|
||||
var
|
||||
R, R1: TRect;
|
||||
|
Loading…
Reference in New Issue
Block a user