如何将TXT文件作为资源添加到我的EXE文件中？

Question

22

我有一个包含大约10000行文本的TXT文件。我想在TMemo中显示这些行。但我不想将TXT文件分发给我的程序。如何将其作为资源集成到我的EXE文件中，而不使用stringtable {}，因为它需要每行一个标识符（所以我必须添加10000个标识符）。

_

我使用的是Delphi XE。

- Gabriel Moraru

字符串表可以容纳整个文本。 - OnTheFly

@user539... 请提供一个示例。 - Gabriel

2个回答

4

因为您想要在一个TMemo中显示文本，所以您可以直接将文本复制/粘贴到设计时的TMemo.Lines属性编辑器中。该文本将被包含在拥有表单/框架的 DFM 资源中，并在编译时自动加载到TMemo中，以供您在运行时使用。

- Remy Lebeau

2

我知道，但这不是我想要的。TMemo只是一个例子（也是测试资源字符串是否正确存储的测试）。 - Gabriel

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- ain · Accepted Answer

我通常会为这种资源创建一个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列表之后。