Listview - Html-Datei

[horst]

und wie binde ich das in die schleife ein?

Delphi-Quellcode:

if (i mod 1) = 1 then
     begin
    WriteLn(tfile,' <tr  bgcolor="#ffffff">')
    end
    else
    WriteLn(tfile,' <tr  bgcolor="lightgrey">');