1 function Convert ( const Measurement : Double; const FromType, ToType : TConvType ) : Double;
2 function Convert ( const Measurement : Double; const FromType1, FromType2, ToType1, ToType2 : TConvType ) : Double;
Description
The Convert function is a very powerful and useful measurement utility. It converts a Measurement from one type FromType to another ToType.
Version 1
Converts simple values such as miles to kilometres.
Version 2
Converts complex measurements, such as Miles per gallon to Kilometres per litre.
All measurement types are TConvType types, and can have an appropriate value from the TConvFamily below. Note that the from and to values must be in the same family.
cbArea family
auSquareMillimeters
auSquareCentimeters
auSquareDecimeters
auSquareMeters
auSquareDecameters
auSquareHectometers
auSquareKilometers
auSquareInches
auSquareFeet
auSquareYards
auSquareMiles
auAcres
auCentares
auAres
auHectares
auSquareRods
cbDistance family
duMicromicrons
duAngstroms
duMillimicrons
duMicrons
duMillimeters
duCentimeters
duDecimeters
duMeters
duDecameters
duHectometers
duKilometers
duMegameters
duGigameters
duInches
duFeet
duYards
duMiles
duNauticalMiles
duAstronomicalUnits
duLightYears
duParsecs
duCubits
duFathoms
duFurlongs
duHands
duPaces
duRods
duChains
duLinks
duPicas
duPoints
cbMass family
muNanograms
muMicrograms
muMilligrams
muCentigrams
muDecigrams
muGrams
muDecagrams
muHectograms
muKilograms
muMetricTons
muDrams
muGrains
muLongTons
muTons
muOunces
muPounds
muStones
cbTemperature family
tuCelsius
tuKelvin
tuFahrenheit
tuRankine
tuReamur
cbTime family
tuMilliSeconds
tuSeconds
tuMinutes
tuHours
tuDays
tuWeeks
tuFortnights
tuMonths
tuYears
tuDecades
tuCenturies
tuMillennia
tuDateTime
tuJulianDate
tuModifiedJulianDate
cbVolume family
vuCubicMillimeters
vuCubicCentimeters
vuCubicDecimeters
vuCubicMeters
vuCubicDecameters
vuCubicHectometers
vuCubicKilometers
vuCubicInches
vuCubicFeet
vuCubicYards
vuCubicMiles
vuMilliLiters
vuCentiLiters
vuDeciLiters
vuLiters
vuDecaLiters
vuHectoLiters
vuKiloLiters
vuAcreFeet
vuAcreInches
vuCords
vuCordFeet
vuDecisteres
vuSteres
vuDecasteres
vuFluidGallons
vuFluidQuarts
vuFluidPints
vuFluidCups
vuFluidGills
vuFluidOunces
vuFluidTablespoons
vuFluidTeaspoons
vuDryGallons
vuDryQuarts
vuDryPints
vuDryPecks
vuDryBuckets
vuDryBushels
vuUKGallons
vuUKPottles
vuUKQuarts
vuUKPints
vuUKGills
vuUKOunces
vuUKPecks
vuUKBuckets
vuUKBushels
Related commands
CelsiusToFahrenheit Convert a celsius temperature into fahrenheit
DegToRad Convert a degrees value to radians
FahrenheitToCelsius Convert a fahrenheit temperature into celsius
RadToDeg Converts a radian value to degrees
TConvFamily Defines a family of measurement types as used by Convert
TConvType Defines a measurement type as used by Convert
Example code : Convert UK gallons to litres
var
gallons, litres : Double;
begin
// Define the gallons value
gallons := 1;
// Convert to litres
litres := Convert(gallons, vuUKGallons, vuLiters);
// Display both values
ShowMessageFmt('%f UK gallons = %f litres',[gallons, litres]);
end;
Show full unit code
1.00 UK gallons = 4.55 litres
Example code : Convert miles per gallon to kilometres per litre
var
milesPerGallon, kilometresPerLitre : Double;
begin
// We have a very efficient car
milesPerGallon := 58.5;
// Convert to kilometres per litre
kilometresPerLitre := Convert(milesPerGallon,
duMiles,
vuUKGallons,
duKilometers,
vuLiters);
// Display both values
ShowMessageFmt('%f UK miles per gallon = %f km per litre',
[milesPerGallon, kilometresPerLitre]);
end;
Show full unit code
58.5 UK miles per gallon = 20.71 km per litre