pegar todas as subchaves de uma chave do registro do windows

pessoal, como posso pegar todas as subchaves que estão dentro de uma chave do registro do windows? desejo armazenar numa variavel TstringList.