Procedure

TfrmNotes.SetFontSize

Directives

Override

Module

fNotes

Last Modified

7/15/2014 3:26:38 PM

Comments

Adjusts the font size of any controls that don't have ParentFont = True

Visibility

Public

Overrides

TfrmPage.SetFontSize

Owner

TfrmNotes

Declaration

procedure SetFontSize(NewFontSize: Integer); override;

Calls Hierarchy


TfrmNotes.SetFontSize
 ├TfrmPage.SetFontSize
 └TfrmNotes.pnlWriteResize
   └TfrmNotes.UpdateFormForInput
     └TimedOut

Called-By Hierarchy


              TfrmNotes.SetFontSize
             TfrmFrame.ChangeFont┘ 
     TfrmFrame.LoadSizesForUser┤   
TfrmFrame.LoadUserPreferences┘ │   
       TfrmFrame.UMInitiate┘   │   
     TfrmFrame.mnuFontSizeClick┘   

Calls

Name Declaration Comments
TfrmNotes.pnlWriteResize procedure pnlWriteResize(Sender: TObject); -
TfrmPage.SetFontSize procedure SetFontSize(NewFontSize: Integer); virtual; -

Called-By

Name Declaration Comments
TfrmFrame.ChangeFont procedure ChangeFont(NewFontSize: Integer); -


Source

623   procedure TfrmNotes.SetFontSize(NewFontSize: Integer);
624   { adjusts the font size of any controls that don't have ParentFont = True }
625   begin
626     inherited SetFontSize(NewFontSize);
627     frmDrawers.Font.Size  := NewFontSize;
628     SetEqualTabStops(memNewNote);
629     pnlWriteResize(Self);
630   end;