Executar Procedure CLICK de um RADIOGROUP no Activate d FORM

Delphi

16/08/2004

Bom dia..

A dúvida é a seguinte:

- Como que eu faço pra executar o ´ONCLICK´ de um RadioGroup no Activate do Formulário ou em outros lugares....

Desde já agradecido!

Diego


Diegus

Diegus

Curtidas 0

Respostas

Balceiro

Balceiro

16/08/2004

tente o código abaixo. veja se é isso que vc quer.


procedure TForm1.FormActivate(Sender: TObject);
begin
   RadioGroup1.OnClick(sender);
end;

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
if RadioGroup1.ItemIndex = 0 then
  ShowMessage(´Masc´)
else
  ShowMessage(´Fem´);
end;


balceiro


GOSTEI 0
Djjunior

Djjunior

16/08/2004

se vc setar um valor para o radiogroup vc vai automaticamente executando o ´OnClick´ do mesmo


GOSTEI 0
POSTAR