Einzelnen Beitrag anzeigen

AlexII

Registriert seit: 28. Apr 2008
1.717 Beiträge
 
FreePascal / Lazarus
 
#6

AW: Wie kein PopupMenu zuweisen?

  Alt 22. Aug 2012, 14:53
Thx, hab das jetzt!

Delphi-Quellcode:
procedure TForm1.Label3ContextPopup(Sender: TObject; MousePos: TPoint;
  var Handled: Boolean);
begin
if Label3.Caption <> 'then Label3.PopupMenu := PopupMenu1
else Label3.PopupMenu := nil;
end;
Bin Hobbyprogrammierer! Meine Fragen beziehen sich meistens auf Lazarus!
  Mit Zitat antworten Zitat