FiveTech Software tech support forums

... := { |nRow,nCol,nKeyFlags| ; SetDropInfo( {oBrw:nColSel, oBrw:nArrayAt, "B1"} ), oWnd:SetMsg("Dragging") } oBrw:bDropOver := { |uDropInfo, nRow, nCol, nKeyFlags | ; DragDrop(uDropInfo,nRow,nCol,nKeyFlags,oBrw,oBrw2) } oBrw2:bDragBegin := { |nRow,nCol,nKeyFlags| ...

I have tried this with \fwh\samples\testxbr3.prg. Set bDragBegin in one MDI Child and bDropOver in another MDI Child. It is working fine for me.

Can you post a small sample to reproduce the problem?

... TWBrowse():lHScroll:= .F. @ 6, 2 LISTBOX Brw1 ; FIELDS "" ; ALIAS (CALIAS) ; OF oWndChild ; UPDATE Brw1:SetCols( bro_campo, bro_subtit) Brw1:bDropOver = { | uDropInfo, nRow, nCol, nKeyFlags | ; Brw1:Add( uDropInfo ), MsgBeep() } Brw1:lCellStyle = .T. Brw1:lAutoEdit = .T. Brw1:lAutoSkip = ...

Mr Antonio I am trying to use the nRow, nCol parameters of bDropOver block when drop occurs on a window. Naturally I expected that the nRow,nCol refer to the destination window. It is not the case. I found that they are not even Screen Coordinates. On ...

We could control that behavior from the MouseMove() method.

We need to check the object that it is below the mouse, and if it is a FWH object, and then check its bDropOver codeblock contents.

... In the programs we develop with FW, the drag cursor looks the same even when it is moved over windows ( controls ) which do not accept drop. ( bDropOver data is nil ). Is it possible for the Window class's method MouseMove examines the cursor, and if it is a drag cursor originating from some ...

Hola,

Tengo 2 ventanas mdi y en cada una un browse. a los cuales les tengo permitido el arrastrar y soltar.

Lo que quiera es controlar en que fila del browse se suelta el botón, ya que la variable nRow que se carga en bDropOver cambia dependiendo de donde se encuentre la ventana.

... ; HEADERS "Name" ; FIELDSIZES 140 ; SIZE 140, 60 ; OF oFld:aDialogs[ 2 ] oBrw1:oDragCursor := oCursor oBrw2:oDragCursor := oCursor oFld:bDropOver = { |uDropInfo,nRow,nCol,nKeyFlags|ShowPos( nRow, nCol, oFld ) } ACTIVATE DIALOG oDlg CENTERED return nil //----------------------------------------------------------------------------// ...

... ; HEADERS "Name" ; FIELDSIZES 140 ; SIZE 140, 60 ; OF oFld:aDialogs[ 2 ] oBrw1:oDragCursor := oCursor oBrw2:oDragCursor := oCursor oFld:bDropOver = { |uDropInfo,nRow,nCol,nKeyFlags|ShowPos( nRow, nCol, oFld ) } ACTIVATE DIALOG oDlg CENTERED return nil //----------------------------------------------------------------------------// ...

Why does oFld:bDropOver return a different value for nCol if you drop on the same point depending from nLeft of the object (here from xBrowse) you drag from? How could I find out on what folder you drop? oFld:bDropOver = { |uDropInfo,nRow,nCol,nKeyFlags| ...

Could someone show me what I am doing wrong that oSay drag doesn’t fire a oWnd:bDropOver? // FiveWin - own Drag&Drop new features !!! #include "FiveWin.ch" static oWnd //----------------------------------------------------------------------------// function ...

... oLbx VAR cItem ; ITEMS { "I am a listbox!","Apples", "Oranges", "Lemons", "Limes" } SIZE 200, 200 // Set a DropOver action for the ListBox oLbx:bDropOver = { | uDropInfo, nRow, nCol, nKeyFlags | ; msginfo(uDropInfo),msginfo(str(nRow)+" " + str(nCol) + " " + str(nKeyFlags)) } ACTIVATE WINDOW ...

... := { |nRow,nCol,Flags,Self| SetDropInfo( right(Eval( oBrw:aColumns[ oBrw:nAtCol( nCol ) ]:bData ),10)+ ; Eval( oBrw:aColumns[ 2 ]:bData ) ) } oBrw:bDropOver := { |uDropInfo,nRow,nCol,nKeyFlags| if(uDropInfo<>nil, ( MoveRms( uDropInfo+str( Int((nRow-25)/20),3 ), oBrw ) ), ) } *Now I use this* ...

... } //msginfo("TGET") } // oBtn4:bDragBegin = { || laclase := "GROUP" } //msginfo("TSSAY") } // ACTIVATE DIALOG oDlgt NOWAIT // oBar1:Float() oWndr:bDropOver = { || AddGet(aGets,Dblclick) } Func GraoWnd(oWnd,donde,oScroll) Local j,control,aRect,coor:="" //oScroll:HScrollTrack(0) ;oScroll:VScrollTrack(0) ...

... el wBrowse de Hernan y lo defino en un archivo RC. Estoy simplemente mostrando un mensaje al hacer el drop pero, aun asi no funciona : oLbxDocto:bDropOver := { || MsgAlert("Drop") } Gracias