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ファイルで保存しているのですがそのまま表記してくれません。
検索でエンコードなどを調べてみたのですが解決の糸口がつかめない状態です。
助言いただけないでしょうか。
TRichEditを使用していますね。
D2005のプロパティはよくわかりませんが、D7と同じであれば、PlainTextプロパティをヘルプで参照してください。
さっそくの解答ありがとうございます。
ものすごく簡単なことだったのですね、まったく違うところいつまでもいじっていました…。
本当にありがとうございます。
ツイート | ![]() |