Delphi常用应用函数.docVIP

Delphi常用应用函数 得到WINDOWS的SYSTEM路径: 方法: var MySysPath : PCHAR ; begin GetMem; GetSystemDirectory; end; 注:MySysPath为SYSTEM路径 得到程序的路径 ExtractFileDir; 察看文件是否存在 FileExists:Boolean; 改变文件扩展名 ChangeFileExt 得到文件的扩展名 ExtractFileExt:String; 如何取得Windows的临时文件目录? 适合版本:Delphi 3,, Windows 95 NT都指定了放置临时文件的目录，然而，用户能改变临时目录的位置而不使用缺省的目录。这篇文章的目的是告诉你如何得到Windows 95 NT当前的临时目录位置。这个Windows API函数 GetTempPath就是解决这个问题的。其函数原形为: DWORD GetTempPath; 下面的例子示范如何使用： function GetTempDirectory: String; var TempDir: array[0..255]