Ok. I found in source
BusinessBindingSource.vb
Private Function CreateShareAndAddBusinessObject(ByVal index As Integer) As BusinessLayer
'-- Create a new object
Dim loReturn As BusinessLayer = CType(Activator.CreateInstance(Me._BusinessObject.GetType()), BusinessLayer)
'-- Share the table
Me._BusinessObject.ShareCurrentDataTable(loReturn)
'-- Set the parent business object of the instance object
loReturn.ParentBusinessObject = _BusinessObject.ParentBusinessObject
'-- Add the object to the list
Me._BusinessObjectList.Add(index, loReturn)
'-- Return the new object
Return loReturn
End Function
HERE.. I WANNA have a HOOK like RaiseEvent CustomizeMyBusinessObject(loReturn)
and there.. in BBS.CustomizeMyBUsinessObject I can make
Public Sub CustomizeMyBusinessObject(ByVal toReturn as BusinessLayer) Handles BBS.CustomizeMyBusinessObject
Dim loBO as MyBO = TryCast(toReturn, MyBO)
loBO.myParentBO = BO2
loBO.myAnotherBO = BO3
That could be a solution for me and Now last question
It is possible to make without modification in StrataFrame source code? Somewhere in subclasses...