>>You have to subclass control visually or you'll get error in runtime. See BUG: License Error with ActiveX Control Added at Run-Time mskb #192693.
>>
>>>define class aWinsock as OleControl
>>>oleclass = 'Mswinsock.winsock'
>>>
>>>How can I subclass in that way my own class that is based on MS winsock already?
>Right, I did subclass it manually.
>But now I want to define another class based on it.

See Hugo's response. You just need to specify the classlibrary file.