

/*!
	@brief  ネットワーク端末のアドレスを表します。
	@author OverTaker
	@date   2008/10/08
*/



Namespace System
Namespace Net

Class EndPoint
	socketAddress As SocketAddress
Public

	/*!
	@brief  SocketAddressクラスから作成する
	@param  SocketAddressクラス
	@return SocketAddressを元に作成したEndPoint
	*/
	Static Function Create(address As SocketAddress) As EndPoint
		Dim point = New EndPoint
		point.socketAddress = address
		Return point
	End Function

	/*!
	@brief  アドレスファミリを取得する
	@return アドレスファミリ
	*/
	Function AddressFamily() As Sockets.AddressFamily
		Return socketAddress.AddressFamily
	End Function
End Class

End Namespace
End Namespace