Menu.Item.Count

Count (Свойства пунктов меню)
Объект: Меню Статус разработки: Реализована Тип: Функция Обращение к БД: Нет Визуальность: Да

• Начальная страница
• Общее описание
• Объекты
• Меню

Функция получает количество подчиненных пунктов (подменю) текущего пункта меню.

Синтаксис

Menu.Item.Count():<Количество подпунктов текущего пункта меню (INT)>

Возвращаемое значение

Возвращает объект типа число

Примеры

//Выводит дерево пунктов текущего главного меню

  Function ВывестиПодпункты(аПункт,Смещ)
    For i:=1 To аПункт.Count Do
      Message(Смещ+аПункт.Child(i).Caption);
      ВывестиПодпункты(аПункт.Child(i),Смещ+"  ");
    EndDo;
  EndFunction

For i:=1 To Menu.ItemCount Do
  Message(Menu.Item(i).Caption);
  ВывестиПодпункты(Menu.Item(i),"  ");
EndDo;