zoukankan      html  css  js  c++  java
  • [转载]delphi2010的几个和当前路径相关的新函数

    偶然从 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:TempABC }

      {获取当前目录下文件的全路径}
      f := GetLocaleFile('X.txt');
      ShowMessage(f);                     { C:TempX.txt }
      f := GetLocaleFile('ABCX.txt');
      ShowMessage(f);                     { C:TempABCX.txt }

      {IOUtils 下的 TPath 也有类似功能}
      f := TPath.GetFullPath('X.txt');
      ShowMessage(f);                     { C:TempX.txt }
      f := TPath.GetFullPath('ABCX.txt');
      ShowMessage(f);                     { C:TempABCX.txt }

      {判断当前文件夹下的文件或子文件夹是否存在}
      b := LocaleDirectoryExists('ABC'); //这相当于: DirectoryExists(GetCurrentDir + 'ABC');
      b := LocaleFileExists('X.txt');    //这相当于: FileExists(GetCurrentDir + 'X.txt');
    end;

  • 相关阅读:
    fetch用法说明
    正则表达式贪婪与非贪婪模式
    export ,export default 和 import 区别 以及用法
    理解MVC 框架
    HTTP 请求方法介绍
    Http协议--请求报文和响应报文
    一、Web 如何工作的
    前端工程师进阶之路-总纲
    前端知识体系之CSS及其预处理器SASS/LESS
    进度条
  • 原文地址:https://www.cnblogs.com/luckForever/p/7255208.html
Copyright © 2011-2022 走看看