You can subclass Winsock control aslo. Something like

oForm = CREATEOBJECT("Form")
oForm.ADDOBJECT("oWS", "myWinSock")
myip = oForm.oWs.localip
oForm = Null
...
RETURN 

DEFINE CLASS myWinSock AS olecontrol
	OleClass = "mswinsock.winsock.1"
ENDDEFINE

>hi sergey, i've downloaded and installed SP5. i can use foxtray.ocx and marchoso.ocx on user's machine.
>
>but i have one problem, i have this in my main.prg
>
>

>if pcmode = "ip"
>	local myip
>	ows = createobject("mswinsock.winsock.1")
>	myip = ows.localip
>	ows=.null.
>	return myip
>endif
>

>
>how can i apply the Thisform.NewObject('LV1','OC1', 'OCTest.vcx') in this case?
>
>should i add microsoft winsock 6.0 in my class too?
>
>pls help me.