关于资源文件
请问如何从资源文件中提取出GIF WAV MP# MID等资源 问题点数：34、回复次数：8Top
1 楼seeyard（浣熊）回复于 2002-01-01 21:28:03 得分 2
存为自定义资源，到用的时候在解出来存到硬盘上，再调用Top
2 楼honey（小虾米）回复于 2002-01-01 21:44:39 得分 5
需要利用API函数实现，创建临时文件！从内存中读出。Top
3 楼bakw（好好潜水,天天UP）回复于 2002-01-02 07:59:28 得分 0
本来我想用LoadResData()函数读的
我用了一个txt文件试了一下结果读出来的和原来输入的不一样了
文字全被改掉了
Top
4 楼snakeyin（水是我）回复于 2002-01-02 08:32:26 得分 5
肯定可以, 查看一下format設置的值對不對!!!!!
LoadResData(index, format)
LoadResData 函數的語法具有下列幾個單元：
單元 描述
index 必要的引數。整數或字串，用來指定資源檔中資料的識別項 (ID) 。ID 識別項為 1 的資源為保留給應用程式的圖示。
Format 必要的引數。數值，指定傳回資料的原始格式，細節詳述於「設定」中。該數值也可以是使用者自訂資源的字串名稱。
設定
用於 format 的設定值：
設定 描述
1 游標
2 資源項目為點陣圖
3 圖示 resource 資源
4 功能表
5 對話方塊
6 字串
7 字型目錄資源
8 字型資源
9 快速鍵對應表
10 使用者自訂的資源
12 群組游標
14 群組圖示
請注意
LoadResData 從資源檔載入的資料可以達到 64K。
以點陣圖、圖示、游標資源型態來使用LoadResData傳回包含該資源中實際位元的字串。如果您想使用實際的點陣圖、圖示或資源，請使用 LoadResPicture 函數。
Top
5 楼bakw（好好潜水,天天UP）回复于 2002-01-02 08:50:56 得分 0
这个我知道
我是用下面一段来试的:
Dim lpTempFileName, rs As String
Dim fn As Integer
lpTempFileName = "c:\tt.txt"
fn = FreeFile
Open lpTempFileName For Output As #fn
rs = LoadResData(101, "CUSTOM")
Print #fn, rs
Close fn
原来资源文件是一个test.txt的文本
内容是:test
可是出来的文本是:整瑳Top
6 楼hikylin（黑麒麟）回复于 2002-01-02 09:31:53 得分 2
heTop
7 楼w12（无心）回复于 2002-01-02 11:47:31 得分 10
怎么不用(.RC)字符串资源文件?Top
8 楼Bardo（巴顿(永远只有一个)）回复于 2002-01-02 13:46:10 得分 10
有一个可参考的原代码：
http://www.csdn.net/expert/topic/407/407247.shtmTop
