File tree Expand file tree Collapse file tree 1 file changed +6
-3
lines changed Expand file tree Collapse file tree 1 file changed +6
-3
lines changed Original file line number Diff line number Diff line change @@ -153,7 +153,7 @@ TPythonVersionProp = record
153153 (DllName: ' libpython3.9.dylib' ; RegVersion: ' 3.9' ; APIVersion: 1013 ),
154154 (DllName: ' libpython3.10.dylib' ; RegVersion: ' 3.10' ; APIVersion: 1013 )
155155 );
156- { $endif }
156+ { $ENDIF }
157157
158158 COMPILED_FOR_PYTHON_VERSION_INDEX = High(PYTHON_KNOWN_VERSIONS);
159159
@@ -2954,11 +2954,14 @@ function TDynamicDll.GetDllPath : string;
29542954begin
29552955 Result := DllPath;
29562956
2957- { $IFDEF MSWINDOWS}
29582957 if DLLPath = ' ' then begin
2958+ { $IFDEF MSWINDOWS}
29592959 IsPythonVersionRegistered(RegVersion, Result, AllUserInstall);
2960+ { $ENDIF}
2961+ { $IFDEF DARWIN}
2962+ Result := ' /Library/Frameworks/Python.framework/Versions/' + RegVersion + ' /lib/' ;
2963+ { $ENDIF}
29602964 end ;
2961- { $ENDIF}
29622965
29632966 if Result <> ' ' then
29642967 begin
You can’t perform that action at this time.
0 commit comments