`TTypedName`
pt		InitServerData
pt		Get_ObjectName
pt		Set_ObjectName
pt		Get_Level
pt		Set_Level
pt		Get_Interval
pt		Set_Interval
		Create
		Destroy
		Connect
		ConnectTo
		Disconnect

`TOleServer`
		GetServer
		InitServerData
		Create
		Connect
		Disconnect