Criar Alias no MSSQL

Saudações,

caros Delphianos, gostaria de saber como criar um Alias de Servidor igual ao que criamos dentro do Network Utility do MS-SQL, só que via programação...

Obrigado