本文整理自网络,侵删。
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 xe firemonkey的stylebook皮肤控件的使用
Delphi xe5 json与Delphi object的互换
Delphi httpclient async异步获取网页代码
Delphi tdirectory.tfilterpredicate
更多相关阅读请进入《Delphi》频道 >>