mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-12 03:56:12 +02:00
cocoa: invalidating designer overlay view together with content view. Due to forceful use of layers in macOS10.14. Adding a memo (or any scrolling control) would introduce extra layers causing visual issues. In this case overlay (as always staying on top - and receiving its own layer) must be explicitly refreshed, if window content if affected. #35165
git-svn-id: trunk@61319 -
This commit is contained in:
parent
c2480c6563
commit
fa41c05360
@ -222,6 +222,8 @@ type
|
|||||||
// NSDraggingDestinationCategory
|
// NSDraggingDestinationCategory
|
||||||
function draggingEntered(sender: NSDraggingInfoProtocol): NSDragOperation; override;
|
function draggingEntered(sender: NSDraggingInfoProtocol): NSDragOperation; override;
|
||||||
function performDragOperation(sender: NSDraggingInfoProtocol): LCLObjCBoolean; override;
|
function performDragOperation(sender: NSDraggingInfoProtocol): LCLObjCBoolean; override;
|
||||||
|
procedure setNeedsDisplay_(aflag: boolean); override;
|
||||||
|
procedure setNeedsDisplayInRect(arect: NSRect); override;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function NSEventRawKeyChar(ev: NSEvent): System.WideChar;
|
function NSEventRawKeyChar(ev: NSEvent): System.WideChar;
|
||||||
@ -1090,6 +1092,18 @@ begin
|
|||||||
Result := True;
|
Result := True;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
procedure TCocoaWindowContent.setNeedsDisplay_(aflag: boolean);
|
||||||
|
begin
|
||||||
|
inherited setNeedsDisplay;
|
||||||
|
if Assigned(overlay) then overlay.setNeedsDisplay_(aflag);
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TCocoaWindowContent.setNeedsDisplayInRect(arect: NSRect);
|
||||||
|
begin
|
||||||
|
inherited setNeedsDisplayInRect(arect);
|
||||||
|
if Assigned(overlay) then overlay.setNeedsDisplayInRect(arect);
|
||||||
|
end;
|
||||||
|
|
||||||
function TCocoaWindow.makeFirstResponder(r: NSResponder): LCLObjCBoolean;
|
function TCocoaWindow.makeFirstResponder(r: NSResponder): LCLObjCBoolean;
|
||||||
var
|
var
|
||||||
cbnew: ICommonCallback;
|
cbnew: ICommonCallback;
|
||||||
|
Loading…
Reference in New Issue
Block a user