Mega Code Archive

 

Categories / Delphi / VCL

 

[] Runtime menuye eleman ekleme

var Item: TMenuItem; begin Item := TMenuItem.Create(Popup1); Item.Caption := 'A new menu item'; Popup1.Items.Insert(2, Item); end;