快速业务通道

Dephi资源文件中、高级应用篇

作者 凌众技术 来源 互联网 浏览 发布时间 2012-01-14
在上次,我们谈到了Dephi中资源文件使用详解以及Dephi资源文件的初级应用篇,在您对Dephi资源文件有了一定的了解后,我们现在来谈一下Dephi资源文件的中、高级应用篇。   附:Dephi中资源文件使用详解;初级应用篇 中级应用篇   上面我们已经知道如何把一副BMP图像从资源文件里面读出来,但是BMP文件太大了,JPG文件应用的相对较多.那么如何把JPG图像读出来呢?用资源文件加流方式即可。具体方法如下:   1.MyJpg JPEG My.JPG   2. Var    Stream:TStream;    MyJpg:TJpegImage;   Begin    Stream:=TResourceStream.Cceat(HINSTANCE,'MyJpg','JPEG');    Try      MyJpg:=TJpegImage.Create;     Try       MyJpg.LoadfromStream(Stream);       Image1.Picture.Assignc(MyJpg);     Finally       MyJpg.Free;     end;    Finally     Stream.Free;    end;   end;   读取其它图片文件也是一样的.比如说gif动画文件,当然前提是你有一个gif.pas,这个单元很多站点都有的,可以自己去找找。实际应用中我还发现用上面的代码可以直接显示资源文件中的ICON和BMP。   说到图形处理,实际上还可以用Delphi创建、调用纯图标资源的DLL.比如说你可以看看超级解霸目录下的Dll,很多就是纯图标资源而已。具体方法如下:   1:创建一个Hicon.RES文件,这里不再重复.   2:新建一文本文件Icon.dpr,内容如下: library Icon; {$R Icon.RES} begin end   用Delphi打开编译即可得到Icon.dll.   3:实际调用方法如下: ......  Private   Hinst:THANDLE; ......  Var Hicon:THANDLE; begin  Hinst:=Loadlibrary('Icon.dll');  If Hinst=0 Then Exit;  Hicon:=Loadicon(Hinst,Pchar(Edit1.Text)); If Hicon<>0 Then Image1.Picture.Icon.Handle:=Hicon;  FreeLibrary(Hinst); end;   如果你的程序想在国际上供使用不同语言的人使用的话,用Dll来存放字符资源将是一个好方法.因为Dll不象ini文件那样可以被人随便修改,特别是有时侯如果想保存一些版权信息的话用Dll就再好不过了。比如说你准备开发一个"汉字简繁体翻译器"软件,准备提供Gb32,Big5码和英文三种语言菜单给用户,那么你可以试试用Dll来保存字符资源. 我们需要建立三个Dll.第一步当然是写Rc文件,举Gb32码为例,内容如下: /*MySc.rc

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号