Verificar o Tipo do Componente

Gostaria de saber como eu faço para verificar se um componente é uma table Estou tentando fazer com esse comando mas da erro de compilação !!! EU quero Ativar todas as minhas tabelas do meu Datamodulo !!!!

FOR I := 1 TO DM.ComponentCount DO
BEGIN
IF DM.Components[I].ClassName = Ttable THEN
BEGIN
DM.Components[I].ACTIVE := TRUE ;
END ;
END ;