Текущий архив: 2007.03.04;
Скачать: CL | DM;
Вниз
TListView +font size Найти похожие ветки
← →
кэй (2007-02-14 15:45) [0]У меня есть TListView, vsReport, Columns = 3.
Каким образом можно изменить размер шрифта только в третьей колонке?
Пытался в OnListViewCustomDrawItem/OnListViewCustomDrawSubItem, в canvas задать значение font size, но увы, не получилось.
Хтя изменение цвета - спокойно работает:
Sender.Canvas.Font.Color := clRed;
И ещё один вопрос, каким образом изменить у всей какой-то строки бэкграунд цвет?
← →
Loginov Dmitry © (2007-02-14 16:16) [1]>
> Пытался в OnListViewCustomDrawItem/OnListViewCustomDrawSubItem,
> в canvas задать значение font size, но увы, не получилось.
печально.
procedure TForm1.ListView1CustomDrawSubItem(Sender: TCustomListView;
Item: TListItem; SubItem: Integer; State: TCustomDrawState;
var DefaultDraw: Boolean);
begin
if SubItem = 2 then
with ListView1.Canvas do
begin
Font.Color := clRed;
Font.Style := [fsBold];
Font.Size := 16;
end;
end;
← →
кэй (2007-02-14 17:04) [2]Не хочет ставить значение менее восьми. А я пытался поставить размер = 7. Почему так получается?
← →
DVM © (2007-02-14 17:23) [3]
> Не хочет ставить значение менее восьми. А я пытался поставить
> размер = 7. Почему так получается?
шрифт поменяй
← →
Loginov Dmitry © (2007-02-14 17:24) [4]Шрифт другой поставь.
← →
кэй (2007-02-14 17:46) [5]Да, сменил шрифт на другой - стал нормально отображаться 7 размер, спасибо. Но ещё одна проблема получиласть: теперь при седьмом размере, текст прижат к верхней границе, а не ровно, как текст (8 размера) в остальных "клетках". Что можно сделать в таком случае?
Страницы: 1 вся ветка
Текущий архив: 2007.03.04;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.037 c
