Fórum POO #331983
24/10/2006
0
Olá pessoal.
Como meu código está recursivo, vou colocar apenas uma parte e depois minha dúvida:
var
tClasse : TClass;
begin
tClasse := TWinControl(Screen.ActiveForm.Components[iContador]).ClassType;
ShowMessage(tClasse(Screen.ActiveForm.Components[iContador]).Name);
Tem como fazer algo nesse sentido?
Como meu código está recursivo, vou colocar apenas uma parte e depois minha dúvida:
var
tClasse : TClass;
begin
tClasse := TWinControl(Screen.ActiveForm.Components[iContador]).ClassType;
ShowMessage(tClasse(Screen.ActiveForm.Components[iContador]).Name);
Tem como fazer algo nesse sentido?
Nigro
Curtir tópico
+ 0
Responder
Posts
25/10/2006
Nigro
sobe
Responder
Gostei + 0
06/11/2006
Nigro
Valeu amigos...
Fiz o relatório cross tab na mão...
Fiz o relatório cross tab na mão...
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)