几个和当前路径相关的新函数
16lz
2021-05-01
几个和当前路径相关的新函数
偶然从 SysUtils 里发现了几个路径相关的函数, 以前没见过, 可能是 2010 新增的:
GetLocaleDirectory();GetLocaleFile();LocaleDirectoryExists();LocaleFileExists();
应用测试:
uses IOUtils;procedure TForm1.FormCreate(Sender: TObject);var p,f: string; b: Boolean;begin {设置与获取当前路径} SetCurrentDir('C:\Temp\'); ShowMessage(GetCurrentDir); { C:\Temp } {获取当前目录下子目录的全路径} p := GetLocaleDirectory('ABC'); ShowMessage(p); { C:\Temp\ABC\ } {获取当前目录下文件的全路径} f := GetLocaleFile('X.txt'); ShowMessage(f); { C:\Temp\X.txt } f := GetLocaleFile('ABC\X.txt'); ShowMessage(f); { C:\Temp\ABC\X.txt } {IOUtils 下的 TPath 也有类似功能} f := TPath.GetFullPath('X.txt'); ShowMessage(f); { C:\Temp\X.txt } f := TPath.GetFullPath('ABC\X.txt'); ShowMessage(f); { C:\Temp\ABC\X.txt } {判断当前文件夹下的文件或子文件夹是否存在} b := LocaleDirectoryExists('ABC'); //这相当于: DirectoryExists(GetCurrentDir + '\ABC'); b := LocaleFileExists('X.txt'); //这相当于: FileExists(GetCurrentDir + '\X.txt');end;更多相关文章
- 使用 IXMLHTTPRequest 简单获取网页源代码
- 学用 ASP.Net 之 "字符串" (6): StringInfo 类
- 学用 ASP.Net 之 "字符串" (4): string 类的扩展方法
- 使用 idHTTP 获取 UTF-8 编码的中文网页 - 回复同学 "Delphi学习
- SkyWalking结合Logback获取全局唯一标识 trace-id 记录到日志中
- 210406 类数组 获取遍历DOM元素 向元素添加文本 获取元素的自定
- jq：初学 与 getter/setter方法
- Linux 文件目录管理——复制
- JavaScript:时间对象，实例演示右下角广告图