Information générale
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Adding movable fields to formset page
Versions des environnements
Hi all,
We have some code set up to place a movable field on a formset page. It places the textbox and a caption. The textbox is created from a class we created called "mobilebox" and the caption is create from a class we created called "mobilelbl."
The fields are placed on a page tab within a form within a formset. The caption is movable. The textbox isn't. When we did this on a single form WITHOUT a formset, it worked just fine with both the caption and the label moving.
Here is some of the code that's found within both mobilebox and mobilelbl:
Mousemove procedure:
LPARAMETERS nButton, nShift, nXCoord, nYCoord
IF nButton = 1
Thisformset.Xoffset = nXCoord - THIS.Left
Thisformset.Yoffset = nYCoord - THIS.Top
ENDIF
DragDrop procedure:
LPARAMETERS oSource, nXCoord, nYCoord
THIS.Parent.DragDrop(oSource, nXCoord, nYCoord)
And on the current tab of the pageframe where we're adding the field and caption:
DragDrop procedure:
LPARAMETERS oSource, nXCoord, nYCoord
oSource.left=nXCoord-thisformset.xoffset
oSource.top=nYCoord-thisformset.yoffset
Is there something we should be looking for, or is it some kinda strange thing within VFP that captions can be dragged within formsets but textboxes can't?
Thanks!
John
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement