Einzelnen Beitrag anzeigen

torud

Registriert seit: 26. Jul 2002
Ort: Sachsen
1.198 Beiträge
 
Delphi XE5 Professional
 
#1

Verschachtelung, die ich nicht hinbekomme

  Alt 22. Aug 2004, 14:49
Hallo Leute,

ich muss eine HTML-Tabelle erstellen. Ich moechte in diese automatisch eine bestimmte Anzahl von Bilder anzeigen und muss dafuer zwei Schleifen ineinander verschachteln, bekomme es aber einfach nicht gebacken.

Ich lade z.B. 9 Bilder in eine Listbox und moechte in jede Zeile 3 Bilder anzeigen. 1. Zeile die ersten 3 Bilder, 2 Zeile die naechsten 6 Bilder u.s.w.

Mein Problem ist nun, dass ich nicht weiss, wo ich wie was zaehlen und verschachteln muss.

Delphi-Quellcode:
TabString.Add('<table>');
  for i:= 1 to 3 do
    begin
      TabString.Add('<tr>');
      for k:=0 to listbox1.count - 1 do
        begin
          TabString.Add('<td><img src ="'+listbox1.strings[i]+'"></td>');
        end;
      TabString.Add('</tr>');
    end;
TabString.Add('</table>');
Irgendwie habe ich einen Denkfehler. Ich weiss, dass ich irgendwo noch einen Counter einbauen muss, damit ich aus der Listbox beim ersten Durchlauf die Bilder 1-3 nehme und beim 2 Durchlauf die Bilder 4-6, aber ich kann wohl einfach nicht abstrakt genug denken!?

Kann jemand helfen??
Danke
Tom
  Mit Zitat antworten Zitat