Besitzt eine Komponente eine bestimmte Eigenschaft???

[dot]

ich versuche zu setzen und zu lesen, wenn ich z.b Tbutton ans object gebe dann klappt es, aber ich will es pauschal für alle haben die PopUpMenu können

Delphi-Quellcode:

fComponent:= AOwner;

  fPopUpMenuCreated := not Assigned(fComponent.PopUpMenu);
  if fPopUpMenuCreated then
  begin
    fPopUpMenu := TPopUpMenu.Create(self);
    fPopUpMenu.Name := CompName('PopUpMenu');
    fComponent.PopUpMenu := fPopUpMenu;
  end else
  begin
    fPopUpMenu := fComponent.PopUpMenu;
  end;