変換ファミリにワープスピードを追加する

Question

私は、スピードファミリをConvUtilsに追加しました。

すなわち

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

今、私はタイプとして「ワープスピード」を追加したいと思います。

私は式

V = wf^3 * C 

ている：光

の V =速度 WF =ワープファクター C =スピードはどうやってタイプを追加するための式を追加することができますか？

Answer 1

あなたは変換のために自身の公式登録することができますほとんどが

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);