Source position: googleadexchangebuyer.pp line 1943
protected procedure TProduct.SetdeliveryControl(
AIndex: Integer;
const AValue: TDeliveryControl
); virtual;