无法找到资源文件的 '权利'

Question

在FORMCREATE程序我写：

var f: TResourceStream; 
    begin 
    // load data about rights from rights.txt resource file 
    f := TResourceStream.create(Hinstance, 'rights', PChar('RT_RCDATA')); 
    try 
    LoadFromStream(f); 
    finally 
    f.free; 
    end; 

，并得到错误：

Project1.exe raised exception class ERESNotFound with message 'Resource rights not found'. 

如果我改变文件路径 '权利'：

'rights.txt'   or 
'D:\Example\rights.txt' or 
'D:\Example\rights' 

我得到同样的错误！

rights.txt文件我在项目文件夹和win32 \ debug \ project1.exe文件夹中找到了这两个文件，但发生了同样的错误。

更新1

PopupMenu with access rights

rights.txt file for loading popupmenu

这将是在rights.txt文件中的这些不确定simbols？

Answer 1

您需要将ResType参数更改为RT_RCDATA，而不是PChar('RT_RCDATA')

f := TResourceStream.create(Hinstance, 'rights', RT_RCDATA); 

的RT_RCDATA在System.Types单元定义如下

const 
    RT_RCDATA  = PChar(10); 

所以，你也可以使用它像这样

f := TResourceStream.create(Hinstance, 'rights', PChar(10));