Source position: googlecalendar.pp line 607
protected procedure TEventTypegadget.Setpreferences(
AIndex: Integer;
const AValue: TEventTypegadgetTypepreferences
); virtual;