Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

пункт меню в DELPHI7 IDE


JustI ©   (2008-10-23 11:15:00) 

Пытаюсь создать свой пункт меню в DELPHI7 IDE. Код беру из DRKB. При выполнении вылетает AccessViolation. В чем может быть дело.


procedure Tform_Test.FormCreate(Sender: TObject);
var
 Item: TMenuItem;
begin
 with (BorlandIDEServices as INTAServices).GetMainMenu do
 begin
   Item := TMenuItem.Create(Nil);
   Item.Caption := 'Test MenuItem';
   Items.Add(Item);
 end;
end;


Anatoly Podgoretsky   (2008-10-23 19:25:00) [1]

> JustI  (23.10.2008 11:15:00)  [0]

А какого типа Items, где оно описано и инициализировано?


Palladin   (2008-10-23 11:18:00) [2]

а проверить значение (BorlandIDEServices as INTAServices).GetMainMenu ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо