疑难杂症 delphi Socket api Send 整型值

[hljandasunyu]

1、我用Socket api 开发一个程序，当客户端send一个整型值，例如50000，服务器端用4位缓冲接收后这个整数值的内容为 'P',#195,#0,#0 ，请问专家在服务器端怎样处理将这个值转换为 50000？
2、客户端向服务器发送数据时（两台主机），第一次服务器端接收的内容总是不正常的数据，以后每次都是正常的，为什么？

[hljandasunyu]

有高手在吗？自己先顶一下。

[僵哥]

var
  s: string;
begin
  s := 'P'#195#0#0;
  ShowMessage(IntToStr(PInteger(PChar(s))^));
end;