Source position: googlepartners.pp line 650
protected procedure TListCompaniesResponse.Setcompanies(
AIndex: Integer;
const AValue: TListCompaniesResponseTypecompaniesArray
); virtual;