problema con EnumWindows
 

Hola a todos. Estoy utilizando uno de los trucos de Trucomanía para obtener una lista de los programas en ejecución(el truco [287]).He visto ya muchos hilos que lo citan así que no creo que sea necesario ponerlo entero. Al intentar compilar me da un error con el mensaje 'Variable required' en la línea que llama a la función EnumWindows:

Código Delphi [-]
 
 function TFImportar.EstaEjecutandose(EXE:String):Boolean;
 var
   i: Integer;
 begin
   i:=0;
   ListaExes := TStringList.Create;
  //me situa el cursor en el 0
   EnumWindows(@ObtieneVentanas,0);
 ....

He probado todo tipo de conversiones de enteros, ya que ese parametro es un entero.Extraído de la ayuda(Specifies a 32-bit, application-defined value to be passed to the callback function). También probe a pasarle otros valores distintos de 0 como:

Código Delphi [-]
 EnumWindows(@ObtieneVentanas,Int(@EXE));
 EnumWindows(@ObtieneVentanas,LongInt(@EXE));

Pero siempre da el mismo error. También tengo añadida en las uses la TLHelp32. Uso delphi 5 bajo windows 2000. Espero me ayudeis es urgente. Gracias por adelantado.

has probado pasarle una variable en vez de una constante es decir

Código Delphi [-]
var Prog :Integer;
begin
  Prog := 0;
  EnumWindows(@ObtieneVentanas,Prog);
end;

esta bien
 

yo lo copie de trucomania y tal y como lo p[use quedo pon todo tu codigo quizas desde unit.... hasta el final