Hi,
nachdem ich folgende Änderungen durch geführt hatte lief es auch, so wie zu erwarten.
Delphi-Quellcode:
...
private
m_Locator : ISWbemLocator;
...
procedure TFrmWMITest.FormCreate(Sender: TObject);
begin
...
m_Locator := CoSWbemLocator.Create;
end;
Die entsprechenden Aufrufe müssen auch noch angepasst werden.
Delphi-Quellcode:
...
m_WMIServices := m_Locator.ConnectServer...
Warum das ganze, die Komponente 'SWbemLocator' wurde nicht gefunden.
Gruß