我有一个包含大约10,000行文本的TXT文件。我想在TMemo中显示这些行。但我不想把那个TXT文件分发给我的程序。如何使用stringtable {}
将其作为资源集成到我的EXE文件中,因为这需要为每行添加一个标识符(因此我将不得不添加10000个标识符)。
_
我有Delphi XE
发布于 2012-01-20 23:00:12
我通常为这类资源创建一个RC
文件(基本上是一个文本文件),然后添加如下所示的行
MyText RCDATA ..\resources\filename.txt
将每个文件/资源添加到RC文件中。如果RC文件是项目的一部分,它将被编译(到res
)并链接到exe中。为了使用资源,我通常使用TResourceStream
,即
var ResStream: TResourceStream;
ResStream := TResourceStream.Create(hInstance, 'MyText', RT_RCDATA);
顺便说一句,如果在IDE中创建RC文件时,该文件没有自动添加到项目中,则添加如下所示的行
{$R 'myExtraRes.res' 'myExtraRes.RC'}
添加到项目文件中,紧跟在uses
列表之后。
发布于 2012-01-21 10:41:03
由于希望在TMemo
中显示文本,因此只需在设计时将文本直接复制/粘贴到TMemo.Lines
属性编辑器中即可。文本将在编译时包含在所属窗体/框架的DFM资源中,并在运行时自动加载到TMemo
中。
https://stackoverflow.com/questions/8943010
复制相似问题