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 ;
FOR I := 1 TO DM.ComponentCount DO
BEGIN
IF DM.Components[I].ClassName = Ttable THEN
BEGIN
DM.Components[I].ACTIVE := TRUE ;
END ;
END ;
Anonymous
Curtidas 0
Respostas
Anonymous
24/02/2003
vc pode fazer assim:
FOR I := 1 TO DM.ComponentCount DO
BEGIN
IF DM.Components[I] is Ttable THEN
BEGIN
TTable(DM.Components[I]).ACTIVE := TRUE ;
END ;
END ;
Leandro
ICQ 128124370
FOR I := 1 TO DM.ComponentCount DO
BEGIN
IF DM.Components[I] is Ttable THEN
BEGIN
TTable(DM.Components[I]).ACTIVE := TRUE ;
END ;
END ;
Leandro
ICQ 128124370
GOSTEI 0