mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-15 20:19:24 +02:00
LCL: WinCE: fix function "LCLBoundsToWin32Bounds()" signature introduced by rev. 61112. Bug #36848
git-svn-id: trunk@62817 -
This commit is contained in:
parent
707c0d5894
commit
864df52f4a
@ -867,8 +867,7 @@ begin
|
|||||||
Result:=GetLCLClientBoundsOffset(OwnerObject, Rect);
|
Result:=GetLCLClientBoundsOffset(OwnerObject, Rect);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure LCLBoundsToWin32Bounds(Sender: TObject;
|
procedure LCLBoundsToWin32Bounds(Sender: TObject; var Left, Top: Integer);
|
||||||
var Left, Top, Width, Height: Integer);
|
|
||||||
var
|
var
|
||||||
ORect: TRect;
|
ORect: TRect;
|
||||||
Begin
|
Begin
|
||||||
|
Loading…
Reference in New Issue
Block a user