Para obtener el listado de todos los servidores de MS SQL, registrados en tu network, debes utilizar el procedimiento almacenado sp_helpserver.
Si utilizas un componente TADOQuery y en la sentencia escribes:
exec sp_helpserver
podrás obtener el listado de los servidores MS SQL y de los LINKED SERVERS. Acá está un ejemplo de como sacar de este componente el listado.
Código Delphi
[-]
TForm1.Button1Click(Sender: TObject);
var
cad : string;
begin
ADOQuery1.Open;
ADOQuery1.First;
while not ADOQuery1.Eof do
begin
cad := cad + ADOQuery1.Fields[0].AsString + #13#10;
ADOQuery1.Next;
end;
ShowMessage(cad);
end;