| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Application.Hint [D6, WinXP]

psa247 ©   (2005-11-25 10:33:00) 

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 ?

---

psa247   (2005-11-25 11:06:00) [1]

> SergGG ©

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

---

SergGG   (2005-11-25 10:46:00) [2]

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

---

SergGG   (2005-11-25 10:43:00) [3]

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

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


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

end;


---

Наверх