將格式化的文本從SQL追加到TRichEdit

Question

您能解決這個問題嗎？ 如何將數據庫字段中的格式化txt附加到TRichEdit？

為了澄清一下：我需要獲取2個具有格式化文本（RTF）的數據庫字段的內容，並將它們放入TrichEdit中以保留格式。 我使用MSSQL Express，並且將字段設置為ANSI格式的TEXT。

好的，這很好用：

  tmp := tblCases.FieldByName('Field1').AsString;
  str := tblCases.FieldByName('Field2').AsString;
  delete (tmp,LastDelimiter ('}',tmp),1);
  delete (str,1,1);
  ms := TStringStream.Create (tmp+ AnsiSTRing (#13#10)+str);
  ms.Position :=0;
  DBDX.Lines.LoadFromStream(MS);
  ms.Free;

Answer 1

為了合並2個RTF字段，我刪除了第一個的最后一個}和第二個的第一個括號，從而創建了一個字符串。 然后使用TstringStream粘貼到TrichEdit中。 請參閱上面的更新代碼。