TComponentName Auswerten bzw "verarbeiten"

[dataspider]

Man kann auch der Einfachheit halber jedem Button ein Tag verpassen und über dieses steuern:

Delphi-Quellcode:

if Assigned(PopupMenu1.PopupComponent) then
begin
  case PopupMenu1.PopupComponent.Tag of
    0: mach dies;
    1: mach das
  end;
end;

[EDIT] das spart das Zerlegen des Strings...
Frank