Текущий архив: 2003.01.13;
Скачать: CL | DM;

Вниз

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

← →
Volly ©   (2002-12-30 14:18) [0]

Как сделать нестандартный Hint?

---

← →
Roma ©   (2002-12-30 14:50) [1]

Volly © (30.12.02 14:18)

Написать свой класс окна подсказки от THintWindowClass и присвоить его HintWindowClass. Примерно так:

unit MyHint;

interface

type
TMyHintWindowClass = class(THintWindow)
public
{...}
procedure Paint; // скорее всего, придется
// переписать не только Paint
{...}
end;

implementation

{...}
procedure TMyHintWindow.Paint;
begin
{...}
end;
{...}

initialization

HintWindowClass := TMyHintWindow;

end.

Все подробности можно в FM узнать, по F1...

---

← →
Skier ©   (2002-12-30 15:09) [2]

>Volly
В книге у Пачеко и Тейксейры есть пример хинта в форме эллипса
(с подробным описанием...);

---

← →
Volly ©   (2003-01-03 11:40) [3]

А как полностью перерисовать Hint (добавить картинку типа Bitmap и т.п.)?

---

← →
Gamar ©   (2003-01-03 12:37) [4]

>Volly

Отобрази битмап на канве и все...

---

← →
Volly ©   (2003-01-03 14:55) [5]

А как? :-)

---

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

Текущий архив: 2003.01.13;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.058 c