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

Hint и собственный компонент   Найти похожие ветки 

← →
salexn   (2006-07-03 13:09) [0]

Есть TImage, в котором выводится некоторая графика. Как сделать так, чтобы при набедении на определенную облать выводился хинт, поясняющий что это такое.
Сделал через HintWindow и таймер, но не очень нравится. Зачастую, в данной реализации, почему-то не отрабатывает CMMouseLeave. Хотелось бы оформить ввиде компоненты. Приходится чуть ли не на каждый контрол на форме вешать "убивание" HintWindow.

---

← →
Phoroon~ ©   (2006-07-03 13:30) [1]

У каждого компонента есть свойства: Hint; ShowHint.
Hint - сюда пишешь текст.
ShowHint - ставишь true (показ хинта)

ИМХО
Не надо не чё выдумывать!!!

---

← →
salexn   (2006-07-03 13:43) [2]

И сколько раз покажется хинт в вашем случае, если мышь не покинет TImage? 1 раз...

---

← →
Phoroon~ ©   (2006-07-03 13:50) [3]

Так а тебе чего нужно!
Что бы он дольше висел?

---

← →
Phoroon~ ©   (2006-07-03 13:52) [4]

> Что бы он дольше висел?

При создании проекта пиши: Application.HintHidePause:=100000;

---

← →
salexn   (2006-07-03 14:09) [5]

Мне нужно, чтобы перемещаясь мышкой по TImage от области к области хинт показывался для данной области. Потом, в ТВОЕМ случае хинт будет болтаться не зависимо от того, в какой области ты находишься.

---

← →
Макс Черных ©   (2006-07-03 16:06) [6]

Надо перехватывать CM_HINTSHOW

procedure CMHintShow(var Message: TMessage); message CM_HINTSHOW;

procedure МойКомпонент.CMHintShow(var Message: TMessage);
 inherited;
 Message.Result := 1;
 with TCMHintShow(Message) do begin
   ...
   HintInfo^.CursorRect := Область (тип TRect);
   ...
 end;
end;

Тогда когда курсор передвинется за границы Области, то старый хинт закроется и пойдет новый.

---

← →
DimaBr   (2006-07-03 16:44) [7]

TMS.HotSpotImage

---

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

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



Память: 0.46 MB
Время: 0.025 c