From RAD Studio VCL Reference
unsigned short tuHours;
The tuHours variable represents the conversion type for hours.
Use tuHours to convert from another measurement unit to hours.
Note: Do not change the value of tuHours. tuHours contains a handle obtained by a call to RegisterConversionType. Changing the value of tuHours will make time conversions not work properly.