Source position: googlegroupssettings.pp line 62
protected procedure TGroups.SetarchiveOnly(
AIndex: Integer;
const AValue: string
); virtual;