Программирование в Delphi. Барков И.А - 28 стр.

UptoLike

ВУЗ: 

ИжГТУ им. Калашникова | Ижевск

Составители: 

Рубрика: 

28
свойством (см. пример в описании компонента TMenu).
Если у компонента TMenuItem имеются дочерние пункты, то он является подменю, имеет ста-
тус MF_POPUP и дескриптор меню Windows, доступный для чтения через свойство:
(
RO) property Handle: HMENU;
Пункты меню иерархически связаны. Методы и свойства для работы с дочерними пунктами
меню приведены в таблице.
(До) property Parent: TMenuItem; Содержит указатель на родительское подменю.
(Ro) property I terns[Index: Integer]:
TMenuItem;
Содержит список дочерних пунктов меню.
f
Ro) property Count: Integer; Содержит количество дочерних пунктов меню.
procedure Insert(Index: Integer; Item:
TMenuItem) ;
Вставляет пункт Item в меню на место Index. Поскольку структу-
ра меню строго иерархическая, вставляемый пункт не должен
быть частью другого меню (его свойство Parent должно быть
равно nil).
procedure Delete(Index: Integer) ; Удаляет пункт с индексом Index из меню.
function IndexOf(Item: TMenuItem):
Integer;
Возвращает индекс пункта Item.
procedure Add(Item: TMenuItem); Добавляет пункт Item в конец меню.
procedure Remove(Item: TMenuItem); Удаляет пункт Item из меню.
Если пункт меню находится в фокусе, нажатие <F1> вызовет систему помощи с контекстом,
определенным в свойстве:
(Pb) property HelpContext: THelpContext;
Свойство
(Pb) property Grouplndex: Byte;
используется при объединении нескольких меню между собой. Подробное объяснение его на-
значения см. в описании компонента TMainMenu.
Компонент TMenu
TObject—”TPersistent->TComponent->TMenu
Модуль MENUS
В Палитру компонентов не входит
Этот компонент отсутствует в Палитре компонентов, но содержит методы и свойства
, приве-
денные в таблице, общие для двух потомков — TMainMenu и TPopupMenu, которые туда входят.
(Ro) property Handle: HMENU; Содержит дескриптор меню.
property WindowHandle: HWND; Содержит дескриптор окна Windows (формы или оконного элемен-
та управления), с которым связано меню.
(Ro) property Items: TMenuItem; Содержит список элементов меню. На самом верху иерархии меню
есть единственный элемент (со статусом MFPOPUP), чей список и
используется.
function Dispatch-
Coinn>and(ACommand: Word):
Boolean;
Отыскивает пункт меню с заданной командой, в случае успеха вы-
зывает его метод Click и возвращает True.
function DispatchPopupfAHandle:
HMENU): Boolean;
Работает как Di spatchCommand, но отыскивает пункт меню с деск-
риптором AHandle. 
свойством (см. пример в описании компонента TMenu).
        Если у компонента TMenuItem имеются дочерние пункты, то он является подменю, имеет ста-
тус MF_POPUP и дескриптор меню Windows, доступный для чтения через свойство:
        (RO) property Handle: HMENU;
        Пункты меню иерархически связаны. Методы и свойства для работы с дочерними пунктами
меню приведены в таблице.
(До) property Parent: TMenuItem;     Содержит указатель на родительское подменю.

(Ro) property I terns[Index: Integer]:     Содержит список дочерних пунктов меню.
TMenuItem;
fRo) property Count: Integer;              Содержит количество дочерних пунктов меню.

procedure Insert(Index: Integer; Item:     Вставляет пункт Item в меню на место Index. Поскольку структу-
TMenuItem) ;                               ра меню строго иерархическая, вставляемый пункт не должен
                                           быть частью другого меню (его свойство Parent должно быть
                                           равно nil).
procedure Delete(Index: Integer) ;         Удаляет пункт с индексом Index из меню.
function IndexOf(Item: TMenuItem):         Возвращает индекс пункта Item.
Integer;
procedure Add(Item: TMenuItem);            Добавляет пункт Item в конец меню.
procedure Remove(Item: TMenuItem); Удаляет пункт Item из меню.

        Если пункт меню находится в фокусе, нажатие  вызовет систему помощи с контекстом,
определенным в свойстве:
        (Pb) property HelpContext: THelpContext;
        Свойство
        (Pb) property Grouplndex: Byte;
        используется при объединении нескольких меню между собой. Подробное объяснение его на-
значения см. в описании компонента TMainMenu.
        Компонент TMenu
        TObject—”TPersistent->TComponent->TMenu
        Модуль MENUS
        В Палитру компонентов не входит
        Этот компонент отсутствует в Палитре компонентов, но содержит методы и свойства, приве-
денные в таблице, общие для двух потомков — TMainMenu и TPopupMenu, которые туда входят.
(Ro) property Handle: HMENU;        Содержит дескриптор меню.
property WindowHandle: HWND;        Содержит дескриптор окна Windows (формы или оконного элемен-
                                    та управления), с которым связано меню.

(Ro) property Items: TMenuItem;          Содержит список элементов меню. На самом верху иерархии меню
                                         есть единственный элемент (со статусом MFPOPUP), чей список и
                                         используется.
function Dispatch-                       Отыскивает пункт меню с заданной командой, в случае успеха вы-
Coinn>and(ACommand: Word):               зывает его метод Click и возвращает True.
Boolean;
function DispatchPopupfAHandle:          Работает как Di spatchCommand, но отыскивает пункт меню с деск-
HMENU): Boolean;                         риптором AHandle.




                                                      28

Страницы