Recorrer el registro de windows como una estructura de directorios

[ElDuc]

Hola Señores,

dec he podido descargar los archivos y tu EXE va de coña, pero sigo teniendo problemas para abrir las fuentes.

Después de los errores que ya comenté, cuando lo consigo abrir y lo intento compilar me dice que "ContainsStr" y "ContainsText" no están definidos.

Para poder saber si es sólo esto lo que no me funciona he creado un nuevo proyecto y he añadido esta unidad incorporándole estas funciones vacias:

Código Delphi [-]
Function ContainsStr(AValue, AQuery:String):Boolean;
Begin
//
End;

Function ContainsText(AValue, AQuery:String):Boolean;
Begin
//
End;

Y me compila perfectamente, por lo que lo único que necesitaría es que me indicaras donde las puedo encontrar o cual es su contenido para que tu clase en mi programa pueda funcionar.

Vaya paliza que te estoy dando!