TUnit - Exemples

// On crée l'unité Degré
SpawnNewUnit('°C', 'degré Celsius', 'degré Celsius',
             0,
             1, // le degré Celsius est homogène au Kelvin
             0,
             0,
             0,
             0,
             0,
             0,
             1, -273.15, // [K] = 1 * ( [°C] - -273.15 )
             False, // on ne gère pas de stock en °C
             True // le degré Celsius est préfixable : par exemple « millidegré Celsius » (symbole m°C).
             );

// On crée l'unité Fahrenheit
SpawnNewUnit('°F', 'degré Fahrenheit', 'degré Fahrenheit',
             0,
             1, // le degré Fahrenheit est homogène au Kelvin
             0,
             0,
             0,
             0,
             0,
             0,
             5/9, -459.67, // [K] = 5/9 * ( [°F] - -459.67 )
             False, // on ne gère pas de stock en °F
             True // le degré Fahrenheit est préfixable.
             );

// On veut récupérer le ratio entre le degré Fahrenheit et le Kelvin
var u:=TUnit.ConnectByAbbrev('°F');
PrintLn(u.Ratio); // affiche 0.555555555555556

// On veut convertir entre ces 2 unités
PrintLn(ConvertValue(0, '°C', '°F')); // affiche 31.9999999999999
PrintLn(ConvertValue(100, '°C', '°F'));  // affiche 212