TatukGIS - GisDefs - ChangeDir 函数
函数名称 ChangeDir
所在单元 GisDefs
函数原型 function ChangeDir(const _path: String): String;
函数说明
如果 _path 是一个有效的全路径,返回 _path 所在的路径,并将该路径设为当前路径.
如果 _path 是一个无效的(文件不存在或者是一个URL),返回空字符串,并且保持现有路径不变.
总之,返回前一个文件所在路径或空字符串.
举例说明
// 假设你的程序在 D:\ 执行, 存在 C:\install.txt 这个文件
Self.Caption := ChangeDir('c:\install.txt'); // 返回 值 = 'D:\' ,并把当前路径设置为 'C:\'
Self.Caption := ChangeDir('c:\install.txt'); // 第2次执行; 返回值 = 'C:\' ,并把当前路径设置为 'C:\'
Self.Caption := ChangeDir('c:\不存在的文件.txt'); // 第3次执行; 返回值 = '' ,当前路径不改变,还是 'C:\'