Funçao que retorne o registro do Sistema

Boa Tarde,

Quero saber se existe alguma função em Delphi 6.0 que retorne o registro de instalação do sistema operacional que está instalado na máquina. Estou criando um módulo de validação que verifique se o sistema foi copiado para outra máquina e que não permita que o sistema roda se isso acontecer. Alguém pode me ajudar ?

Obrigado.