Verschachtelung, die ich nicht hinbekomme

[jfheins]

Vielleicht geht es mit 3 Zählern ?

Delphi-Quellcode:

TabString.Add('<table>');
  for a := 1 to 3 do
    begin
      TabString.Add('<tr>');
      for b := 1 to 3 do
        begin
          inc (i); 
          TabString.Add('<td><img src ="'+listbox1.strings[i]+'"></td>');    
        end;
      TabString.Add('</tr>');
    end;
TabString.Add('</table>');