delphi的tserversocket控件怎么接收16进制数

delphi的tserversocket控件如何接收16进制数
对方客户端发送数据如：68 00 00··········；接收完成后，数据长度没错（13），但是显示接收结果时，只显示一个字母h（68的字符表示），后面一连串的都显示不出来了（00没有对应字符，问题应该是在这）。请问一下，我要怎么样才能完整把我接收到的数据显示出来呢 Delphi serversocket 16进制
[解决办法]
procedure TMAINFORM.TCPServer1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
var
  iLength,I，iStart, iRevCount: Integer;
  iReceived: Integer;
  buff: array of byte;
  S:STRING;
begin
   S:='';
   iStart := 0;
   iLength:= Socket.ReceiveLength;
   iRevCount := iLength; //这里加入的
    SetLength(buff, iLength);
    MEMO1.Lines.Add(INTTOSTR(ILENGTH));
   while iLength>0 do
   begin
     iReceived := Socket.ReceiveBuf(buff[iStart], iLength); //这里修改了注意
      iStart := iStart + iReceived ; //这里加入的
     iLength := iLength - iStart;
   end;
   //下面你的iLength 使用 iRevCount 替换了
   FOR I:=0 TO iRevCount -1 DO
     BEGIN
       S:=S+INTTOSTR(BUFF[I]);
     END;
   MEMO1.Lines.Add(S);
   buff:= nil;
end;