Source position: googlegan.pp line 770
protected procedure TMoney.Setamount(
AIndex: Integer;
AValue: Double
); virtual;