FWIW, here is the Xbase++ class hierarchy: http://www.xbaseprogrammer.com/ClassHierarchy.cgi
Brgds, Viktor On Sun, Jun 21, 2009 at 12:17 PM, Przemyslaw Czerpak <[email protected]>wrote: > On Sun, 21 Jun 2009, Pritpal Bedi wrote: > > Hi > > > XbpSLE is cast message. It returns special pseudo object > > ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ > > How I can retrieve this pseudo object? > > I need value of a property in the XbpComboBox():new() itself > > of the instance respresenting XbpSLE(). > > Such instance does not exists. Part of area (instance variables) inside > oXbpComboBox belongs to XbpSLE. But it's inside one object. There is > no separate copy of this object with only XbpSLE() ivars. > Cast messages informs only compiler/vm that part of instance are inside > oXbpComboBox should be unconditionally used. > > > Now I have resolved it like this ( not an elegant solution ) > > ******************************************* > > CLASS XbpComboBox INHERIT XbpSLE, XbpListBox > > DATA type INIT > XBPCOMBO_DROPDOWN > > ........ > > > > DATA oSLE > > ACCESS XbpSLE INLINE ::oSLE > > DATA oLB > > ACCESS XbpListBox INLINE ::oLB > > ENDCLASS > > > > METHOD XbpComboBox:create( oParent, oOwner, aPos, aSize, aPresParams, > > lVisible ) > > ::xbpWindow:create( oParent, oOwner, aPos, aSize, aPresParams, > lVisible ) > > ::oSLE := XbpSLE():new():create( oParent, oOwner, aPos, aSize, > > aPresParams, lVisible ) > > ::oLB := XbpListBox():new():create( oParent, oOwner, aPos, aSize, > > aPresParams, lVisible ) >
_______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
