Source position: googlecompute.pp line 1641
protected procedure TDisksScopedList.Setwarning(
AIndex: Integer;
const AValue: TDisksScopedListTypewarning
); virtual;