Hab jetzt diesen Teil auch angepasst:
Delphi-Quellcode:
procedure TForm1.Button8Click(Sender: TObject);
begin
cd := TCD.create;
cd := TCD(cdList[0]); //geht nicht??
stringGrid1.cells[1, 3] := cd.interpreter;
stringGrid1.cells[2, 3] := cd.albumTitle;
stringGrid1.cells[3, 3] := cd.genre;
cd.free;
cd := TCD.create;
cd := TCD(cdList[1]); //geht auch nicht??
stringGrid1.cells[1, 4] := cd.interpreter;
stringGrid1.cells[2, 4] := cd.albumTitle;
stringGrid1.cells[3, 4] := cd.genre;
cd.free;
end;
aber jetzt schreibt er nichts mehr in die Stringgrid.