Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Equivalent of AfterRowColChange in List Boxes
Message
De
14/10/2008 05:55:37
 
 
À
14/10/2008 00:08:02
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Vista
Network:
Windows 2008 Server
Database:
MS SQL Server
Divers
Thread ID:
01354517
Message ID:
01354779
Vues:
18
Thanks Matt. I think I have to move on now but I'll take a look at that functionality for future use. The client has already been shown screen shots of a mover list so I think I have to proceed on that basis.

>I use this technique to do moving in a grid-based scenario... Outside of the grid, place two command buttons with this code shown below (make necessary modifications) :
>
>cmdUpButton.Click()
>
>Local nRecno, cTable, cField, cRef, cTest
>
>cTable=(thisform.table)
>cField='Order'
>cRef=cTable+'.'+cField
>cTest='part_files.ifkey==parts.ipkey'
>nRecno=recno()
>
>Select(cTable)
>
>n2=&cRef
>if not bof()
> skip -1
> if &cTest
>  n1=&cRef
>  replace &cRef with n2
>  goto nRecno
>  replace &cRef with n1
> else
>  skip 1
> endif
>endif
>
>Goto Recno()
>this.parent.grid1.setfocus()
>
>
>
>
>cmdDownButton.Click()
>
>Local nRecno, cTable, cField, cRef, cTest
>
>cTable=(thisform.table)
>cField='Order'
>cRef=cTable+'.'+cField
>cTest='part_files.ifkey==parts.ipkey'
>nRecno=recno()
>
>Select(cTable)
>
>n2=&cRef
>if not bof()
> skip 1
> if &cTest
>  n1=&cRef
>  replace &cRef with n2
>  goto nRecno
>  replace &cRef with n1
> else
>  skip -1
> endif
>endif
>
>Goto Recno()
>this.parent.grid1.doscroll(0)
>this.parent.grid1.setfocus()
>
>
>
>
>
>>Either I'm very rusty or it doesn't exist but is there an equivalent of the .AfterRowColChange() event in List Boxes?
>>
>>Because grids don't have mover buttons I'm displaying records in a list (the user needs to be able to change their order).
>>
>>But, as with a grid, I want the static fields on the form, pertaining to those in the list, to change as the user selects a different "row" in the list.
>>
>>IOW I want my list to behave like a grid.
>>
>>'ppreciate it.
>>
>>Terry
- Whoever said that women are the weaker sex never tried to wrest the bedclothes off one in the middle of the night
- Worry is the interest you pay, in advance, for a loan that you may never need to take out.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform