Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 05.04.2007, 19:21   #1
Albenous
Helper
Форумчанин
 
Аватар для Albenous
 
Регистрация: 10.12.2006
Адрес: Беларусь
Сообщений: 109
Репутация: 70

icq: 233633942
Вопрос Statusbar на двух формах

Люди, хочу прописать по статусбару на каждой форме, чтоб там выводились подсказки (hint) в каждом для своей формы.
для одной формы - все OK. для двух - выводит подсказки со всех элементов (при наведении курсора, конечно) только на статусбаре первой формы.
кто не в курсе как вообще подсказки на статусбаре показывать - кидаю код:
Код:
type
...
procedure DisplayHint(Sender: TObject);
...

procedure TForm2.DisplayHint(Sender: TObject);
begin
StatusBar1.Panels[0].Text := Application.Hint;
end;
сразу скажу, что фишка
Код:
Form2.StatusBar1.Panels[0].Text := Application.Hint;
не проходит
__________________
Глупых вопросов не бывает - бывают глупые ответы.
Albenous вне форума   Ответить с цитированием
Старый 06.04.2007, 08:18   #2
SERG1980
Профессионал
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
Репутация: 717
По умолчанию

Попробуй поставь на форму компонент ТApplicationEvent с политры Additional (невидимый компонент)
В окне свойств переключись на вкладку Events, найдите событие
OnHint и создайте следующий обработчик:
procedure TPictureForm.ApplicationEventsHint( Sender: TObject);
begin
with StatusBar do
begin
SimpleText := Application.Hint;
SimplePanel := SimpleText <> '';
end;
end;
Вместо SimplePanel можно задать например Panel[0] .....
У меня всегда это работало и проблем небыло.
SERG1980 вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
StatusBar к WebBrowser Dux Общие вопросы Delphi 3 04.06.2008 12:00
Картинки на формах в Дельфи Барби Помощь студентам 3 23.12.2007 20:19
WebBrowser и StatusBar tebeen Работа с сетью в Delphi 1 20.09.2007 22:02
StatusBar Nasya Microsoft Office Excel 3 16.07.2007 10:26
Вычисления в формах. Beatl Microsoft Office Word 1 03.04.2007 19:35


17:26.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.