Создаю ListView с нестандартной прорисовкой, но наткнулся на очень нехорошую для меня вещь: в ListView1AdvancedCustomDrawSubItem если Item является только что выделенным Canvas.ClipRect содержит область, не дающую в полной мере отрисовать всю облась правильно. Очень хочется "очистить" Canvas.ClipRect чтобы то что я выводил не обрезалось данной областью! Выручайте, уде второй день бъсь

Вот часть прорисовки где глюк выползает:

Код

procedure TForm1.ListView1AdvancedCustomDrawSubItem(   Sender: TCustomListView; Item: TListItem; SubItem: Integer;   State: TCustomDrawState; Stage: TCustomDrawStage;   var DefaultDraw: Boolean); ... var ... begin  if SubItem=1 then  begin   r2 := Item.DisplayRect(drLabel);   Sender.Canvas.Brush.Style:=bsSolid;   if Item.Selected then   begin    Sender.Canvas.Brush.Color:=$AAAAFF;    Sender.Canvas.Pen.Color:=$AAAAFF;    ListView1.Canvas.Rectangle(0,r2.Top,Sender.Width,r2.Bottom); //тут рисуется не та область, которую я указываю а лишь маленькая часть! ClipRect содержит ту область которая обрезается, нужно всего лишь залить область (0,r2.Top,Sender.Width,r2.Bottom)!!!   end else   begin    ...   end; ...

P.S. нужно именно так сделать для ускорения прорисовки, можно и принудительно вызвать после выделения итема Repaint, по в этом случае скорость отрисовки падает (а она и так у меня не очень высокая т.к. выводится куча различных данных).