Сообщение в StatusBar

← →
maxim2 © (2002-10-17 06:08) [0]

Привет всем!
Столкнулся с проблемкой немогу никак сделать. Как записать текст в строку состояния при наведении указателя мыши на определенный пункт меню? Подскажите кто с этим сталкивался.

← →
Separator © (2002-10-17 07:14) [1]

в Hint любого компонента, в том числе и пункты меню, пишешь так:
Hint:= "Сохранить файл|Сохранить файл на диск"
А у StatusBar выставляеш свойства:
AutoHint:= true;
SimplePanel:= true

← →
gek © (2002-10-17 07:16) [2]

procedure TForm1.ShowHint(Sender:TObject);
begin
StatusBar1.Panels[0].Text:=Application.Hint;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnHint:=ShowHint;
end;

При этом хинт должны быть разделен знаком || т.е.
Hint:="Этот пункт меню || Этот пункт меню для статуса";

← →
Separator © (2002-10-17 07:20) [3]

Спасибо всем, работает

Сообщение в StatusBar Найти похожие ветки