TSHFileInfo, se ha de liberar?
 

Hola, en mi programa utilizo en varias funciones el tipo TSHFileInfo para obtener las propiedades de archivos que listo en un ListView en modo virtual. Cuando uso estas funciones el programa aumenta el uso de RAM aunque muestre el mismo directorio. En mis funciones no libero (no se si se ha de/puede hacer). Una función de ejemplo:

Código Delphi [-]
 function GetLocalImageIndex(lFileName: String): Integer;
 var
     ShFileInfo: TSHFileInfo;    
 begin
     ShGetFileInfo(PAnsiChar(lFileName),0,ShFileInfo,SizeOf(ShFileInfo),
                 SHGFI_SYSICONINDEX);
   Result := ShFileInfo.iIcon;
 end;

Espero impaciente vuestra contestación.

Muchas gracias de antemano, [Gunman].

ShFileInfo es una variable local y la memoria que se le asigne se liberará automáticamente al momento de salir del procedimiento. Así que no, no tienes ni debes liberarla.

// Saludos

Muchas gracias pero que explicacion le das al aumento de memória?

Para rastrear fugas de memoria podrías usar algo como MemProof.

// Saludos

Gracias por el programilla roman, pero... como se utiliza? es decir, cómo/dónde puedo ver si mi programa pierde memória o no?