Source position: googlegan.pp line 558
protected procedure TEvent.SeteventDate(
AIndex: Integer;
AValue: TDatetime
); virtual;