Zwei OnClick-Events in einer Klasse

[Phoenix]

Andersrum gehts aber.

Du schreibst zuerst das, was intern passieren soll in die reguläre OnClick - Methode.

Dann erzeugst Du eine externe:

Delphi-Quellcode:

procedure TForm1.DeineKompoOnClick(Sender: TObject);
begin
  // .. hier ne Menge Code

  // ..und zuletzt die interne aufrufen:
  inherited;
end;