Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Отображение текста в StatusBar [D7, XP]

_Mat_ © (2006-09-04 21:03:00)
Добрый вечер!!! Подскажите как сделать так, чтобы при наведении на пункт меню мышкой, в StatusBar'е отображался какой либо текст?
Спасибо!!!

Loginov Dmitry (2006-09-04 22:59:00) [1]
> Ну так а как с мышкой то быть, ведь мне надо при наведении
> на пункт меню чтобы отображался текст в StatusBar! А Hint
> это не то!!!

У пунктов меню TMenuItem есть свойство Hint. Заполняй его, если хочешь чтобы при наведении на пункт меню чтобы отображался текст в StatusBar

_Mat_ (2006-09-04 22:02:00) [2]
Ну так а как с мышкой то быть, ведь мне надо при наведении на пункт меню чтобы отображался текст в StatusBar! А Hint это не то!!!

Virgo_Style (2006-09-04 21:39:00) [3]
Loginov Dmitry © (04.09.06 21:30) [2]

Ага, точно, к [1] еще надо AutoHint в true. И, кажется, при наведении мышкой на меню не получится. Впрочем, опять не проверял, возможно, что опять зря %-)

Loginov Dmitry (2006-09-04 21:30:00) [4]
кидаешь на форму TApplicationEvents, и в событии OnHint пишешь:

procedure TForm1.ApplicationEvents1Hint(Sender: TObject); begin if Application.Hint <> '' then StatusBar1.SimpleText := Application.Hint else StatusBar1.SimpleText := 'Рульная програ!'; end;

Можешь также поюзать свойство TStatusBa.AutoHint

Virgo_Style (2006-09-04 21:17:00) [5]
Если мне не изменяет, надо задать хинты пунктам меню, остальное само. Ну и ShowHint выставить.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »