Source position: googlegmail.pp line 453
protected procedure TMessagePart.Setparts(
AIndex: Integer;
const AValue: TMessagePartTypepartsArray
); virtual;