Array
(
)

Nomes de componentes dinâmicos

Technoinside
   - 08 ago 2004

Estou com um pequeno problema para criar uma tabela com resultados (com número de resultados variáveis)

Possuo no form componentes do tipo

Campo_COD_1 : TRxLabel
Campo_COD_2 : TRxLabel
Campo_COD_n : TRxLabel
ou seja esse n vai poder ir até 100 aproximadamente...

e depois tenho uma procedure por exemplo
adiciona campos(cod:String;i:Integer)


O que preciso nessa função é alterar o valor do caption dos campos conforme o i cresce...
ou seja, digamos que chame campos (´xxxx´,2);
teria que mudar Campo_COD_2.Caption := cod;
e assim por diante...

tentei fazer o seguinte:
vari_cod := ´Campo_COD_´+IntToStr(i);
TRxLabel(vari_cod).Caption := cod;

mas dá um erro, creio que porque o tipo vari_cod é string e não TRxLabel


Por favor alguém me ajude!


Emerson
   - 08 ago 2004

TRxLabel(FindComponent(vari_cod)).Caption := cod;


Technoinside
   - 08 ago 2004

Mto obrigado
Sou iniciante na área do delphi e estive quebrando a cabeça por um tempo com isso, e agora funcionou direitinho =)