Das Array habe ich gefunden.
Code:
var
JSonValue : TJSonValue;
Authors : TJSONArray;
Items : string;
i : Integer;
begin
Memo2.Clear;
JSonValue := TJSonObject.ParseJSONValue( Memo1.Text );
Items := JSonValue.GetValue< string >( 'items[0].volumeInfo.title' );
Memo2.Lines.Add( Items );
Authors := JSonValue.GetValue< TJSONArray >( 'items[0].volumeInfo.authors' );
for i := 0 to Authors.Size - 1 do
Memo2.Lines.Add( Authors.Get( i ).Value );
Items := JSonValue.GetValue< string >( 'items[0].volumeInfo.publishedDate' );
Memo2.Lines.Add( Items );
JSonValue.Free;
Damit klappt es.
@jobo: ich gucke es mir an