Delphi：ListView中的颜色项

Question

  

可能重复：
  ListView in vsReport mode colouring of Items and rows

我遇到了一个问题：ListView中的项目被添加到一个单独的线程中，其中一些元素必须是彩色的，但只有当指针带到项目时才会着色。如何解决这个问题？

这样做的颜色元素（OnAdvancedCustomDrawItem）：

procedure TFGlavnaya.LVThreadsListAdvancedCustomDrawItem(
  Sender: TCustomListView; Item: TListItem; State: TCustomDrawState;
  Stage: TCustomDrawStage; var DefaultDraw: Boolean);
begin
  try
    if Item.SubItems[0] = '' then
      begin
        Sender.Canvas.Font.Color := clBlue;
        Sender.Canvas.Font.Style := Sender.Canvas.Font.Style + [fsBold];
      end;
  except
    Exit;
  end;
end;