Das hattest du doch schon mal mit Drag'nDrop in ListBoxes, oder?
Einfach Doppelklick auf einen deiner Buttons im Designer, Im Code-Editor mein Code-Schnipsel einfügen.
Diese Event-Prozedur kannst du jetzt im
OI dem OnClick jedes Buttons zuweisen, der seine Caption ins Memo schreiben soll.
Wenn du jetzt [ButtonName]OnClick in meinetwegen btnCaptionOnKlick umbenennst (am Besten im
OI), wirds übersichtlicher... 8)
Nachtrag:
Das ...
If Memo1.Lines.IndexOf(Caption) = -1 Then
... sollte verhindern, dass es doppelte Einträge im Memo gibt...