• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

DelphiXE10文件目录/路径操作(Andorid、ios、windows)

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

Delphi XE10 文件目录/路径操作 (Andorid、ios、windows)

//获取临时文件路径(支持安卓、IOS)
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;

//引用 IOUtils.pas 文件说明
//路径类
TPath.GetTempPath; {获取临时文件夹路径} 
TPath.GetTempFileName; {获取一个临时文件名}
TPath.GetPathRoot(); {提取盘符, 如: c:\}
TPath.GetDirectoryName(); {提取路径}
TPath.GetFileName(); {提取文件名}
TPath.GetExtension(); {提取扩展名}
TPath.GetFileNameWithoutExtension(); {提取无扩展名的文件名}
TPath.ChangeExtension(); {更换扩展名}
TPath.DriveExists(); {检查路径中的驱动器是否存在}
TPath.GetFullPath(); {根据相对路径给出全路径}
TPath.HasExtension(); {判断是否有扩展名}
TPath.IsPathRooted(); {判断是否是绝对路径}
TPath.Combine(); {结合路径}
TPath.GetRandomFileName; {产生一个随机文件名}
TPath.GetGUIDFileName(); {用于产生一个唯一的文件名, 布尔参数 决定名称中是否包含 -} 
TPath.IsValidPathChar(); {判断给定的字符是否能用于路径名}
TPath.IsValidFileNameChar(); {判断给定的字符是否能用于文件名}
TPath.AltDirectorySeparatorChar; {Windows 下是 "\"}
TPath.AltDirectorySeparatorChar; {Windows 下是 "/"}
TPath.ExtensionSeparatorChar; {Windows 下是 "."}
TPath.PathSeparator; {Windows 下是 ";"}
TPath.VolumeSeparatorChar; {Windows 下是 ":"}

//目录类
TDirectory.CreateDirectory(); {建立新目录}
TDirectory.Exists(); {判断文件夹是否存在}
TDirectory.IsEmpty(); {判断文件夹是否为空}
TDirectory.Copy(); {复制文件夹}
TDirectory.Move(); {移动文件夹}
TDirectory.Delete(); {删除文件夹, 第二个参数为 True 可删除 非空文件夹} 
TDirectory.GetDirectoryRoot(); {获取目录的根盘符, 如: C:\}
TDirectory.GetCurrentDirectory; {获取当前目录}
TDirectory.SetCurrentDirectory(); {设置当前目录}
TDirectory.GetLogicalDrives; {获取驱动器列表; 下有举例}
TDirectory.GetAttributes(); {获取文件夹属性, 譬如只读、存档等; 下有举例}
TDirectory.SetAttributes(); {设置文件夹属性; 下有举例}

//文件类
TFile.Exists();//判断指定的文件是否存在
TFile.Copy();//复制文件
TFile.Move();//移动文件
TFile.Delete();//删除文件
TFile.Replace();//替换文件

  

//Andorid、ios 常用获取路径方式:

function GetPicturesPath;   //图片路径
function GetSharedPicturesPath;  
function GetCameraPath;  //相机路径
function GetSharedCameraPath;  
function GetMusicPath;    //音乐路径
function GetSharedMusicPath; 
function GetMoviesPath;  //视频
function GetSharedMoviesPath; 
function GetAlarmsPath; 
function GetSharedAlarmsPath; 
function GetDownloadsPath; //下载
function GetSharedDownloadsPath; 
function GetRingtonesPath; 
function GetSharedRingtonesPath; 

 

Andriod 测试返回示例:

GetRandomFileName:  0q136naA.5AG
GetTempFileName:  /storage/emulated/0/Android/data/****/files/tmp/tmp.AADOxuXzyW
GetTempPath:  /storage/emulated/0/Android/data/****/files/tmp
GetHomePath:  /data/user/0/*****/files
GetDocumentsPath:  /data/user/0/*****/files
GetSharedDocumentsPath:  /storage/emulated/0/Documents
GetLibraryPath:  /data/app/*****-Qxg_gUvSDZA6j6xi6bRHtQ==/lib/arm
GetCachePath:  /data/user/0/*****/cache
GetPublicPath:  /storage/emulated/0/Android/data/*****/files
GetPicturesPath:  /storage/emulated/0/Android/data/*****/files/Pictures
GetSharedPicturesPath:  /storage/emulated/0/Pictures
GetCameraPath:  /storage/emulated/0/Android/data/*****/files/DCIM
GetSharedCameraPath:  /storage/emulated/0/DCIM
GetMusicPath:  /storage/emulated/0/Android/data/*****/files/Music
GetSharedMusicPath:  /storage/emulated/0/Music
GetMoviesPath:  /storage/emulated/0/Android/data/*****/files/Movies
GetAlarmsPath:  /storage/emulated/0/Android/data/*****/files/Alarms
GetSharedAlarmsPath:  /storage/emulated/0/Alarms
GetDownloadsPath:  /storage/emulated/0/Android/data/*****/files/Download
GetSharedDownloadsPath:  /storage/emulated/0/Download
GetRingtonesPath:  /storage/emulated/0/Android/data/*****/files/Ringtones
GetSharedRingtonesPath:  /storage/emulated/0/Ringtones

 

  

创建时间:2019.07.05  更新时间:2020.06.06, 07.23

 


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
Delphi复习代码发布时间:2022-07-18
下一篇:
DELPHI7加载UNICODE编码格式的TXT显示为乱码的解决方法发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap