Ver el tipo al que pertenece una variable u objeto

[r1d2m3]

Hola a todos, tengo el siguiente inconveniente: necesito determinar el tipo de componente que hay en un form para, luego tomar un camino u otro, me explico mejor, el form tiene varios componentes, tsedit, tslabel, tcombobox, etc, etc, cuando reciben el foco debo determinar que tipo de componente recibe el foco, si es un tsedit hago algo, si es un tslabel hago otra cosa, etc,.
Necesitaría algo parecido a VarType pero para analizar el tipo de componente enfocado.

Gracias y saludos.