Source position: googlegmail.pp line 126
protected procedure THistory.Setid(
AIndex: Integer;
const AValue: string
); virtual;