ユーザーがアプリケーション内に表示されるエラー メッセージをフォーマットおよび表示できるようにする Richedit があります。
ここで、トラブル チケット システムが使用する別のデータベースに、テキストのみ (フォーマットなし) をエクスポートできるようにする必要があります。
考えられるすべての PlainText の組み合わせを試しましたが、常に rtf 形式になっています。
テキストのみを取得するにはどうすればよいですか?
書式なしテキストを取得するには、単に。を使用しますRichEdit1.Text
。
あなたが尋ねた直接の質問に答えて、Text
プロパティはまさにあなたが探しているものです。何らかの理由でドキュメントには表示されませんTRichEdit
が、から継承されTCustomEdit
ます。
私には(アンドレアスの答えに対するコメントに続いて)、あなたが本当にそれをする必要があるのは次のように聞こえます:
RichEdit.LoadFromStream
そのストリームを通過する呼び出し、確認しPlainText
てFalse
ください。RichEdit.Text
次に、フォーマットされていないテキストを取得するために読んでください。現時点では、RTFをプレーンテキストとしてコントロールに配置しているだけです。リッチテキストとしてコントロールに入れる必要があり、そのためにはが必要LoadFromStream
です。
この方法を使用して、フォーマットされていないテキストを取得します
procedure TMainForm.O1Click(Sender: TObject);
begin
if sOpenDialog1.Execute then
sRichEdit1.Lines.LoadFromFile(sOpenDialog1.FileName);
sMemo1.Text := sRichEdit1.Text;
sRichEdit1.Clear;
sRichEdit1.Text := sMemo1.Text;
ファイルを保存するには、選択する必要があります.txtとしてテキストをメモに保存しますが、行ったすべての変更はリッチエディットのみになるため、すべての変更が完了したらテキストをメモに移動してメモから保存する必要があります
.rtf として保存するだけで、richedit から保存できます。