remover entrada do windows...

var
Registro: TRegistry;
begin
try Registro.RootKey := HKEY_CURRENT_USER;
if Registro.OpenKey(´TESTE´, True) then
registro.DeleteKey(´TESTE´);
finally Registro.CloseKey; Registro.Free; end;
end;