16/08/2004

Executar Procedure CLICK de um RADIOGROUP no Activate d FORM

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

Respostas

16/08/2004

Balceiro

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


Responder Citar

16/08/2004

Djjunior

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


Responder Citar