如何获取Lazarus中的项目源文件夹？（组件编辑器）

Question

我了解编译后的软件无法访问源代码。然而，这个问题是针对 ComponentEditor 的。

在 LCL 和 Linux 下创建自定义组件，我现在正在创建编辑器，它需要访问项目的源文件夹来生成/管理元数据文件并将它们添加到资源（*.rc）中。

在 Embarcadero-Delphi 下，我可以使用

GetActiveProject.fileName

单元中的

ToolsAPI

来完成此操作。

在自定义组件编辑器中获取项目源目录相当于

GetActiveProject.fileName

的跨平台LCL是什么？

德尔福示例：

ProjectDir := ExtractFilePath( GetActiveProject.fileName );

Answer 1

如https://www.freepascal.org/~michael/articles/lazide1/lazide1.pdf所解释，Open Tools API的等效项是Lazarus IDE接口。

如何获取Lazarus中的项目源文件夹？ （组件编辑器）