delphi – 如何将TXT文件添加到我的EXE文件中？

我有一个包含大约10,000行文本的TXT文件。我想在TMemo中显示这些行。
但我不想分发该TXT文件我的程序。如何将其作为资源WITHIUT使用stringtable {}集成到我的EXE文件中，因为这需要每一行的标识符(因此我必须添加10000个标识符)。

_

我有Delphi XE

解决方法

我通常为这种资源创建一个RC文件(基本上是一个文本文件)，然后添加一行

MyText RCDATA ..\resources\filename.txt

为每个文件/资源​​进入RC文件。如果RC文件是项目的一部分，它将被编译(res)并链接到exe中。要使用资源，我通常使用TResourceStream，即

var Resstream: TResourceStream;
Resstream := TResourceStream.Create(hInstance,'MyText',RT_RCDATA);

BTW如果RC文件在IDE中创建时没有自动添加到项目中，则添加行

{$R 'myExtraRes.res' 'myExtraRes.RC'}

进入项目文件，就在使用列表之后。