{"id":673,"date":"2011-01-12T20:20:22","date_gmt":"2011-01-13T01:20:22","guid":{"rendered":"http:\/\/anvil-of-time.com\/wordpress\/?p=673"},"modified":"2021-03-10T19:16:39","modified_gmt":"2021-03-11T00:16:39","slug":"powerbuilder-add-remove-a-font-at-runtime","status":"publish","type":"post","link":"https:\/\/anvil-of-time.com\/powerbuilder\/powerbuilder-add-remove-a-font-at-runtime\/","title":{"rendered":"PowerBuilder – Add \/Remove a Font at Runtime"},"content":{"rendered":"

Here is a way to add (and remove) a font to the user’s machine at runtime. You can also use this to check if a user has a particular font installed since the code also shows how to list all the installed fonts (need MS Word for this). Way back in my PB5 days I coded a process to print checks. Rather than fool with preprinted forms this application printed all of the data to produce a check which could be processed by banks just like any other. The printer would have to use special magnetic ink and we also used a special MICR font for the bank routing and account numbers. Although the application never really made it into the ‘real’ world, I always thought the potential for fraud was significant. If the font were dynamically added and removed from the workstation, this potential would have been somewhat less.<\/p>\n

The basic process makes use of two windows API calls: AddFontResource and RemoveFontResource. The declarations are as follows (both ANSI and Unicode):<\/p>\n

Function int AddFontResourceA(string lpFileName) library "gdi32.dll"\nFunction int AddFontResourceW(string lpFileName) library "gdi32.dll"\nFunction int RemoveFontResourceA(string lpFileName) library "gdi32.dll"\nFunction int RemoveFontResourceW(string lpFileName) library "gdi32.dll"<\/pre>\n
To demonstrate the techniques, I’ve created a sample application.<\/p>\n
\"\"<\/a><\/p>\n
In the ‘Load Fonts’ button clicked event there is the following:<\/p>\n
integer li_fonts, li_i\nlong\tll_row\nOLEObject lole_word, lole_fonts\nstring ls_file_name\ndw_1.reset() \/\/ clear existing entries\n\nlole_word = CREATE oleobject\nlole_fonts = CREATE oleobject\nTRY\n\tlole_word.connecttonewobject('word.application')\nCATCH (runtimeerror a)\n\tMessagebox('Error','Error connecting with MS Word. Process terminating.')\n\tRETURN -1\nEND TRY\nlole_word.visible = FALSE \/\/ dont want to see word\nlole_fonts = lole_word.fontnames\nli_fonts = lole_fonts.count\n\/\/ build font list in datawindow\nFOR li_i = 1 to li_fonts\n\tll_row = dw_1.insertrow(0)\n\tdw_1.setitem(ll_row,'fontname',lole_fonts.item(li_i))\nNEXT\ndw_1.sort()\nlole_word.quit() \/\/ close word\nDESTROY lole_fonts\nDESTROY lole_word<\/pre>\n
This uses OLE with MS Word to retrieve the list of font names installed on the system.<\/p>\n
\"\"<\/a><\/p>\n
There is a font file included with the example which can be used as the temporary font in the demonstration. Run the application and click on the ‘Select Font File’ button to choose this file.<\/p>\n
Now click the ‘Add Font’ button. The font’s name and a sample of it should appear in the appropriate fields.<\/p>\n
\"\"<\/a><\/p>\n
If you click the ‘Load Fonts’ button again you will see the new font name in the list.<\/p>\n
\"\"<\/a><\/p>\n
Finally, click the ‘Remove Font’ button to remove it. The ‘New Font Example’ text will now revert.<\/p>\n
If you click the ‘Load Fonts’ button again you will see the new font name has been removed from the list.<\/p>\n
\"\"<\/a><\/p>\n
The zip archive containing the PB files, exports, and the sample font file can be downloaded here<\/a>.<\/p>\n","protected":false},"excerpt":{"rendered":"
Here is a way to add (and remove) a font to the user’s machine at runtime. You can also use this to check if a user has a particular font installed since the code also shows how to list all the installed fonts (need MS Word for this). Way back in my PB5 days I…<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":[],"categories":[3,10],"tags":[13,16,42],"_links":{"self":[{"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/posts\/673"}],"collection":[{"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/comments?post=673"}],"version-history":[{"count":10,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/posts\/673\/revisions"}],"predecessor-version":[{"id":1919,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/posts\/673\/revisions\/1919"}],"wp:attachment":[{"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/media?parent=673"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/categories?post=673"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/tags?post=673"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}