TIAeverMainMenu иTIAeverPopMenu (Второй вариант) v 2.04

Этот компонент представляет собой графическое Основное и Всплывающее меню не основанное на базе системного меню

Содержание:

1. Инсталляция

2. Краткое описание

3. Полное описание

4. Лицензия


1. Инсталляция

Delphi 4
C++ Builder 4
Delphi 5

В начало

2. Краткое описание

В компоненте предусмотрено следующее:

В начало

3. Полное описание

Свойство Величина Описание
BackColor clMenu Цвет фона окна меню
DelayTime 60 Время задержки перед выбором компонента меню
Font3DStyle iafsPlain
iafsRelief
iafsPressed
Стиль трехмерности шрифта
FramesDelay 10 Определяет скорость с которой меню открывается и закрывается, если анимация не нужна, то установите эту величину в 0
GrayColor clInactiveCaption Цвет серых составляющих, т.е. тех которые видны но не выделяются
MainMenuLeft 0 величина Left для положения основного окна меню
MainMenuList TIAMenuList Содержимое меню
MainMenuTop 0 величина Top для положения основного окна меню
MainSemiPercent 0 Степень полупрозрачности для главного окна основного меню
MenuAlign iaalTop
iaalLeft
iaalBottom
iaalRight
iaalNoneHorizontal
iaalNoneVertical
Выравнивание основного меню
MenuFont TFont Шрифт меню
MenuKind mkSimple
mkWide
mkRects
mkSimpleCorner
mkWideCorner
Тип меню, в данной версии он только один...
PrefferedOrientation poLeftRightTopBottom
poRightLeftTopBottom
poLeftRightBottomTop
poRightLeftBottomTop
Предпочтительная ориентация появления меню
ScrollVelocity 5 Скорость скроллирования по списку составляющих меню
SelectColor clActiveCaption Цвет выделения
SelectFontColor clMenuText Цвет шрифта выделенного элемента меню
SemiPercent 0 Степень полупрозрачности окон подменю

События

property OnSelectItem : TIAMenuSelectProcedure read FOnSelectItem write FOnSelectItem;
TIAMenuSelectProcedure = procedure(Sender : TObject;AName : String;var ANamePath : TStringList;ASubmenuSelected : Boolean) of object;
Где:

Методы

procedure OpenMenu(Moused : Boolean = TRUE;AWinControl : TWinControl = nil;Aleft : integer =0; Atop : integer = 0; Aright : integer = 0 ; Abottom : integer = 0;AHorizontal : Boolean = false);
открывает меню;

procedure CloseMenu;
закрывает меню;

Примеры

В начало

4. Лицензия

Компонент бесплатен для индивидуального использования. Для коммерческого использования необходимо получить согласие автора.

В начало