In Stringgrid per Schleife schreiben

[Salazriel]

Ich glaube sie meint das anders.

etwa so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Zeile,ersteFreieZeile:integer;
begin
    //Buch erstellen,Werte zuweisen

     ersteFreieZeile:=0;
     for Zeile:=0 to Stringgrid1.RowCount-1 do
       if Stringgrid1.Cells[0,Zeile]<>'' then  // <> bedeutet ungleich
         ersteFreieZeile:=ersteFreieZeile+1; //oder inc(ersteFreieZeile)
     StringGrid1.cells[0,ersteFreieZeile]:=Buch.titel;

Das Programm findet heraus, welche Zeile die erste freie Zeile ist und schreibt dann den Titel in die Zelle[0,ersteFreieZeile]