Acessando os contatos do telefone pelo Delphi XE5

Boa tarde, ja andei procurando e não encontrei nada que funcione de forma efetiva.
Como eu faço para abrir a tela de contatos do telefone e jogar em um edit o telefone do contato selecionado.

Agradeço desde já

Alexandre Torres