Auf den canvas einer TListView zeichnen?

[softtouch]

Habe ich schon versucht:

Delphi-Quellcode:

if stage=tcustomdrawstage.cdPostPaint then
begin
  sender.Canvas.MoveTo(0,0);
  sender.Canvas.LineTo(400,400);
end;

Da tut sich nichts. Und wenn ich folgendes mache:

Delphi-Quellcode:

sender.Canvas.MoveTo(0,0);
sender.Canvas.LineTo(400,400);

dann sieht es aus wie im Bild.