Как создать свой пункт меню в Дельфи IDE?


{....}
 

uses
 ToolsApi, Menus; 

{....}
 

var
 
  item: TMenuItem; 
begin
 
  {get reference to delphi's mainmenu. You can handle it like a common TMainMenu}
 
  with
 (BorlandIDEServices as INTAServices).GetMainMenu do 
  begin
 
    item := TMenuItem.Create(nil
); 
    item.Caption := 'A Mewn caption'

    Items.Add(item); 
  end

end






на нашем сайте вы можете купить значительный словарь с целью изучения инфляции кресла пленочный теплый пол