chamar procedure de outa procedure

Question

Ja vi isto antes mais n�o encontreitenho um componente action e estou utilizando o F4 em varias situa��es dentro do formulario preciso testar os casos abaixo e chamar a procedureprocedure TFormBalcao2...

Massuda · Answer

N�o sei se entendi direito o problema, mas imaginando que pnlBut1Click e pnlBut2Click s�o m�todos de TFormBalcao2 usados para tratar os eventos OnClick (dos panels pnlBut1 e pnlBut2?)...

procedure TFormBalcao2.FechaNotaF41Click(Sender: TObject);
begin
  if pnlBut1.visible then
    begin
      pnlBut1click(Sender);
   end;

 if pnlBut2.visible then
   begin
     pnlBut2click(Sender);
  end;
end;

F�rum chamar procedure de outa procedure #288704