無法找到資源文件的 '權利'

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));