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

Вниз

функция TextOut   Найти похожие ветки 

 
kilonet ©   (2006-05-14 11:34) [0]


with Sender.Canvas do
 begin
   Font.Style := Font.Style + [fsBold];
   TextOut(x1, y1, str1);

   Font.Style := [];
   TextOut(x2, y2, str2);
 end;

Проблема в том, что и вторая строка выводится жирным шрифтом. Как вывести 2ю строку обычным шрифтом?


 
Жуков Олег   (2006-05-14 12:11) [1]


> kilonet ©   (14.05.06 11:34)


Была как-то такая проблема с TreeView.Canvas, причём на любой другой канвас тот же код выводил правильно. Тогда методом "тыка" нашёл решение - вызов Canvas.Refresh; сейчас не вспомню - до или после изменения шрифта;



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

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

Наверх




Память: 0.46 MB
Время: 0.047 c
1-1145270141
Stanislav
2006-04-17 14:35
2006.05.28
Как определить завершение работы программы...


3-1144434747
Alex Romanskiy
2006-04-07 22:32
2006.05.28
Картинка в DBGridEh


3-1144132053
RomanH
2006-04-04 10:27
2006.05.28
Автоинкремент в MSSQL


1-1145272894
trank
2006-04-17 15:21
2006.05.28
Метод TCanvas.Draw меняет хэндлы


3-1143802532
pmy482
2006-03-31 14:55
2006.05.28
QReport - не забывает старые данные, дублирует