warum nicht einfach in der schleife, die eh schon da ist?
Delphi-Quellcode:
for I := 0 to SL.Count - 1 do
begin
if SL[I][1] = ';' then // Wenn 1. Zeichen = ';'
Continue; // dann weiter
SLSub.DelimitedText := SL[I];
StringGrid1.Cells[0, (1+(I))]:=SlSub[0]; //dateiname in stringgrid einfügen
StringGrid1.Cells[2, (1+(I))]:=Uppercase(SlSub[1]); //hash wert in stringgrid einfügen
StringGrid1.Cells[1, (1+(I))]:='ready'; //status gleich ready
end;