Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Column Moved or Resized - How to know?
Message
 
 
À
12/01/2010 19:24:59
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP2
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01443558
Message ID:
01443591
Vues:
29
>I was able to tackle my problem. Some columns already got a new header. But now I give ALL columns a new header. That new header contains some code for refreshing other objects on the form. The biggest problem remaining is that it takes a double for/next routine to retrieve the LEFT of the header/column. And this routine must be done each time that the user clicks on a header.
>
>Perhaps this routine can be done less times if we can distinguuish between a simple click and a move click. Any idea is welcome.

Yes, look closer at this code
	procedure mousedown
>>	lparameters nButton, nShift, nXCoord, nYCoord
>>
>>	with this
>>* initialize items that will be tested in MouseUp
>>		.mnColumnOrder = this.parent.columnorder
>>		.mnColumnWidth = this.parent.width
>>		.nOriginalForeColor=.ForeColor
>>	endwith
>>endproc
>>
>>	procedure mouseup
>>	lparameters nButton, nShift, nXCoord, nYCoord
>>
>>	with this
>>* check to see if this was a resize or move
>>		.mlColumnMoved = ( this.parent.columnorder != .mnColumnOrder )
>>		.mlColumnSized = ( this.parent.width != .mnColumnWidth )
>>*		.ForeColor=.nOriginalForeColor				    	
>>	endwith
If it's not broken, fix it until it is.


My Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform