Delphi linux数据库路径

Question

我正在使用WebBroker为我正在做的项目编写一些API。我添加了一个DataModule，它包含一个TFDConnection，以便我可以连接到sqlite数据库。我在Windows下有一个项目（就像测试一样），它将数据库保存在D:\上。

在Linux上，我打电话给TPath.GetHomePath，但我不认为这是一个不错的选择。有没有办法将数据库放在与Linux项目相同的文件夹中？

procedure TDataModule1.fdConnectionBeforeConnect(Sender: TObject);
begin

 if isLinux then
  begin
   fdConnection.Params.Values['Database'] := TPath.Combine(TPath.GetHomePath, 'mydatabase.sqlite');
  end;

end;

procedure TDataModule1.fdConnectionAfterConnect(Sender: TObject);
const
  sCreateTableSQL = 'CREATE TABLE IF NOT EXISTS ...';
begin

  if isLinux then
   fdConnection.ExecSQL(sCreateTableSQL);

end;

function TDataModule1.isLinux: boolean;
begin
 Result := (TOSVersion.Platform = pfLinux);
end;

我打算在linux上运行一个apache webbroker模块。我希望数据库与linux可执行文件位于同一文件夹中，我该怎么办？我看到TPath有GetHomePath可以在Linux上运行，但其他功能都不受支持。