📄 addfontresource.htm
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<style><!--
body,table {font-family:"宋体"; font-size: 9pt; line-height:11pt;}
a {text-decoration:none} a:hover {color:red;text-decoration:underline}
--></style>
<title>AddFontResource</title>
</head>
<body link="#FF0000" vlink="#FF0000" alink="#FF0000" bgcolor="#FFC8C8">
<div align="center"><center>
<table border="0" width="100%" height="22" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" height="16">AddFontResource</td>
</tr>
</table>
</center></div><div align="center"><center>
<table border="1" width="100%" bordercolorlight="#808080" cellspacing="0"
bordercolordark="#FFFFFF">
<tr>
<td width="100%" colspan="2">VB声明</td>
</tr>
<tr>
<td width="100%" colspan="2">Declare Function AddFontResource Lib "gdi32" Alias
"AddFontResourceA" (ByVal lpFileName As String) As Long</td>
</tr>
<tr>
<td width="100%" colspan="2">说明</td>
</tr>
<tr>
<td width="100%" colspan="2">在Windows系统中添加一种字体资源。添加完毕后，该字体即可由任何Windows应用程序调用</td>
</tr>
<tr>
<td width="100%" colspan="2">返回值</td>
</tr>
<tr>
<td width="100%" colspan="2">Long，添加的字体数量，零表示失败。会设置<a
href="GetLastError.htm" tppabs="http://personal.hb.cninfo.net/~vbapi/GetLastError.htm">GetLastError</a></td>
</tr>
<tr>
<td width="100%" colspan="2">参数表</td>
</tr>
<tr>
<td width="25%">参数</td>
<td width="75%">类型及说明</td>
</tr>
<tr>
<td width="25%">lpFileName</td>
<td width="75%">String，字体资源文件的文件名。可以是.FON， .FNT， .TTF
或 .FOT文件</td>
</tr>
<tr>
<td width="100%" colspan="2">注解</td>
</tr>
<tr>
<td width="100%" colspan="2"><p align="left">添加了一种资源后必须调用下述API函数：<br>
di% = SendMessageBynum(HWND_BROADCAST, WM_FONTCHANGE, x, y)<br>
其中，HWND_BROADCAST、WM_FONTCHANGE使用来自API32.TXT文件的值。这样便可告诉所有Windows应用程序字体列表已发生了变化</td>
</tr>
<tr>
<td width="100%" colspan="2">示例</td>
</tr>
<tr>
<td width="100%" colspan="2">Call AddFontResource("myfont.ttf")<br>
Call SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0)</td>
</tr>
</table>
</center></div><div align="center"><center>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%"><p align="right">Top</td>
</tr>
</table>
</center></div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -