Porque no la encuentra?

[Migpal]

Tengo la siguiente linea de codigo:

Var
TPC : TPersistentClass;
Begin
TPC := FindClass('TPrueba');
end;

me vota el error que la clase no se encuentra, TPrueba es un form simplemente, porque no la encuentra?