Need to add larger fonts to Mac OS X Notes 6.5 Client

HCL Domino Domino Forum
1

How do I adjust Notes font size settings for Mac version on all pages not just emails that are being sent.

Thanks,

Aaron

2

Subject: Need to add larger fonts to Mac OS X Notes 6.5 Client

Try this. Create a form with a field called FontSize. Default the FontSize as a listbox range value from 1 to 5. Create a button call “font size change” with the script below. The trick is to change NOTES.INI’s Display_font_adjustment variable. This variable controls Notes’ default font display. Since Mac uses Preferences file and it require a special binary editor to change the file, it’s a pain to change the font size if you have many Mac users. The script below will change the Mac Preferences (NOTES.INI equivalent in Mac). Create a db where Mac users have access to this button and all they need to do is to select the font and click the button and restart Notes. You don’t even have to be in front of their MACs.

Sub Click(Source As Button)

Dim session As New NotesSession

Dim ws As New NotesUIWorkspace

Dim currentSettingString As String



currentSettingString$ = session.GetEnvironmentString( "Display_font_adjustment", True)



Dim doc As NotesDocument

Dim uidoc As NotesUIDocument

Dim AdjustSize As String



Set uidoc = ws.CurrentDocument

Set doc = uidoc.Document

AdjustSize = Cstr(doc.FontSize(0))

Call session.SetEnvironmentVar ("Display_font_adjustment", AdjustSize, True)

Messagebox "Your Notes font size has just been increased to +" + AdjustSize + ". You will need to restart the Notes client before this takes effect.", 64, "Restart Notes Client"

End Sub

Also, below is a script to restore the font.

Sub Click(Source As Button)

Dim session As New NotesSession

Dim currentSettingString As String	



Call session.SetEnvironmentVar ("Display_font_adjustment", "", True)	

Messagebox "Your Notes font size has just been restored. You will need to restart the Notes client before this takes effect.", 64, "Restart Notes Client"

End Sub

On the form, I’d include some test text in font size 8. Something like

“This is a test paragraph in font size 8. If all goes well, you should be able to see this more clearly. This is a test paragraph in font size 8. If all goes well, you should be able to see this more clearly.This is a test paragraph in font size 8.”

If the font size change was successful, the text above should be larger when they open the same form.