MSSQL 2005 Servernamen ermitteln

[Centrii]

vielen Dank Phoenix, ich hab das mal soweit umgesetzt, leider habe ich noch ein Problemchen

Delphi-Quellcode:

var DMOSQL2, Instanzen: OLEVariant;
    i : Integer;
    Instanz: String;
begin
  DMOSQL2:= CreateOleObject('SQLDMO.SQLServer2');
  Instanzen := DMOSQL2.ListInstalledInstances('TBE87');  //mein PCName
  for i:=0 to Instanzen.count do begin
    Instanz := Instanzen.Item[i];
  end;
end;

Ich bekomme keine Instanzen zurück, obwohl ich zwei habe ?