Gedankenschupps SL.Strings[i] ---> Stringrid.Cells[x,y]

[Alaitoc]

Tach,

also z.b.

Delphi-Quellcode:

for i:=0 to Stringlist.Count -1 do
begin
  if i mod 3 = 0 then
  begin
    //Bei 1/4/7 ...
    StringGrid[spalte,zeile]:=Stringlist[i];
    spalte:=0;
    inc(zeile);
  end
  else if i mod 2 = 0 then
  begin
    //Bei 2/5/8 ...
    StringGrid[spalte,zeile]:=Stringlist[i];
    inc(spalte);
  end
  else if i mod 1 = 0 then
  begin
    //Bei 3/6/9 ...
    StringGrid[spalte,zeile]:=Stringlist[i];
    inc(spalte);
  end;
end

mod = Rest von i/Zahl

Ist halt nur so in etwa nen Anstupser und würde halt nur nachdem in welchem Format das ganze basiert eine ziemlich große If-Anweisung werden ;o

Oder was du noch machen könntest wäre durch die Liste zu iterieren und die Werte immer in die Spalten eintragen, wenn du dann am Ende der Zeile angekommen bist halt in die nächste wechseln...also so z.b. :

Delphi-Quellcode:

for i:=0 to Stringlist.Count -1 do
begin
  Stringrid[Spalte,Zeile]:=Stringlist[i];
  if Spalte=Stringrid.Spaltenanzahl then
  begin
    Spalte:=0;
    inc(Zeile);
  end
  else
  begin
    inc(Spalte);
  end;
end;

Was glaubich dann doch wahrscheinlich effizienter wäre *g*