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]