Организация оперативной подсказки

 

Пользователям очень нравится, когда при перемещении курсора над элементом управления над ним появляется строка с поясняющим текстом о назначении этого элемента. Такая доброжелательность приложения повышает его наглядность и способствует его быстрому освоению. Кроме того, благодаря оперативной подсказке пользователь освобождается от необходимости лишний раз обращаться к файлу помощи. Ряд свойств предназначен для настройки поведения контекстной помощи (всплывающей подсказки).

 

Таблица 9.7.Организация контекстной подсказки

 

Свойство Описание
property Hint:string; В этом свойстве окажется показываемый в данный момент текст подсказки.
property HintColor: TColor; Цвет фона всплывающей подсказки.
property HintPause: Integer; Интервал времени в миллисекундах, проходящий с момента появления курсора мыши над компонентом до появления всплывающей подсказки. По умолчанию - 500 миллисекунд.
property HintHidePause: Integer; Время демонстрации подсказки. По умолчанию - 2500 миллисекунд.
property HintShortPause: Integer; Время смены всплывающих подсказок при быстром перемещении курсора над компонентами. По умолчанию - 50 миллисекунд.
property HintShortCuts: Boolean; Указывает, включать ли в подсказку информацию о сочетаниях быстрых клавиш.

 

В момент вывода всплывающей подсказки у TApplication вызывается обработчик события:

propertyOnHint: TNotifyEvent;

 

Считаю нужным напомнить о возможности отображения подсказки не только в качестве всплывающего над компонентом текста, но и в строке состояния проекта. Дело в том, что свойство любого элемента управления Hint может содержать два варианта подсказки, разделенных символом «|» (вертикальная черта). Вот пример текста подсказки кнопки закрытия проекта:

 

btnClose.Hint := 'Выход|Завершение работы программы';

 

Способ организации вывода оперативной подсказки в строке состояния

представлен в следующем примере:

typeTForm1 = class(TForm)

Private

Public

procedureLongTextHint(Sender: TObject);

end;

varForm1: TForm1;

Implementation

{$R *.DFM}

procedureTForm1.LongTextHint(Sender: TObject);

Begin

StatusBar1.SimpleText := GetLongHint(Application.Hint);

end;

procedureTForm1.FormCreate(Sender: TObject);

Begin

Application.OnHint := LongTextHint;

end;

 

Теперь вторая часть подсказки отображается в строке состояния проекта –

компоненте StatusBar1.В заключение упомянем процедуру, немедленно отменяющую вывод подсказки на экран:

procedureCancelHint;








Дата добавления: 2016-03-15; просмотров: 470;


Поиск по сайту:

При помощи поиска вы сможете найти нужную вам информацию.

Поделитесь с друзьями:

Если вам перенёс пользу информационный материал, или помог в учебе – поделитесь этим сайтом с друзьями и знакомыми.
helpiks.org - Хелпикс.Орг - 2014-2024 год. Материал сайта представляется для ознакомительного и учебного использования. | Поддержка
Генерация страницы за: 0.004 сек.