我把一个文本文件(注意:是整个文件,不是字符串)存到了资源文件中,如何把他读到一个STRINGLIST中?

CSharp007 2004-04-02 02:17:33
如何读出来,才能保证STRINGLIST的内容和文本文件本身的内容对应?就是说,内容一致,行数相同,和使用STRINGLIST.LOADFORMFILE读取这个文本文件的效果一致?
...全文
54 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
egg0817 2004-04-02
  • 打赏
  • 举报
回复
建立TXT.rc文件

里面写
STRINGTABLE DISCARDABLE
{
1,"字符串-TEST!"
}
保存

用delphi的brcc32.exe在dos下编译生成TXT.res文件

然后写

implementation

{$R TXT.res}

最后在某个事件下写
var
ch:array[0..255] of char;

if LoadString(hInstance,1,@ch,sizeof(ch))<>0 then
memo1.text:=ch;

就可以了

记得给分啊
vargent77 2004-04-02
  • 打赏
  • 举报
回复
没想到好主义,假设可以先把文件放到memo里面去,这是显示和文件是一样的,这绝对是成功的。然后在从memo里面逐行读进stringlist,只要数line的count就可以了。应该可以得,办法笨点。memo可以不显示就看不出来了
egg0817 2004-04-02
  • 打赏
  • 举报
回复
建立一个TXT.rc文件,里面写
STRINGTABLE DISCARDABLE
{
1,"快去吃饭吧,不要再拖了!"
}
保存

用dephi的brcc32.exe编译它(dos下)

生成TXT.res

然后在
implementation

{$R TXT.res}

最后用
var ch:array[0..255] of char;
if LoadString(hInstance,1,@ch,sizeof(ch))<>0 then
memo1.text:=ch;

读取就可以了
CSharp007 2004-04-02
  • 打赏
  • 举报
回复
我把文件编译到res资源文件里面了,可以直接用STRINGLIST.LOADFORMFILE吗?
dulei115 2004-04-02
  • 打赏
  • 举报
回复
不能直接使用STRINGLIST.LOADFORMFILE吗?

5,939

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧