Mehrere Label nach Wahl in die Clipboard kopieren?

[OrNEC]

Zitat von Jumpy:

Mal ausführlich

Delphi-Quellcode:

if Sender is TMenuItem then
  if TMenuItem(Sender).GetParentMenu is TPopupMenu then
    if TPopupMenu(TMenuItem(Sender).GetParentMenu).PopupComponent is TLabel then
      showmessage(TLabel(TPopupMenu(TMenuItem(Sender).GetParentMenu).PopupComponent).Caption)

Danke!