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

Application.Hint   Найти похожие ветки 

← →
psa247 ©   (2005-11-25 10:33) [0]

1) Есть ListView с элементами
2) Как выводить Hint в позиции (X,Y), и при каждом изменении (X,Y) обновлять Hint для каждого элемента
3) Как сделать "умный" Hint. Т.е. если он вылезает за границы экрана, допустим вниз, то поднять его на необходимую величину вверх.

В 2) делал View.GetItemAt(X,Y); и Application.ActivateHint(PosHint); PosHint - TPoint. Когда работает, когда нет.

P.S. С чем едят Application.HintMouseMessage ?

---

← →
SergGG ©   (2005-11-25 10:43) [1]

> 2) Как выводить Hint в позиции (X,Y), и при каждом изменении
> (X,Y) обновлять Hint для каждого элемента

есть другой способ, если я правильно понял:


procedure TForm1.ListView1SelectItem(Sender: TObject; Item: TListItem;
 Selected: Boolean);
begin
   Application.CancelHint;
   ListView1.Hint:=item.Caption;

end;


---

← →
SergGG ©   (2005-11-25 10:46) [2]

но при этом ListView1.HotTrack:= True

---

← →
psa247 ©   (2005-11-25 11:06) [3]

> SergGG ©

Элемент м.б. не выделен, но находиться под курсором мыши.
Надо сделать Hint, такой же как у TotalCmd, к примеру, только не вылезающий за границы экрана

---

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

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



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