Function

UserFontSize

Module

rMisc

Last Modified

7/15/2014 3:26:44 PM

Scope

Interfaced

Declaration

function UserFontSize: integer;

Called-By Hierarchy


                     UserFontSize
     TfrmFrame.LoadSizesForUser┘ 
TfrmFrame.LoadUserPreferences┘   
       TfrmFrame.UMInitiate┘     

Called-By

Name Declaration Comments
TfrmFrame.LoadSizesForUser procedure LoadSizesForUser; -


Source

236   function UserFontSize: integer;
237   begin
238     Result := StrToIntDef(sCallV('ORWCH LDFONT', [nil]),8);
239     If Result = 24 then Result := 18; // CQ #12322 removed 24 pt font
240   end;