StringGrid - soll keine leere Zeile schreiben

[mumu]

mach mal folgendes:

Delphi-Quellcode:

for i:=0 to sectionlist.Count-1 do 
     begin 
     wert := ini.ReadString(sectionlist.Strings[i],'abteilung',''); 
     if pos(_abteilung,wert) > 0 then 
      //showmessage(sectionlist.Strings[i]+' -- '+wert); 
      begin 
       inc(x); 
       stringgrid1.Cells[0,x+1] := ini.ReadString(sectionlist.Strings[i],'NAME','<nicht gefunden>'); 
       stringgrid1.Cells[1,x+1] := ini.ReadString(sectionlist.Strings[i],'PFAD','<nicht gefunden>'); 
       stringgrid1.Cells[2,x+1] := ini.ReadString(sectionlist.Strings[i],'INFO','<nicht gefunden>'); 
       stringgrid1.Cells[3,x+1] := ini.ReadString(sectionlist.strings[i],'DOKUMENTATION','<nicht gefunden>'); 
       end; 
     end; 
    finally 
      ini.Free; 
      sectionlist.Clear; 
      sectionlist.Free; 
   end;