SOCKADDR_IPX = packed record
  sa_family: u_short;
  sa_netnum: Array [0..3] of Char;
  sa_nodenum: Array [0..5] of Char;
  sa_socket: u_short;
  end;