遠藤です。

Tue, 12 Sep 2006 23:50:58 +0900 に、
とみたまさひろ <tommy@xxxxxxxxxx> さんは書きました:

> 現象から判断すると、Delphi が SJIS であることを認識できておらず、
> 0x5c(\)をエスケープしようと余計なことをしているように思えます。

いえいえ。Delphi「は」そんな事しません。

procedure TForm1.Button1Click(Sender: TObject);
var
  str: String;
  i: integer;
begin
  str := '十\';

  Edit1.Text := '';
  for i := 1 to length( str ) do
  begin
    Edit1.Text := Edit1.Text + IntToHex( ord(str[i]), 2 ) + ' : ';
  end;
end;

これでボタンをぽちっとすると、Edit には
8F : 5C : 5C : 
と表示されます。

str := '十\'; を str := '十';
とすると
8F : 5C : 
と表示されます。
# ちなみに試したコードは Delphi2005 です。このマシンには
# 5 か 2005 しか無かった。2005 は重い(T_T)

なので、Delphi ではなく、そこから先が何かやっているので
あろうと。
おそらく、サードパーティーのコンポか、あるいは、そのコン
ポが使っているであろうライブラリか。
あるいは、サーバか。

> # MySQL 4.0 は文字コードの自動変換がないので話が簡単で良いなぁ :-)

そーなんでしたっけ？(^^;
その辺からごちゃごちゃしてませんでした？
あ、あれは 4.1 でしたっけか？(^^;

--
えんどう＠あっぷらぼ
mail: endo@xxxxxxxxxx, endo_t@xxxxxxxxxx, endo@xxxxxxxxxx
http://www.applabo.com/
http://homepage1.nifty.com/EndoT/