string型にバイナリ値をセットして送信したい

解決

OJ  2006-11-09 16:30:52  No: 23861  IP: 192.*.*.*

delphi6でstring型のバッファにバイナリ値をセットして送信すると、
バイナリ値が１バイト→４バイトに変換されてしまいます。
バイナリのビットパターンをそのまま送信するにはどうすれば良いの
でしょうか？教えてください。

var
   Csum : String;
   Str1,Str2 : String;
begin
     Str1 := 'ABCDEF';  //値は何でも良い
     Str2 := '012345';
     Csum := StringOfChar('0', 2);
     Csum[1] := #202;
     Csum[2] := #238;  //Csum=CAEE  (16進)

     TIdPeerThread.Connection.Write((Str1+Csum+Str2);

で送信した結果は、
      414243444546FFFFFFCAFFFFFFEE303132333435(16進) 

となってしまいます。
      FFFFFFCA → CA
      FFFFFFEE → EE
にしたいのですが、良い方法を教えてください。

編集 削除
OJ  2006-11-10 08:34:59  No: 23862  IP: 192.*.*.*

自己解決いたしました。お騒がせして申し訳ありませんでした。

編集 削除