Форум: "KOL";
Текущий архив: 2004.04.04;
Скачать: [xml.tar.bz2];
Вниз
установить цвет отличный от общего в одной строке listview Найти похожие ветки
← →
IronWit © (2003-07-14 12:41) [0]как?
← →
Gandalf © (2003-07-14 18:36) [1]Помоему так:
function TForm1.ListView2LVCustomDraw(Sender: PControl; DC: HDC;
Stage: Cardinal; ItemIdx, SubItemIdx: Integer; const Rect: TRect;
ItemState: TDrawState; var TextColor, BackColor: Integer): Cardinal;
begin
Result := CDRF_DODEFAULT;
case Stage of
CDDS_PREPAINT: Result := CDRF_NOTIFYITEMDRAW;
CDDS_ITEMPREPAINT:
if Odd(ItemIdx) then
BackColor := clSilver;
end; // case
end;
← →
Кладов (2003-07-14 19:36) [2]только через OnLVCustomDraw. Для изменения цвета нужных ячеек достаточно управлять для этих ячеек стадией PREERASE
← →
IronWit © (2003-07-15 11:21) [3]спасибо, получилось.
Страницы: 1 вся ветка
Форум: "KOL";
Текущий архив: 2004.04.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.033 c