Fórum RadioGroup por Referencia #286199
27/06/2005
0
Ola Amigos ,
Gostaria de acessar a propriedade ItemIndex de um radiogroup usando uma funcao genérica pois utilizo muito a mesma em diversos relatorios e forms.
Só que não estou tendo sucesso.
Se alguem puder me ajudar , agradeço antecipadamente.
Segue a função conforme achei que deveria ser escrita , mas não deu certo.
Desde já sou grato.
procedure SelecaoEstoqueVendido(Sender: TObject);
begin
((Sender as TForm).FindComponent(´SpeedButtonTodos´) as TSpeedButton).Enabled := ((Sender as TForm).FindComponent(´RadioGroupEstoqueVendido´ as TRadioGroup).ItemIndex < 2;
end;
Gostaria de acessar a propriedade ItemIndex de um radiogroup usando uma funcao genérica pois utilizo muito a mesma em diversos relatorios e forms.
Só que não estou tendo sucesso.
Se alguem puder me ajudar , agradeço antecipadamente.
Segue a função conforme achei que deveria ser escrita , mas não deu certo.
Desde já sou grato.
procedure SelecaoEstoqueVendido(Sender: TObject);
begin
((Sender as TForm).FindComponent(´SpeedButtonTodos´) as TSpeedButton).Enabled := ((Sender as TForm).FindComponent(´RadioGroupEstoqueVendido´ as TRadioGroup).ItemIndex < 2;
end;
Emerson Azevedo
Curtir tópico
+ 0
Responder
Posts
29/06/2005
Caninha51
Em todos os forms tem um SpeedButton e um RadioGroup exatamente com estes nomes?
Como vc tá chamando este procedimento?
Se for assim naum vejo razão para não funcionar...
SelecaoEstoqueVendido(NomeDoFormQueEstaChamando);
Falow
Caninha51
Como vc tá chamando este procedimento?
Se for assim naum vejo razão para não funcionar...
SelecaoEstoqueVendido(NomeDoFormQueEstaChamando);
Falow
Caninha51
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)