AIP.FullAddr := ANetCalc.NetworkAddress.AsDoubleWord AND
    ANetCalc.NetworkMask.AsDoubleWord;