📅  最后修改于: 2022-03-11 15:04:45.004000             🧑  作者: Mango
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('Lazarus makes my day'); //A message will be displayed with the content...
end;