Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid
Message
 
À
29/12/1999 23:05:02
Randy Hooper
Ranco Business Software
Tampa, Floride, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Re: Grid
Divers
Thread ID:
00310213
Message ID:
00310270
Vues:
23
Hi Randy,

You can use DYNAMICBACKCOLOR and DYNAMICFORECOLOR.
Use this code at the Init event of your form:

Public MyRecNo
Thisform.MyGrid.SetAll("DynamicBackColor", "IIF(RECNO( )=MyRecNo, RGB(0,0,128), RGB(255,255,255))", "Column") && Painting backcolor: Blue
Thisform.MyGrid.SetAll("DynamicForeColor", "IIF(RECNO( )=MyRecNo, RGB(255, 255, 255), RGB(0,0,0))", "Column") && Painting letters: white

After doing an Append Blank, add:

MyRecNo = RecNo()
Thisform.Refresh()

Add this, also to the AfterRowColChange event of your Grid.

That should make what you want.

Cheers,

Ricardo
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform