delphi FMX GetAppPath 获取APP路径

uses

Androidapi.JNIBridge,

Androidapi.IOUtils,

function GetAppPath: string;

begin

{$IF Defined(ANDROID)}

Result := ExtractFilePath(

ExcludeTrailingPathDelimiter(

System.IOUtils.TPath.GetHomePath));

{$ELSE}

Result := ExtractFilePath(ParamStr(0));

{$ENDIF ANDROID}

Result := IncludeTrailingPathDelimiter(Result);

end;

Memo1.Lines.Add( GetAppPath); //结果：/data/user/0/com.embarcadero.HeaderFooterApplication/

Memo1.Lines.Add( TPath.GetHomePath); //结果：/data/user/0/com.embarcadero.HeaderFooterApplication/files

推荐分享