一个数据类型的强制转换问题！！

Question

如何将一个句柄类型转换成Integer类型或者一个Pchar类型呢？？
是这样的：
我定义了一个TSOCKET类型的变量。
sck：TSOCKET;
sck:=socket(AF_INET,SOCK_STREAM,0);
如何将这个变量sck转换成一个Integer和Pchar类型的值呢？？

Answer 1

TSOCKET本来就是Integer类型u_int = Integer;
TSocket = u_int;

Answer 2

procedure TForm1.btn1Click(Sender: TObject);
var
  saddr: integer;
  s: string;
  pc: pchar;
begin
  s := 'hello world';
  saddr := integer(s);
  pc := ptr(saddr); // 将数值转为地址。
  showmessage(pc);
  pc := addr(s[1]); // 取得变量地址。string类型的第一个字节地址。
  showmessage(pc);
end;