Conv-Page Millimeters to Points

From Vectorlab

Function to convert page millimeters to point, where 1 point is 1/72 inches. This is mainly used when dealing with GetPrefReal(57) - active font size- which returns page mm unregarded the current units. By Orso B. Schmid

{ Orso ************************************************ }
{ converts page inches to points. Useful for text size }
{ the document text size GetPrefReal(57) returns page mm, unregarded the units set }
FUNCTION U_PageMM2point(pageMM: REAL): REAL;
    BEGIN
        U_PageMM2point := pageMM / 100 / 25.4 * 72;
    END;