![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Свойства текста в THintWindow? [D7]
galan © (2004-09-08 12:11:00)Я отрабатываю следующий код:
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:00) [1]или задать Screen.HintFont.Color или перекрыть Paint у THintWindow.