Я покажу как сделать так, чтобы строка состояния (Status Bar)
показывала все всплывающие подсказки (Hint) элементов управления формы при
нахождении курсора мыши в области компонента. Имеется пара решений данной
задачи, но в любом случае вы должны создать код для каждой формы (пока я не знаю
другого решения).
Шаг 1:
Расположите TStatusBar на всех формах, где вы хотите увидеть подсказки в
строке состояния. Установите свойство SimplePanel в True и присвойте компоненту
другое имя (я использую SBStatus). Смотри мой комментарий относительно имени,
который я поместил в шаге 4.
Шаг 2:
Создайте необходимые подсказки в свойствах Hint. Не забудьте вставить "|",
если вам необходим длинный текст.
Шаг 3:
Поместите следующую строку в обработчике события FormCreate вашей формы:
Application.OnHint := DisplayHint;
Шаг 4:
Создайте эту процедуру. Пожалуйста обратите внимание на комментарии.
procedure TFrmMain.DisplayHint(Sender: TObject);
var
Counter, NumComps: integer;
beginwith Screen.ActiveForm dobegin
NumComps := ControlCount - 1;
for Counter := 0 to NumComps do{SBStatus - имя всех моих компонентов TStatusBar.
При необходимости его можно изменить.}if (TControl(Controls[Counter]).Name = "SBStatus") thenbeginif (Application.Hint = "") then{ConWorkingName - используемая константа.
При необходимости ее можно изменить.}
TStatusBar(Controls[Counter]).SimpleText := ConWorkingName
else
TStatusBar(Controls[Counter]).SimpleText := Application.Hint;
break;
end;
end;
end; {DisplayHint}
Не забудьте поместить "Procedure DisplayHint(Sender: TObject) в секции
Public.
Это все, что вы должны сделать. Если вы хотите придать такую функциональность
другим формам, просто поместите на них TStatusBar и установите свойство Hint у
необходимых компонентов. Я надеюсь это просто.
Если Вас заинтересовала или понравилась информация по разработке на Delph - "Показ всплывающих подсказок в строке состояния", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу: Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!