From f86dc6fdc1f50c2a92463460c3439a41ae97a14e Mon Sep 17 00:00:00 2001 From: rich2014 Date: Wed, 6 Dec 2023 00:40:48 +0800 Subject: [PATCH] Cocoa: improve TCocoaTableListView.initWithFrame() compatibility --- lcl/interfaces/cocoa/cocoatables.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lcl/interfaces/cocoa/cocoatables.pas b/lcl/interfaces/cocoa/cocoatables.pas index 6e351066e8..c2a53a6299 100644 --- a/lcl/interfaces/cocoa/cocoatables.pas +++ b/lcl/interfaces/cocoa/cocoatables.pas @@ -557,7 +557,8 @@ end; function TCocoaTableListView.initWithFrame(frameRect: NSRect): id; begin Result:=inherited initWithFrame(frameRect); - setStyle( CocoaConfig.CocoaTableViewStyle ); + if NSAppkitVersionNumber >= NSAppKitVersionNumber11_0 then + setStyle( CocoaConfig.CocoaTableViewStyle ); end; procedure TCocoaTableListView.mouseDown(event: NSEvent);