掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
外字の判別について (ID：45299)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Novさん ありがとうございます。 外字のコード範囲で削除しようと思いまして、 調べていたのですが、以下のようにVB等はよく見つかるのですが、 http://okwave.jp/qa/q691058.html 色々調べて羽織るんですが、Delphiのサンプルが見つからず、 どのようにしたら良いのかわからないもので。。 takeさん ありがとうございます。 ダブルクォーテーションで囲む案は今から試してみます。 ありがとうございます。 以下、状況説明です。 元になるファイルは固定長のテキストファイルです。 CSVファイルと書きましたが、間違えです。すいません。 var InputTextFile:TextFile; InputFileName:string; stWriter:TStreamWriter; enc:TEncoding; str_r,str_o:AnsiString; begin AssignFile(InputTextFile,'C:\aa.txt'); Reset(InputTextFile); enc:=TEncoding.GetEncoding(932);//Shif-Jis指定 stWriter:=TStreamWriter.Create('C:\aa.csv',false,enc); while Eof(InputTextFile) = false do begin Readln(InputTextFile,str_r); str_o:=Trim(Copy(str_r,1,10));//ここで外字が入っていた場合に、正常に作成できません。 //StringReplace(str_o,',', '',[rfReplaceAll]);//ダメでした。 stWriter.WriteLine(str_o); end; CSVを開いた時に、 見た目上でたまたまカンマになっているのでしょうか。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.