Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid
Message
De
07/04/2008 03:14:32
 
 
À
07/04/2008 03:11:47
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Re: Grid
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows XP
Database:
Visual FoxPro
Divers
Thread ID:
01308640
Message ID:
01308647
Vues:
10
thisform.text1.Value=mycur.field1 && Replace field1 with the name of the field
thisform.text3.Value=mycur.field11 && Replace field11 with the name of the field
thisform.text4.Value=mycur.field4 && Replace field4 with the name of the field
>yes,
>
>SET DELETED  on
>SELECT TAlias1.employeeid,TAlias2.nam,TAlias2.nam4,TAlias1.workdays,TAlias1.absencewp,TAlias1.absencew,TAlias1.uovertimeh,TAlias1.whovertime,TAlias1.vacations,TAlias1.sickvacati,TAlias2.wark  ;
> FROM payroll TAlias1, mstr TAlias2 ;
> WHERE  TAlias1.employeeid = TAlias2.no ;
>  ORDER BY employeeid ;
>  INTO cursor  mycur readwrite
>
>COUNT TO thisform.text2.value
>
>       thisform.Grid1.RecordSource=" mycur"
>         thisform.Grid1.refresh()
>
>**at thisform.Grid1 event afterrowcolchange&&
>thisform.text1.Value=thisform.grid1.column1.text1.value
>thisform.text3.Value=thisform.grid1.column11.text1.value
>thisform.text4.Value=thisform.grid1.column4.text1.value
>
>
>
>>If the grid takes it data directly from a table or cursor, it's much easier to read the values from the table or cursor.
>>
>>>hi all,
>>>
>>>i try this code at mygrid via afterrowcolchange i see only the result when i move to grid.field not as one record,
>>>
>>>**afterrowcolchange
>>>thisform.text1.Value=thisform.grid1.column1.text1.value
>>>thisform.text3.Value=thisform.grid1.column11.text1.value
>>>thisform.text4.Value=thisform.grid1.column4.text1.value
>>>
>>>thanks
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform