>Check "Fun with OLE drag and drop" in Solution samples.
>Is that what you want?

Not exactly... AFAIK... We can't control the object to move only in horizontal way
>
>>Hi...
>>
>>I'm using a container with width = 4000.. inside of other one of width=500px and by the press of mouse I'm moving across X axys using the follow routine:
>>
>>Sometime this routine behaves weird (no response) and heavy... And I'd like to know if someone know or could point me what could I change to use this smartier than that...
>>
>>TIA.. Claudio
>>
>>

procedure mousedown
>>LPARAMETERS nButton, nShift, nXCoord, nYCoord
>>Local lnOldPos, ;
>>    lnAvgCharWidth, ;
>>    lnMinPos, ;
>>    lnMaxPos, ;
>>    lnCurPos, ;
>>    lnParentLeft
>>lnAvgCharheight      = FONTMETRIC(1)
>>lnAvgCharwidth       = FONTMETRIC(6)
>>lnParentLeft         = this.otimeline.top
>>lnMinPos             = (this.width-This.otimeline.width-2)
>>lnMaxPos             = 3
>>lnCurPos             = this.otimeline.top
>>lnCurPosy            = Mrow(thisform.name, 3)
>>lnCurPosx            = Mcol(thisform.name, 3)
>>lnCurINIy            = Mrow(thisform.name, 3)
>>lnCurINIx            = Mcol(thisform.name, 3)
>>lnrowini             = this.otimeline.top
>>lncolini             = this.otimeline.left
>>
>>Do  WHILE MDOWN() 
>>    This.otimeline.Move(MAX(lnMinPos, MIN(lnCurPosx, lnMaxPos)),lnParentLeft)
>>    lnCurPosx = lncolini + ( Mcol(thisform.name, 3) - lnCurINIx )
>>Enddo
>>endproc