Você pode utilizar funções de string para obter o nome do servidor.
Abaixo segue um exemplo, espero q te ajude.
function ReturnServer: string;
const
conexao = 'micro01:teste';
begin
Result := Copy(conexao, 1, pos(':', conexao)-1);
end;
Abraços,
Renato