Форум: "Основная";
Текущий архив: 2003.12.12;
Скачать: [xml.tar.bz2];
ВнизTListView - выделить строку жирным цветом Найти похожие ветки
← →
ИМХО (2003-12-03 06:48) [0]Как осуществить сабж?
Какое именно событие обрабатывать?
Дайте, пожалуйста, пример.
← →
dDan (2003-12-03 07:53) [1]А разве жирный цвет бывает
Я может неправильно понял вопрос но копать надо в сторону
CustomDrawItem
← →
ИМХО (2003-12-03 07:56) [2]Да, это я зарапортовался :)
Прости надо выделить строку жирным стилем.
← →
Леприкон (2003-12-03 08:09) [3]Что то вроде этого, наверное...
procedure TForm1.LVDrawItem(Sender: TCustomListView; Item: TListItem;
Rect: TRect; State: TOwnerDrawState);
var R:TRect;
begin
R:=Item.DisplayRect(drLabel);
if odSelected in State then
with LV.Canvas do
begin
Font.Style:=Font.Style+[fsBold];
Brush.Color:=RGB(130,160,215);
FillRect(Rect);
TextRect(R,R.Left,R.Top,LV.Selected.Caption);
Font.Style:=Font.Style-[fsBold];
end
else
begin
LV.Canvas.FillRect(Rect);
LV.Canvas.TextRect(R,R.Left,R.Top,Item.Caption);
end;
end;
Это для стиля vsReport
← →
dDan (2003-12-03 08:11) [4]Допустип пусть пример будет такой
if (item.SubItems[2]<=DateToStr(Date)) then
begin
Sender.Canvas.Brush.Color := clMaroon;
Sender.Canvas.Font.Style:=[fsBold];
Sender.Canvas.Font.Color := clSilver;
Если дата во втором сабитеме превышает существуещую дату то строка выделяеться Бордовым а текст Жирный=) и Серебрянный
← →
ИМХО (2003-12-03 08:36) [5]Спасибо!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.12.12;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c