Discounted

Declaration

Function Discounted( aValue, aDiscPC : Extended) : Extended

Example

procedure OnMapEvent(var Value:Variant);
begin
  Value := Discounted(100,10); //Value will be equal to 90
end;

Description

Discounted returns aValue discounted by aDiscPC. aDiscPC is given as a percentage and must be a value between 0 and 100 eg 12.5 is 12.5%