На нашем сайте ежедневно публикуются десятки качественных и свежих материалов, которые Вы можете скачать абсолютно бесплатно. Рекомендуем Вам добавить Наш сайт в закладки, а также подписаться на RSS ленту, чтобы не пропускать интересных новостей.
Компонент Delphi BalloonHint представляет собой невизуальный компонент, служащий для отображения подсказок в виде «воздушного шара»(рис 1). Одновременно на форме может отображаться только одна подсказка. Если приложение пытается отобразить подсказку, когда подсказка уже отображается, то новая не появится, пока существующая всплывающая подсказка была видимой. Значение свойства Delay устанавливает время после выполнения процедуры показа подсказки до появления подсказки, а свойство HideAfter время показа подсказки. Компонент BalloonHint также позволяет в подсказке выводить изображение, хранящееся в ImageList. Рассмотрим простейший пример использования компонента.
Поместите на форму следующие компоненты: Label, Edit, BalloonHint и ImageList. Привяжите ImageList к компоненту BalloonHint с помощью свойства Images. Теперь описываем событие KeyPress для компонента edit
procedure TForm14.Edit1KeyPress(Sender: TObject; var Key: Char); var point: tpoint; begin if Key = #13 then begin BalloonHint1.Title := 'ошибка'; BalloonHint1.Description := 'данные не совподают с данными в Label'; point.X := label1.Width; point.Y := label1.Height; balloonhint1.ShowHint(edit1.ClientToScreen(point)); end; end; При нажатии Enter в компоненте edit, проверяются введенные данные с данными находящиеся в Label если они не совпадают выводит подсказку.
|