Главная страница
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-1094007540
HMT
2004-09-01 06:59
2004.09.26
Обновление содержимого blob.


14-1094177442
Думкин
2004-09-03 06:10
2004.09.26
С днем рождения! 3 сентября


1-1094619109
DelphiN!
2004-09-08 08:51
2004.09.26
Формирование Меню по списку файлов и папок


3-1093607081
Rost
2004-08-27 15:44
2004.09.26
Работа с access


4-1092663287
AngelOfDarkness
2004-08-16 17:34
2004.09.26
Программирование Com-порта под WinNT