Dodawanie prędkości wątku do rodziny konwersji

Question

Dodałem rodzinę Speed ​​do ConvUtils, wykorzystując jako bazę metry na sekundę.

tj

Cf := RegisterConversionFamily('Speed'); 
    RegisterConversionType(Cf,'Meters per second' ,1); 
    RegisterConversionType(Cf,'Speed of Light'  ,0.000000003335641); 
    RegisterConversionType(Cf,'Speed of Sound(Mach)' ,0.0029411765); 

Teraz chciałbym dodać 'Prędkość Warp' jako typ.

I mają wzór

V = wf^3 * C 

Gdzie: V = Velocity wf = Warp Factor C = prędkość światła

Jak mogę dodać formułę, aby dodać typ?

Answer 1

Można zarejestrować własne formuły do ​​konwersji:

function ToWarp(const AValue: Double): Double; 
begin 
    Result := YourFormula1; 
end; 

function FromWarp(const AValue: Double): Double; 
begin 
    Result := YourFormula2; 
end; 

RegisterConversionType(Cf,'Warpspeed' ,ToWarp,FromWarp);