FindComponent de dentro de um procedure de uma outra classe
no meu form criei uma outra classe, que quando executo um determinado procedimento dela preciso chamar o método FindComponent para alterar algum valor do componente localizado que está no form.
no entanto ao chamar o FindComponent dentro do procedimento da classe criada aparece o erro dizendo: ´ undeclared identifier: ´FindComponent´ ´
Como faço para alterar a propriedade de um componente que está no Form através do FindComponent sendo chamado de uma outra classe?
quando estou no form uso a seguinte linha
mas quando tento utilizar esta mesma linha dentro da classe que criei dentro do form aí não dá certo.
no entanto ao chamar o FindComponent dentro do procedimento da classe criada aparece o erro dizendo: ´ undeclared identifier: ´FindComponent´ ´
Como faço para alterar a propriedade de um componente que está no Form através do FindComponent sendo chamado de uma outra classe?
quando estou no form uso a seguinte linha
TPanel(FindComponent(´PnlAcao´ + inttostr(I))).Caption := ´texto qualquer´;
mas quando tento utilizar esta mesma linha dentro da classe que criei dentro do form aí não dá certo.
Raserafim
Curtidas 0
Respostas
Raserafim
23/11/2005
como não achei uma solução para executar de dentro da classe, arrangei uma outra solução.
Criei um procedimento no form que recebe como parâmetro qual componente a outra classe quer alterar e qual o valor a ser colocado.
assim ficou mais de acordo com os conceitos de orientação a objetos, sendo uma melhor prática de programação.
Criei um procedimento no form que recebe como parâmetro qual componente a outra classe quer alterar e qual o valor a ser colocado.
assim ficou mais de acordo com os conceitos de orientação a objetos, sendo uma melhor prática de programação.
GOSTEI 0
Bruno Belchior
23/11/2005
Passe o formulário como parâmetro para esse método... o FindComponente é do formulário, por isso vc não consegue acessálo na outra classe...
TPanel(vParametroFormulario.FindComponent(´PnlAcao´ + inttostr(I))).Caption := ´texto qualquer´;
GOSTEI 0