SOCKADDR_IN6_OLD = packed record
  sin6_family: Smallint;
  sin6_port: u_short;
  sin6_flowinfo: u_long;
  sin6_addr: IN_ADDR6;
  end;