Source position: googleyoutube.pp line 4805
protected procedure TVideoCategoryListResponse.SettokenPagination(
AIndex: Integer;
const AValue: TTokenPagination
); virtual;