FindComponent em todo o form

Question

Tenho um RadioButton que est� dentro de um Painel, que est� dentro de um tabsheet, que est� dentro de um pagecontrol. Mas suponhamos que n�o tenho o nome do painel, nem do tabsheet (s�o criados em tem...

Carlos Roberto Pav�o · Accepted Answer

Muito obrigado M�rio. Na verdade nem lembro mais deste problema. J� faz 11 anos! Acho at� interessante o seu interesse e � muito bom para as pessoas que pesquisam por aqui.Grande abra�o,...

Tap_pedroso · Answer

j� tentou application.findcomponent(�nomedocomponente�)?...

Crpavao · Answer

Na verdade, eu acho o componente atraves de vRadio.FindComponent(�RA123�). Depois faco:
If assigned(vRadio) Then
showmessage(�achou�)

Tudo isto funciona mas qdo troco o showmessage por :
vRadio.Checked := True d� acess violation.

D� pr� saber?

Obrigado

Paulo_amorim · Answer

Ol�Voc� est� fazendo [b:229ee49a15]vRadio[/b:229ee49a15].FindComponent ? Creio que o correto seria [code:1:229ee49a15]vRadio := nil;vRadio := Form1.FindComponent(�RA123�);vRadio.Checked := Assigned(vRadio);[/code:1:229ee49a15]Espero que funcioneAt�+...

Crpavao · Answer

Paulo,D� erro pois vRadio est� definico como tradioButton e, qdo usado o form1.component d� incompatibilidade entre tradiobutton e component....

Paulo_amorim · Answer

Ol�Desculpe, eh necess�rio que se fa�a um TypeCast:vRadio := TRadioButton( Form.FindComponent(�RA123�) );Espero que ajudeAt�+...

Crpavao · Answer

Paulo,O comando funcionou mas no assigned d� falso...T� f.., n�o?...

F�rum Vini · Answer

[quote:4ee2e85e13=�Pav�o�]Paulo,O comando funcionou mas no assigned d� falso...T� f.., n�o?[/quote:4ee2e85e13]Ol�,se d� falso � porque ele n�o achou.. Certifique-se de estar definindo o form como o Owner do componente na hora de cri�-lo(Owner � diferente de Parent) :wink:[code:1:4ee2e85e13]rd:= TRadioButton.Create(Form1); //Nesse exemplo Form1 � o Owner de rd[/code:1:4ee2e85e13]Espero ter ajudado,Vinicius;...

Crpavao · Answer

Vinicius,Obrigado pela m�o, mas o owner do radiobutton � um Painel, que foi criado em tempo de execu��o e n�o quero referenci�-lo (us�-lo). D� pr� encontrar este radiobutton sem indicar o Painel? Pois a� tamb�m este painel est� dentro de um tabsheet....

Crpavao · Answer

sobe, cara, sobe......

F�rum Vini · Answer

[quote:0ad687cf3c=�Pav�o�]Vinicius,Obrigado pela m�o, mas o owner do radiobutton � um Painel, que foi criado em tempo de execu��o e n�o quero referenci�-lo (us�-lo). D� pr� encontrar este radiobutton sem indicar o Painel? Pois a� tamb�m este painel est� dentro de um tabsheet.[/quote:0ad687cf3c]N�o vejo motivo para voc� n�o querer us�-lo, mas ent�o voc� vai ter que criar o RadioButton tendo o formul�rio como Owner, ent�o o c�digo ir� funcionar normalmente.. observe que isso n�o impedir� que o RadioButton fique dentro do Panel, pois quem determina isso � a propriedade Parent, o Owner serve somente para o objeto pai destruir os filhos quando ele for destru�do tbm......

Paulo_amorim · Answer

Ol�COmo bem explicou o Vinicius, n�o tem problema deixar o TRadioButton no painel com Owner no Form, desde que o Parent seja o PainelCreio que colocando o Form como Owner ele acha certinho...At�+...

Crpavao · Answer

Valeu Paulo, valeu Vinicius. Acho que agora tenho informa��o suficiente para tocar op barco.Qq coisa estamos aqui.Obrigado pela for�a.T� outra.....

M�rio Filho · Answer

...var   vRadio: TRadioButton;begin    vRadio := nil;    vRadio := TRadioButton(imp_guias_bolo.FindComponent(QRLabel+trim(inttostr(i1))));    if Assigned(vRadio) then       TRadioButton(imp_guias_bolo.FindComponent(QRLabel+trim(inttostr(i1)))).Checked:=true    else       TRadioButton(imp_guias_bolo.FindComponent(QRLabel+trim(inttostr(i1)))).Checked:=false;end;...

M�rio Filho · Answer

...

F�rum FindComponent em todo o form #255367