Свойства текста в THintWindow?

← →
galan (2004-09-08 12:11) [0]

Я отрабатываю следующий код:

var h: THintWindow; tmpRect: TRect; hint: string; begin hint := "test"; h := THintWindow.Create(frmTARConsole); tmpRect := h.CalcHintRect(100, hint, Form1); h.Color := clLime; h.Font.Color := clWhite; h.ActivateHint(tmpRect, hint); end;

Так вот, хинт появляется нужного размера нужного фона, все нормально. Но выделенная строка просто игнорируется - текст как был черным, так им и остается. Каким же образом можно поменять его цвет?

← →
Семен Сорокин © (2004-09-08 12:22) [1]

или задать Screen.HintFont.Color или перекрыть Paint у THintWindow.

Свойства текста в THintWindow? Найти похожие ветки