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;
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.