如何在设计时将富格式文本分配给 Delphi TRichEdit或TcxRichEdit(可能使用Lines属性)？

alen0pnh 于 2022-12-23 发布在其他

关注(0)|答案(2)|浏览(203)

我只想将不可变的富格式文本分配给RichEdit（或者DevExpress cxRichEdit，它显然是从VCL RichEdit继承的）。我知道如何在运行时使用文本选择和设置属性来进行大量格式化。但是我不需要这种灵活性-我只是有一些用粗体显示的长文本，不需要在运行时修改它。这是给用户的一些信息/文档。
我如何在设计时分配这样的文本？RichEdit没有复杂的编辑器（至少我找不到它）为线属性。我试图创建RTF文档在Word中，然后复制粘贴其值（带有RTF标记的文本）到线属性，但RichEdit显示所有的RTF标记。此外，Word添加了令人难以置信的大量RTF附加信息，而不仅仅是一些RTF标签在这里和那里。
如何在设计时添加带格式文本？

delphi

来源：https://stackoverflow.com/questions/65286237/how-to-assign-richly-formatted-text-to-delphi-trichedit-or-tcxrichedit-during-de

2条答案

按热度按时间

u5i3ibmn1#

IMO这是不可能在设计时添加格式化文本的。
您可以在运行时加载它：

RichEdit1.Lines.LoadFromFile(FileName);

赞(0）回复(0）举报 2022-12-23

2nc8po8w2#

我同意@fpiette的观点，不可能在设计时将格式化的文本加载到TRichEdit中，但可以在设计时将其添加到项目中，并在运行时将其加载到TRichEdit中。
您可以将.rtf文件添加为RCDATA资源，然后加载它，例如，在创建窗体期间：

procedure TMainForm.FormCreate(Sender: TObject);
var
  LRes: TResourceStream;
begin
  LRes := TResourceStream.Create(HInstance, 'DOCUMENT', RT_RCDATA);
  try
    RichEdit1.Lines.LoadFromStream(LRes);
  finally
    LRes.Free;
  end;
end;

赞(0）回复(0）举报 2022-12-23

我来回答

如何在设计时将富格式文本分配给 Delphi TRichEdit或TcxRichEdit(可能使用Lines属性)？

2条答案

相关问题

热门标签

最新问答