Bloquear Dispositivo USB

Oi, pessoal.
Fiz uma pesquisa a procura de um código que permitisse que eu bloqueie os dispositivos USB de armazenamento pelo Delphi.
Achei um do nosso colega João Paulo mas, infelizmente esse código não funciona no Windows 7.
No código é feita uma modificação no registro do valor de uma chave.
Penso que seja pelo fato das permissões para gravar no registro que não está dando certo.

Existe alguma maneira de eu internamente através de código dar permissão ao meu programa para gravar no registro?

Desde já agradeço a atenção e ajuda de todos.

Obrigado.