保存形式について

解決


かめ  2005-12-21 20:55:03  No: 19352

D2005のWin32でエディタを作成しています。
SaveDialogで保存するために記述しています。
しかし、さくせいされたエディタ上で

\documentclass{jarticle}
\begin{document}
かめ。
\end{document}

と記述して保存しても、Windowsのメモ帳で開けると

{\rtf1\ansi\ansicpg932\deff0\deflang1033\deflangfe1041{\fonttbl{\f0\fnil Tahoma;}{\f1\froman\fprq1\fcharset128 MS UI Gothic;}}
\viewkind4\uc1\pard\lang1041\f0\fs16\\documentclass\{jarticle\}
\par \\begin\{document\}
\par \f1\fs18\'82\'bf\'82\'e5\'82\'c1\'82\'c6\'83\'60\'83\'46\'83\'62\'83\'4e\'81\'42
\par \\end\{document\}\f0\fs16 
\par }

と表記されてしまいます。
SaveDialogのFilterプロパティは
LATEXファイル(*.tex)|*.tex
TXTファイル(*.txt)|*.txt
にしていて、

プログラムは以下です
//名前を付けて保存する
procedure TForm1.FileSaveAsClick(Sender: TObject);
begin
  if SaveDialog1.Execute = True then
    begin
    if SaveDialog1.FilterIndex = 1 then
      begin
        RichEdit1.Lines.SaveToFile(SaveDialog1.FileName+'.tex');
        Form1.Caption := SaveDialog1.FileName+'.tex';
        L := SaveDialog1.FileName+'.tex';
      end;
    if SaveDialog1.FilterIndex = 2 then
      begin
        RichEdit1.Lines.SaveToFile(SaveDialog1.FileName+'.txt');
        Form1.Caption := SaveDialog1.FileName+'.txt';
      end;
    end;
end;

もちろん、txtファイルで保存しているのですがそのまま表記してくれません。
検索でエンコードなどを調べてみたのですが解決の糸口がつかめない状態です。
助言いただけないでしょうか。


にしの  2005-12-21 20:57:23  No: 19353

TRichEditを使用していますね。
D2005のプロパティはよくわかりませんが、D7と同じであれば、PlainTextプロパティをヘルプで参照してください。


かめ  2005-12-21 21:03:52  No: 19354

さっそくの解答ありがとうございます。
ものすごく簡単なことだったのですね、まったく違うところいつまでもいじっていました…。
本当にありがとうございます。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加