在环境变量“Path”的路径中搜索文件

【问题标题】：File search in paths of environment variable "Path"在环境变量“Path”的路径中搜索文件
【发布时间】：2011-08-20 22:50:58
【问题描述】：

是否有任何函数（在Delphi中）可以给出环境变量Path中路径之一中的文件的完整路径和名称，例如：

Fn: = FindFileEnv ('my.dll', EnvPath);

例如返回

Fn = 'c:\windows\system32\my.dll'

【问题讨论】：

标签： delphi

【解决方案1】：

致电SearchPath。

【讨论】：

谢谢，赚到了！函数EnvFNS（Fn：字符串）：字符串； var SPPath: array[0..255] of char;路径指针：PChar；开始 if SearchPath(nil, PChar(Fn), nil, 255, SPPath, PathPtr)>0 then Result := StrPas(SPPath) else Result := Fn;结尾; //// 使用：Showmessage(EnvFNS('notepad.exe'));