如何读出来,才能保证STRINGLIST的内容和文本文件本身的内容对应?就是说,内容一致,行数相同,和使用STRINGLIST.LOADFORMFILE读取这个文本文件的效果一致?

解决方案 »

  1.   

    不能直接使用STRINGLIST.LOADFORMFILE吗?
      

  2.   

    我把文件编译到res资源文件里面了,可以直接用STRINGLIST.LOADFORMFILE吗?
      

  3.   

    建立一个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;读取就可以了
      

  4.   

    没想到好主义,假设可以先把文件放到memo里面去,这是显示和文件是一样的,这绝对是成功的。然后在从memo里面逐行读进stringlist,只要数line的count就可以了。应该可以得,办法笨点。memo可以不显示就看不出来了
      

  5.   

    建立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;就可以了记得给分啊