This procedure queries the TCP/IP address space to determine whether the HostAddress is one of the addresses recognized for this host. If the address is local, it returns OK. If the address is not local, it returns NONlocalADDRESS. Figure 1 shows an example.
procedure IsLocalAddress
(
HostAddress: InternetAddressType;
var ReturnCode: integer
);
external;
For a description of Pascal return codes, see Table 1.