Source position: googleproximitybeacon.pp line 434
protected procedure TDate.Setyear(
AIndex: Integer;
const AValue: Integer
); virtual;