Dönüştürme ailesine Çözgü Hızını Ekleme

Question

KonvUtillere bir Hız ailesi ekledim;

yani

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

Şimdi bir türü olarak 'Warp Speed' eklemek istiyorum.

Ben formüle sahip

V = wf^3 * C 

: V = Hız wf Warp Factor C = Hız ışık

arasında nasıl bir tür eklemek için bir formül ekleyebilir =?

Answer 1

Sen dönüşüm için kendi formüllerini kayıt olabilirsiniz:

Neredeyse

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