Source position: googlegmail.pp line 448
protected procedure TMessagePart.Setbody(
AIndex: Integer;
const AValue: TMessagePartBody
); virtual;