funktionen von buttons zusammenlegen

[Illuminator-23-5]

Delphi-Quellcode:

procedure TForm1.ButtonHinzuSchliessenClick(Sender: TObject);
begin
  ButtonHinzufuegenClick(Sender);
  ButtonSchliessenClick(Sender);
end;