Install TT Font

'****************************************************
'modFonts (Fonts.bas)
'
'Exported functions:
'
' InstallTTFont (ret.: 0: An error occured
'                      1: Successful
'                      2: Same or newer file exists
'                      3: System must be rebooted)
'    strSourcePath As String
'    strFontFileName As String
'    Optional bolShowError As Boolean
'
' ShutdownSystem
'    eType As eShutDown
'****************************************************
'NOTE: If the return value of InstallTTFont equals 3,
'      you should call ShutdownSystem(shtForceReboot)
'      after your installation succeeded (ask user).
'****************************************************


Downloads

Comments

  • You are the best

    Posted by sohailch on 10/07/2009 03:06pm

    Thanks R. Whitworth, I was looking for this solution from couple of days. I tried your solution it is very easy to use and working well. It has little problem that we need to restart the system after installation. In fact i am using vb installation program to install it install fonts that will be used by an Visual C++ application. My be thats why i have to restart the machine. But thanks for such an nice help.

    Reply
  • very nice

    Posted by ahsanm.m on 04/22/2007 07:32am

    it's very helpful for me.

    Reply
  • How to use this bas

    Posted by Legacy on 09/09/1999 12:00am

    Originally posted by: Randy

    I wonder is there an example on how to use this bas module.

    Reply
Leave a Comment
  • Your email address will not be published. All fields are required.

Top White Papers and Webcasts

  • On-demand Event Event Date: September 10, 2014 Modern mobile applications connect systems-of-engagement (mobile apps) with systems-of-record (traditional IT) to deliver new and innovative business value. But the lifecycle for development of mobile apps is also new and different. Emerging trends in mobile development call for faster delivery of incremental features, coupled with feedback from the users of the app "in the wild." This loop of continuous delivery and continuous feedback is how the best mobile …

  • On-demand Event Event Date: July 22, 2014 In this WhatWorks analysis, John Pescatore examines a use case where end users had local administrative rights on their PCs and it had gotten out of hand for this Fortune 500 Energy and Utilities company. The compelling event that prompted the company to reexamine this situation was the migration to Windows 7. In Windows XP, a custom tool that allowed users one of three levels of administrative rights to their workstations would need to be replaced during the Windows …

Most Popular Programming Stories

More for Developers

Latest Developer Headlines

RSS Feeds