Código Delphi [-]procedure Saludo(Sender: Tobject); begin ShowMessage('Hola Mundo'); end;
procedure Saludo(Sender: Tobject); begin ShowMessage('Hola Mundo'); end;