Does this mean that you now think a Class based on Form will satisfy your needs? If not, I am afraid I don't understand what the limitations of the Form class are.
Hilmar.
>It does work! Sorry for the confusion.
>
>>>You can use CreateObject() at any moment.
>>
>>Check the following code:
>>
>>x=createobject('login')
>>x.show()
>>debug
>>read events
>>
>>define class login as form
>> frmDM = null
>> procedure init
>> frmDM = createobject('datamanager')
>> endproc
>>enddefine
>>
>>*-- business object
>>define class datamanager as form
>> datasession = 2
>> visible = .F.
>>enddefine
>>
>>*--- this works though but this is not how I need it to be (not encapsulated)
>>y=createobject('datamanager')
>>x=createobject('login')
>>x.show()
>>debug
>>read events
>>
Difference in opinions hath cost many millions of lives: for instance, whether flesh be bread, or bread be flesh; whether whistling be a vice or a virtue; whether it be better to kiss a post, or throw it into the fire... (from Gulliver's Travels)