2011-05-07 174 views
5

是否有任何函數(在Delphi中)可以給出環境變量Path中某個路徑中文件的完整路徑和名稱,例如:環境變量路徑中的文件搜索「路徑」

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

返回例如

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

回答

5

呼叫SearchPath

+0

謝謝,都賺了!函數EnvFNS(Fn:string):string; var SPPath:字符數組[0..255]; PathPtr:PChar;如果SearchPath(nil,PChar(Fn),nil,255,SPPath,PathPtr)> 0,則結​​果:= StrPas(SPPath)else結果:= Fn; 結束; ////使用:Showmessage(EnvFNS('notepad.exe')); – 2011-05-08 01:40:15