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