ButtonClick - 2 Aktionen

[neolithos]

noch ne andere möglichkeit

Delphi-Quellcode:

procedure TForm1.ButtonClick1(*bla*)
begin
  Memo1.Visible := not Memo1.Visible;
end;