请问如何把字体文件变成资源文件？(100分)

P

plf22

Unregistered / Unconfirmed
GUEST, unregistred user!
如何把字体文件变成资源文件，并且调用它，这样即便系统里面没有该字体，也能在
程序中显示。请各位帮帮忙！
 
把字体一同打包[:D]
 
先把资源文件加到你的工程里，等要用的时候，再释放成字体文件。
 
不是要安装程序里面打包，是在编译过程中打包进程虚里，把字体文件编写进res文件里
 
先UP！
 
问题就是怎么把字体加进资源文件，然后再如何调用
 
先建一个RCData的资源，再用下面的代码存成font文件
var
res: TResourceStream;
begin
res:=TResourceStream.Create(HInstance, 'RCDATA_1', RT_RCDATA);
res.SaveToFile('ResFile.dat');
res.Free;
end;
 
一个rc文件，再用drcc32（在DELPHI的BIN目录下）来编译得到res
再链接到程序中就可以了{$ xxx.res}

rc的格式好象是：
Name Type FileName
 
网络上有很多。比如怎样把avi文件打包成res文件，然后程序调用，实际你把字体文件包含进去就可以了，用的时候，释放出来安装字体就可以了
 
delphi菜单 project->resources，进去后右键，再new，再选择user data，添加一个
RCDATA的资源，选择文件的时候选择你的font文件。
 
Milpas:你说的谁都知道，问题是字体的具体该怎么写
dcsdcs：网络很多，也只是AVI的，我想知道字体文件的，就是ttf文件
yeath：你说的好像只能加BMP,ICO等文件，你自己试过加字体文件吗？
 
什么文件都可以的，他是User Data可以的。
我用zip文件试过，没问题。
 
先建一个RCData的资源，再用下面的代码存成font文件
var
res: TResourceStream;
begin
res:=TResourceStream.Create(HInstance, 'RCDATA_1', RT_RCDATA);
res.SaveToFile('ResFile.dat');
res.Free;
end;

再用这段代码释放出来。
 
yeath:
你给这段代码能不能在详细点，怎么把ttf文件包进去，释放后，又怎么调用释放的
字体文件，能让程序用到这个字体。先谢谢了！
 
你添加RCDATA的资源会了？？？
 
var
res: TResourceStream; //定义一个资源流
begin
res:=TResourceStream.Create(HInstance, 'RCDATA_1', RT_RCDATA); //建立一个资源流对象，并装入RCDATA_1资源
res.SaveToFile('ResFile.dat'); //把资源流存为一个文件，如果是ttf，就把扩展名改一下。
res.Free;//释放资源流。
end;
 
不会，另外这句话不大懂
先建一个RCData的资源，再用下面的代码存成font文件
 
添加RCDATA文件的方法：
delphi菜单 project->resources，进去后右键，再new，再选择user data，添加一个
RCDATA的资源，选择文件的时候选择你的font文件。
 
你用的是那个版的DELPHI，我怎么看不到，你说的？
 
这个都有的，delphi5,delphi6都有的。
delphi的菜单上有一个project
project下有一个Resources
 
您必须登录或注册才可回复。

Similar threads

Ray
[转]终于可以发布Delphi下收点OSGI精髓皮毛而设计的插件框架WisdomPluginFramework
回复
4
查看
4K
chlkuei
C
M
急！！！！如何把游标、字符串、avi或wav文件加到资源文件中（即.res文件）？？(30分)
回复
6
查看
192
mlc67
M
小
如何把一个exe弄成资源文件？？(15分)
回复
8
查看
243
小虫子:P
小
啊
关于文件路径问题(0分)
回复
5
查看
155
啊啊啊啊啊
啊
A
资源文件如何编写?(0分)
回复
4
查看
99
awfigsk
A
顶部