Source position: googlestorage.pp line 654
protected procedure TObject.Setkind(
AIndex: Integer;
const AValue: string
); virtual;