Converts a Currency value to a Comp value.

procedure CurrencyToComp(Value: Currency; var Result: Comp); cdecl;

__cdecl CurrencyToComp(Currency Value, Comp Result);