Schleifenproblem

[Fourcorner]

Solly,

Code:

var N:integer;
var TempN:integer;,
var Text:String

while N > listview.items.count Do  
begin
  tempN := n-1;
  text := '';
  while tempN <> n+5 Do
  begin
    tempN := tempN+1;
    if tempN > listview.items.count then
    begin
      memo.lines.add(text);
      exit;
    //
    text :=text+listview.items.item[tempn].caption;
  end;
  memo.lines.add(text);
  N := tempN;
end;

Hoff man verstehts