Internet to Listview

[mkinzler]

Du löschst den ListView auch

Delphi-Quellcode:

for i := 1 to StrArr[1] do
begin
    Maps := Form1.Client.ReadLn;

    if Length(Maps) > 0 then
    begin
        StrArr := Explode('|', Maps);
        LI := Maplist.Items.Add;
        LI.Caption :=   StrArr[2];
        LI.SubItems.Add(StrArr[4]);
        LI.SubItems.Add(StrArr[3]);
    end;
end;