WMI y errores que cuelgan toda la aplicación

[elrayo76]

Buenas, perdón por la demora en responder pero estuve de viaje estos dos últimos días por trabajo.


Neftalí, esto es lo que hago para conectar con WMI.

Código Delphi [-]
var
  objLocator:  ISWbemLocator;

begin
  FConnected := False;
  objLocator := CoSWbemLocator.Create;

  try
      // Hace la conexión del WMI con 'root\cimv2'.
      FServices := objLocator.ConnectServer(FHost, GetRoot, FUser, FPassword, '', '', 0, nil);
  except
    on e: Exception do  
      MessageError(SysErrorMessage(GetLastError));
  end;

El tema es que si le doy pausa o lo detengo al servicio no llega nunca al error. Se queda colgado en donde se carga la variable FService


¿Tendrá algo que ver la forma en que llamo a la clase CoSWbemLocator? igual veo que es como lo haces tú en las GLibWMI.


Como ya comente antes, en algunos otros foros preguntan por este mismo problema y ninguno puede dar una solución al respecto. Por eso mismo es que pienso que hay que ver por otro lado si el servicio esta corriendo antes de intentar la conexión.



Saludos,
El Rayo