Главная страница
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
14-1094155876
SergP
2004-09-03 00:11
2004.09.26
Подскажите прогу для "вытягивания" паролей сохраненных в ИЕ


1-1095086370
Lord de Mon
2004-09-13 18:39
2004.09.26
ShellExecute


1-1094647092
hgd
2004-09-08 16:38
2004.09.26
Время процедуры


4-1092198053
DelphiN!
2004-08-11 08:20
2004.09.26
Как проверить зарегестрирован ли сервис в системе?


1-1094814005
HeKTO
2004-09-10 15:00
2004.09.26
HotKey