2011-05-07 13 views
5

¿Hay alguna función (en Delphi) que pueda dar la ruta completa y el nombre de un archivo que está en una de las rutas de la variable de entorno Ruta, por ejemplo:Búsqueda de archivos en rutas de entorno variable "Ruta"

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

que devuelve por ejemplo

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

Respuesta

5

llamada SearchPath.

+0

¡Gracias, se lo han ganado! Función EnvFNS (Fn: cadena): cadena; var SPPath: array [0..255] de char; PathPtr: PChar; begin if SearchPath (nil, PChar (Fn), nil, 255, SPPath, PathPtr)> 0 entonces Resultado: = StrPas (SPPath) else Resultado: = Fn; final; //// Uso: Showmessage (EnvFNS ('notepad.exe')); –

Cuestiones relacionadas