StdConvs
unit
CelsiusToFahrenheit
FahrenheitToCelsius
http://www.delphibasics.co.uk/RTL.as...usToFahrenheit
http://www.delphibasics.co.uk/RTL.as...nheitToCelsius
function FahrenheitToCelsius(const AValue: Double): Double;
begin
Result := ((AValue - 32) * 5) / 9;
end;
function CelsiusToFahrenheit(const AValue: Double): Double;
begin
Result := ((AValue * 9) / 5) + 32;
end;