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;