掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Unicodeテキストファイルについて (ID：48079)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんにちは。 テキストファイルでは問題ないのですが Unicodeテキストファイルを ReadLn関数で一行読み込むと 文字化けしています。 以下が異常な値が取得されるコードです。 ************************************ procedure TForm1.Button1Click(Sender: TObject); var FName: String; LoadText: String; ltf: TextFile; begin // テキストファイル読み込み AssignFile( ltf, 'C:\TEMP\TEST.INI'); Reset(ltf ); while not Eof(ltf ) do begin Readln(ltf, LoadLine ); end; CloseFile(ltf ); end; ************************************ Unicodeテキストファイルはテキストファイルと同じ関数では読めないのでしょうか。 Delphi XE5 Windows 8.1
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.