Acabo de probar (con Free Pascal) y el error que me devuelve es otro:
Código:
test.pas(19,8) Error: Class or COM interface type expected, but got "TunoClass"
Parece decir, en ambos casos, que el operador IS no funciona con CLASS OF. Si uso Tuno y Tdos directamente no obtengo error alguno.