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

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

XPMenus не работают

=BuckLr= ©   (2007-07-22 18:33:00) 

Прога валится на запуске с ошибкой 216. В чём дело?

---

=BuckLr=   (2007-07-25 16:12:00) [1]

В самом деле. Согласен. ИМХО коррекция нужна

---

Compiler   (2007-07-24 22:24:00) [2]

В файле Unit1_1.inc, ежели отсутствуют пункты меню, строки
Result.XPMainMenu1 := NewXPMenu( Result.Form, 0, [ '1'
     , '' ], nil, false );
  {$IFDEF USE_NAMES}
   Result.XPMainMenu1.Name := 'XPMainMenu1';
  {$ENDIF}отсутствуют, а Result.XPMainMenu1.DrawXPStyle;- имеется. Начинается прорисовка несуществующих пунктов меню. Отсюда БАГ. Недоработка MCKXPMenus.pas, однако.

---

=BuckLr=   (2007-07-24 00:08:00) [3]

Прикольно... И чё я сам не догадался? Однако неправильно это

---

Compiler   (2007-07-23 22:48:00) [4]

Создайте один пункт меню, и все!

---

Наверх