Главная страница
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.023 c
3-1093341693
ydv
2004-08-24 14:01
2004.09.26
запрос с помощью TADOCommand


8-1088750022
maxistent
2004-07-02 10:33
2004.09.26
Поворот битмапа по/против часовой стрлк


14-1094812557
savva
2004-09-10 14:35
2004.09.26
Нужна помощь от людей, планирующих поездку в Германию...


9-1085947496
Vin_Ghost
2004-05-31 00:04
2004.09.26
как организовать скриптовый движек


1-1094665202
AVKAR
2004-09-08 21:40
2004.09.26
TDateTimePicker