本文整理自网络,侵删。
function GeFileName(const AFileName: string): string;begin{$IFDEF ANDROID} Result := TPath.GetTempPath + '/' + AFileName;{$ELSE} {$IFDEF IOS} Result := TPath.GetHomePath + '/Documents/' + AFileName; {$ELSE} Result := AFileName; {$ENDIF}{$ENDIF}end;
相关阅读 >>
Delphi xe8 numberbox使用方法及存在的问题
Delphi d10.x 并行库ppl编程之 tparallel.for
Delphi用多媒体库 bass.dll 播放 mp3 - 打开、播放、暂停、停止
Delphi sysutils.comparetext的注释
Delphi 用cxgrid把数据导出到excel时乱码的解决办法
更多相关阅读请进入《Delphi》频道 >>