Mover un formulario sin agarranlo por la barra de titulo Para realizar este ejemplo agreguémosle al formulario las propiedades ejex, ejey, mdown. En el evento MouseMove del form agregamos lo siguiente With thisform If thisform.MDown Then ThisForm .Left = ThisForm .Left + nXCoord - .ejex ThisForm .Top = ThisForm .Top + nYCoord - .ejey EndIf EndWith En el evento MouseDown del form agregamos lo siguiente ThisForm.MDown = .F. En el evento MouseDown del form agregamos lo siguiente Thisform.MDown = .T. Thisform.ejex = nXCoord Thisform.ejey = nYCoord