Hallo,
hab da ein Problemchen wo ich nicht weiter kommen. Und zwar ich weise während der Laufzeit einer Komponente wie folgt ein PopupMenu zu:
Delphi-Quellcode:
procedure TForm1.Label3ContextPopup(Sender: TObject; MousePos: TPoint;
var Handled: Boolean);
begin
if Label3.Caption <> '' then Label3.PopupMenu := PopupMenu1
else Label3.PopupMenu := ??? (hier also kein Menü zuweisen)
end;
Nun wenn Label3 kein Text bzw. Caption hat, soll auch kein Menü erscheinen, aber ich bekomme das aber irgendwie nicht hin.
Danke!