EUC→sjis変換

解決

take  2010-01-10 16:22:28  No: 36912  IP: 192.*.*.*

D7Pro+XP
お世話になります。
タイトル通りの変換を行いたいのですがご助言お願い致します。
EucToSJisなる関数がいくつかヒットしましたがその利用方法がさっぱりでした。

編集 削除
なな  2010-01-10 17:29:01  No: 36913  IP: 192.*.*.*

「Delphi  EUC  SJIS  変換」で検索するとそのものずばりのコードがありますが・・・

編集 削除
Mr.XRAY  2010-01-10 17:47:45  No: 36914  IP: 192.*.*.*

こんにちは．Mr.XRAYです．

https://www.petitmonte.com/bbs/answers?question_id=6715

ここのスレッドの
Mr.XRAY 2010/01/10(日) 16:11:35 の書き込みに文字コード変換convertのリンクがあります．
参考にしてください．

{euc -> sjis コンバート}
function euc2sjis( const s: string ): string;

が利用てきるかも知れません．

編集 削除
Mr.XRAY  2010-01-10 17:51:55  No: 36915  IP: 192.*.*.*

もし，文字列単位ではなく，文字単位でしたら，既にレスがあるように
「Delphi  EUC  SJIS  変換」をgoogleで検索した時の最初のサイト

http://homepage1.nifty.com/project21/articles/delphi/tips03.htm

が参考になるでしょう．

編集 削除
take  2010-01-15 13:05:23  No: 36916  IP: 192.*.*.*

>ななsan
検索した上で見つけたソースが理解できなかった＆コピペでは希望の動作を
実現できなかったのでここを利用させてもらったんですがね・・・

>Mr.XRAYsan
euc2sjisで大方巧くいきました。
何故だか改行コードは「・」で残ってしまいましたが
勉強もかねていろいろ触ってみたいと思います。
ありがとうございました。

編集 削除
それなら  2010-01-15 13:11:21  No: 36917  IP: 192.*.*.*

>検索した上で見つけたソースが理解できなかった＆コピペでは希望の動作を
>実現できなかったのでここを利用させてもらったんですがね・・・
最初にその希望の動作を書くべきでしょう。
言葉足らず、情報不足の質問はいたずらに解決を遅らせるだけ。

編集 削除
take  2010-01-17 18:03:49  No: 36918  IP: 192.*.*.*

本分より引用
>EucToSJisなる関数がいくつかヒットしましたがその利用方法がさっぱりでした。

では言葉足らずですか・・・
そりゃ失礼しました。

編集 削除