Database Search
If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.
TechHome
DllCall Information
- Beep
- Booted UEFI or BIOS
- Calling HLLAPI
- Change Screen Resolution to standard size
- Change Target of My Documents Folder
- Check for Input Idle - No User Input
- Create and Release Mutex
- Crypto API Functions
- Determine XP Home vs XP Pro using GetVersionEx API
- Direct Memory Copy - RtlCopyMappedMemory
- DLL Pointer Problem
- DllCall Additional Information
- DllCall additional info
- DllCall Example from User
- DllCall to CP5DLL32 DLL
- DllCall to GetExitCodeProcess
- DllCall To GetFileAttributesEx
- DllCall With Callback Example
- DllCall with Structures
- DllCalls to Dll with Double as Passed Param
- DllLastError GetLastError Differences
- DllStructAlloc Example
- Dynamically Change Proxy Settings for an Existing IE Session
- Error 1379 - DllCall - Bad Parameter List Error
- Find a DFS Target Given a DFS Link
- Float as a passed param to DLLCALL
- Font Installation
- FreeImage DllCalls
- General DllCall Information
- Get Username via DllCall
- Get Window with Focus
- Get Windows System Error String
- getprocesstimes_udf
- How To Call Windows API Functions
- How to Get Encrypted Attribute from a Directory
- How to Mount a Local Directory as a Drive Letter
- IntControl 32 and Structures
- Keep XP from Going Into Standby
- Link to windows API documentation
- Native WIFI API
- NTFS File Time Stamps
- Open GL Example
- OpenGL Drawing Example
- Pass Strings by Reference with DLLCall using Binary Buffers
- Reading Pixels in an Image
- Refresh Everything By Telling Windows an Association has Changed
- Shell LightWeight API calls to ColorRGBToHLS and ColorHLSToRGB
- SHQueryUserNotificationState
- Stamp text on bitmaps
- Turn Off Monitor
- Using Dll Created in C to Pass Address
- Using lp binary for DLL callback lpstrs
- VB Dll Usage with DllCall
- Why is BinaryEODset Needed
- WinSHow No Activate
- WM_SetIcon Message to Change Icon
Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Font Installation
Question:
We have to distribute set of fonts to about 200 NT Workstations. Is there a way to automate font installation on the clients via script without having to visit every Desktop?Answer:
On Windows 7 the C:\Windows\Fonts is a special folder. If you copy the font file to C:\Windows\Fonts using the FileCopy function, the font file will be copied to the C:\Windows\Fonts folder, but will not be installed. Here is a trick that uses the Windows Shell Install verb to install the font:
SourcePath = '\\server\share'
FontFileName = 'sample.ttf'
objShell = CreateObject("Shell.Application")
objFolder = objShell.Namespace(SourcePath)
objFolderItem = objFolder.ParseName(FontFileName)
colVerbs = objFolderItem.Verbs
ForEach objVerb in colVerbs
If StrIndexNC(objVerb.name,'&I',1,@FWDSCAN) != 0 || StrIndexNC(objVerb.name,'Install',1,@FWDSCAN) != 0
objVerb.DoIt
Break
EndIf
Next
Answer (older) :
;Installing a font in Windows NT/2000/XP
;----------------------------------------
;Get path to font directory and copy font
FontDir=RegQueryEx(@REGCURRENT,"Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders[Fonts]","",1)
FileCopy("myfont.ttf",FontDir,@FALSE)
;Register font
FontKey=RegOpenKey(@REGMACHINE,"SOFTWARE\Microsoft\Windows NT\CurrentVersion\Fonts")
RegSetValue(FontKey,"[My Font (TrueType)]","myfont.ttf")
RegCloseKey(FontKey)
;Add the font to the font system
DllName=StrCat(DirWindows(1),"gdi32.dll")
DllCall(DllName,LONG:"AddFontResourceA",lpstr:"myfont.ttf")
;Inform running apps about the new font
IntControl(22,-1,29,0,0)
The last line is only needed if currently running applications should be informed about the
font addition. All apps started after the installation will recognize the new font even without the IntControl call.
Article ID: W15929
File Created: 2013:10:15:09:54:18
Last Updated: 2013:10:15:09:54:18