Скачать: CL | DM;

Сообщение в 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]

> gek © (17.10.02 07:16)
не обязательно || можно и |

---

← →
maxim2 ©   (2002-10-17 07:32) [4]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c