paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-06 17:00:38 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix: Cocoa: AView released at last in EmbedInScrollView()

Browse Source
This commit is contained in:
rich2014 2023-05-13 20:41:45 +08:00
parent 03b575fd76
commit de14a094f5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/cocoa/cocoawscommon.pas
View File

@ -269,12 +269,12 @@ begin
{$endif}
Result.setDocumentView(AView);
Result.setDrawsBackground(false); // everything is covered anyway
if AReleaseView then AView.release;
{$ifdef BOOLFIX}
AView.setHidden_(Ord(false));
{$else}
AView.setHidden(false);
{$endif}
if AReleaseView then AView.release;
SetViewDefaults(Result);
end;