Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Grid
Message
 
To
29/12/1999 23:05:02
Randy Hooper
Ranco Business Software
Tampa, Florida, United States
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Re: Grid
Miscellaneous
Thread ID:
00310213
Message ID:
00310270
Views:
26
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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform