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

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

← →
hgd   (2004-04-13 20:59) [0]

Как сделать, чтобы hint над button не исчезал.

---

← →
Rouse_ ©   (2004-04-13 21:13) [1]

Создать свой хинт. К пирмеру

procedure TForm1.Button2Click(Sender: TObject);
var
 H: THintWindow;
 Rect: TRect;
begin
 with Rect do
 begin
   Left := 100;
   Top := 100;
   Right := 200;
   Bottom := 200;
 end;
 H := THintWindow.Create(nil);
 H.ActivateHint(Rect, "qwe");
end;

Ну, соответственно, координаты сам уж подбирай...

---

← →
Vlad ©   (2004-04-13 21:14) [2]

Application.HintHidePause:=MaxInt;
Пару сотен лет висеть будет...

---

← →
Rouse_ ©   (2004-04-13 21:27) [3]

> [2] Vlad ©   (13.04.04 21:14)
А в дальнейшем не боишся натолкнуться на неприятность с таким подходом? :)

---

← →
Vlad ©   (2004-04-13 21:33) [4]

> Rouse_ ©   (13.04.04 21:27) [3]

Дык смотря для чего это автору нужно, а то еще неизвестно чей подход лучше... ;-)

---

← →
Rouse_ ©   (2004-04-13 21:46) [5]

В моем случае намек на написание небольшого наследника от THintWindow :)
В твоем более глобальный подход.
Согласен - тут смотря для чего нужно ...
Ну - не будем спорить :)

---

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

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



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