function FixedMul(A, B, TFixed): TFixed;
This is the same as using MulDiv(A, B, $10000).
[See also] Fixed Point Math, Fixed Division