mehrere Button-Captions in Memo verschieben

[Hansa]

nene, die Tags sind die wiklich absolut notwendige Notreserve. 8)

Zitat von Robert_G:

(Im OnClick, das jedem Button zugewiesen wird)

Genau das, jeder Button soll im OnClick sein Caption in das Memo schreiben. Dem Memo sollte es aber egal sein, von welchem der Buttons das stammt. Wie weise ich also jetzt allen Buttons dieselbe OnClick zu Ich will ja die 10 einzelnen ausschalten. Das müßte reichen, aber wo und wie einbauen ?

Delphi-Quellcode:

With Sender As TButton Do
   Memo1.Lines.Add(Caption);