Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.26;
Скачать: CL | DM;

Вниз

Свойства текста в 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.



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

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

Наверх




Память: 0.46 MB
Время: 0.041 c
4-1091957232
Cara
2004-08-08 13:27
2004.09.26
Как узнать код Юникодовского символа?


14-1094716082
by
2004-09-09 11:48
2004.09.26
Пример модели предметной области для проектирования


14-1094198873
Holy
2004-09-03 12:07
2004.09.26
Неисповедимы пути...


1-1094599162
Jetus
2004-09-08 03:19
2004.09.26
MSI и Delphi


1-1094936271
Uroboros
2004-09-12 00:57
2004.09.26
Мультистрочная палитка компонентов