GetCurrentDir on MacOS

[Grahame Grieve]

If I set the working directory to {folder} in the Run Parameters dialog, shouldn't that {folder} be what I get back from SysUtils.GetCurrentDir ?

Because GetCurrentDir is returning / not the folder I set. Is that expected?

Details:
* Mac M1 Max / Monterey 12.5
* Lazarus 2.2.5 (rev lazarus_2_2_4-3-g564e1e8244) FPC 3.2.2 aarch64-darwin-cocoa

[Jonas Maebe]

The system always forces the working directory of GUI applications to the root directory, probably to discourage you from trying to use it. You cannot/must not rely on it on macOS for GUI applications.

[Grahame Grieve]

oh. thanks. Where is that documented? Should the dialog box disable the working directory in that case?

[Jonas Maebe]

oh. thanks. Where is that documented?

It's more that Apple doesn't mention using the working directory as a correct way to access any files: https://developer.apple.com/library/archive/documentation/FileManagement/Conceptual/FileSystemProgrammingGuide/AccessingFilesandDirectories/AccessingFilesandDirectories.html

Should the dialog box disable the working directory in that case?

It should still work fine for command line programs.

[Grahame Grieve]

Lazarus can know which is which, right?

[Jonas Maebe]

I don't know if it keeps track of that in the project file. There's also nothing preventing you from creating a GUI application using the template of a command line application (with or without the LCL).

[fredb]

This code to use application file path :

Code: Pascal  [Select][+][-]

1.   LocalDir := ExtractFilePath(Application.ExeName) + DirectorySeparator;
2.   {$IFDEF DARWIN}
3.   LocalDir := LeftStr(LocalDir, Pos('application_name.app', LocalDir)-1) + DirectorySeparator;
4.   {$ENDIF}
5.  

Replace 'application_name.app' by your own application name.

[madref]

this works too:

Code: Pascal  [Select][+][-]

1. ProgramDir := LeftStr (ExtractFilePath(Application.ExeName), Length(ExtractFilePath(Application.ExeName))-15);