Simular um Click

Delphi

04/05/2004

Olá
Primeiramente obrigada por ter se interessado pela minha dúvida...
Agora aí está...
Como faço pra algum objeto simular o envento onclick do botao?!
Tipow assim ó...
Tenho dois botoes...Abrir e Fechar
Quero que quando cliar no botao Abrir, faça o evento on click do botão Fechar...
E dentro do onclick do botao Fechar ter uns codigos, entedeu?!
Até mais!!!


Reynaldo Giane

Reynaldo Giane

Curtidas 0

Respostas

Fabio.hc

Fabio.hc

04/05/2004

Tente assim:

procedure TForm1.btnAbrirClick(Sender: TObject);
begin
   btnFechar.Click;
end;

procedure TForm1.btnFecharClick(Sender: TObject);
begin
   ShowMessage(´Faça alguma coisa´);
end;



GOSTEI 0
POSTAR