Xbase++ Callback Slot
Verfasst: Sa, 09. Okt 2010 9:37
hi,
alle XbParts, welche XbpWindow() als Superclass haben, besitzen dieCallback Slots
nun habe ich bei M$ MsComCtl.OCX aber OLE Methoden wie
wie richte ich nun, analog zu XbParts "Standard", meine DLL/LIB um damit ich die mit Xbase++ wie "gewohnt" nutzen kann ?
:dragDrop ist doch eine Property welche ich mit einem Codeblock auffülle.damit hätte ich nun die "Zuweisung" des Codeblock, aber "wann" und "wie" EVAL(bCodeblock) ich ihn ?
auch gibt Xbase++ ja einen Event zurück für die Aktion z.b. xbeP_DragDrop
müsste ich das EVAL() mit einem PostAppEvent(Userdef) einleiten ?
alle XbParts, welche XbpWindow() als Superclass haben, besitzen die
Code: Alles auswählen
:dragDrop := {| aState, oDragData, self | ... } --> nAction
:dragEnter := {| aState, oDragData, self | ... } --> nAction
:dragMotion := {| aState, uNIL, self | ... } --> nAction
:dragLeave := {| uNIL1, uNIL1, self | ... } --> self
nun habe ich bei M$ MsComCtl.OCX aber OLE Methoden wie
Code: Alles auswählen
METHOD XbpListView:_OLECompleteDrag(nEffect)
METHOD XbpListView:_OLEDragDrop(oData,nEffect,nButton,nShift,nx,ny)
METHOD XbpListView:_OLEDragOver(oData,nEffect,nButton,nShift,nx,ny,nState )
METHOD XbpListView:_OLEStartDrag(oData, nEffect)
:dragDrop ist doch eine Property welche ich mit einem Codeblock auffülle.
Code: Alles auswählen
VAR dragDrop // Xbase++
VAR x_dragDrop // Gets or sets the text associated with this control.
ASSIGN METHOD _dragDrop() VAR x_dragDrop
METHOD HX_XXXXX:Create()
//
// after create ?!
//
// ASSIGN METHOD "transfer" data
//
::x_dragDrop := ::dragDrop
auch gibt Xbase++ ja einen Event zurück für die Aktion z.b. xbeP_DragDrop
müsste ich das EVAL() mit einem PostAppEvent(Userdef) einleiten ?