Source position: googlecoordinate.pp line 416
protected procedure TSchedule.Setkind(
AIndex: Integer;
const AValue: string
); virtual;