Grid1 Grid2 >>Childkey textvalue Parentkey Textvalue >>x1 val1 x2 cval1 >>x2 val2 x2 cval2 >>x3 val3I want to drag&drop cval2 on to x3,val3 row. How do I ? I came to a point where I could do it by getting "current" row dropped on to (I mean grid1.dragdrop fires but not grid1.columns(x).controls(y) which is the reverse of online doc says). It seems that textbox in a grid doesn't support dragmode=Automatic. Am I missing something ? Any suggestion saving my brain cells are wellcomed. TIA.
*DragOver LPARAMETERS oSource, nXCoord, nYCoord, nState lnVerticalBarEnd = iif(this.scrollbars = 3,this.height-sysmetric(8),this.height) llOnTopScrollArrow = between(nXcoord-this.left, this.width-sysmetric(5), this.width) ; and between(nYCoord-this.top, 0, sysmetric(6)) llOnBottomScrollArrow = between(nXcoord-this.left, this.width-sysmetric(5), this.width) ; and between(nYCoord-this.top, ; lnVerticalBarEnd - sysmetric(6), ; lnVerticalBarEnd) if llOnTopScrollArrow this.DoScroll(0) && Use scrollarrows to scroll via emulation endif if llOnBottomScrollArrow this.DoScroll(1) endif this.setfocus() && Couldn't get rid of this one * DragDrop LPARAMETERS oSource, nXCoord, nYCoord nNewRow = int((nYcoord - this.headerheight - this.top)/this.rowheight)+1 this.activatecell(nNewRow,3) && 3 for now instead of activecolumn thisform.text1.value = customer.cust_id && Rest are test textboxes to see thisform.text2.value = oSource.value && if target & source have true values thisform.text1.refresh thisform.text2.refreshCetin