[argami]

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;