簡易暗号化で文字化け (ID:32092)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 かなり以前に某所で教えていただいた簡易暗号化復号化ルーチンを 使って、短い文字列を暗号化したり復号したりしているのですが 特定の文字で、うまく複合化できません。 function Endecode(Str: string): string; var P: PChar; i: Integer; begin Result := ''; P := PChar(Str); for i := 0 to Length(P) - 1 do begin Result := Result + Chr(Ord(P[i]) xor 23); end; end; Strに、例えば「ド」とか「帯」を入れて暗号化すると 複合化した際に「乏」という字になってしまいます。 なぜこうなるのか関連性がわからなくて、困っています。 よろしくお願いいたします。