设置水印时，如何FillRect一行？

Question

在DrawItem函数中，首先调用FillRect来刷一行历史数据。但是如果列表设置了背景图像，那么FillRect也会刷图像。

如何解决这个问题？

procedure TCnCustBuildForm.lstWizardsDrawItem(Sender: TCustomListView; Item: TListItem; Rect: TRect; State: TOwnerDrawState);
begin
  FillRect(Sender.Canvas.Handle, Rect, GetStockObject(WHITE_BRUSH));
end;