Einzelnen Beitrag anzeigen

torud

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

Re: Verschachtelung, die ich nicht hinbekomme

  Alt 22. Aug 2004, 15:32
Hallo Ihr 2,

danke erstmal! So weit so gut, aber ich hatte in meinem Sourcode mit Absicht den Listbox.Count benutzt, da ich eigentlich eine dynamische Loesung benoetige. Das heisst, wenn mal 10 Bilder in der Listbox sind, sollte natuerlich eine 4. Zeile begonnen werden. Dazu muesste ich dann wahrscheinlich den Code so gestalten???

Delphi-Quellcode:
 Count:=Listbox.Count-1;
 RowCount:=Count div 3
 TabString.Add('<table>');

  for i:= 0 to RowCount do
    begin
      TabString.Add('<tr>');
      for k:=0 to 2 do
        begin
          TabString.Add('<td><img src ="'+listbox1.strings[3*i+k]+'"></td>');
        end;
      TabString.Add('</tr>');
    end;

TabString.Add('</table>');
Ist noch nicht so ganz das Wahre, glaube ich, da die Division jetzt keinen Wert 4 Zureuckgibt. Wie kann man das noch abfangen?
Danke
Tom
  Mit Zitat antworten Zitat