Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Highlight bar... seek() question
Message
From
21/03/2000 10:10:17
Anthony Suarez
Black Marlin Data Corporation
Taguig, Philippines
 
 
To
21/03/2000 09:56:12
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00348206
Message ID:
00348359
Views:
27
* this is my code in interactivechange of the text1
ThisForm.Grid1.setall("DynamicBackColor","Iif(ALLTRIM(&pcMyTable..c_descri) == ALLTRIM(THISFORM.TEXT1.VALUE),RGB(0,255,255), RGB(255,255,255))")
thisform.grid1.refresh
*the problem with this style, (specially when EXACT is set to OFF) was that all matches will be highlighted too and not the first match. It can be eliminated if you'll be using the "list box" instead of the grid.


>set exact off
LCONTA=LEN(ALLT(THIS.VALUE))
LOCATE FOR ALLT(this.value) = &pcMyTable..c_descri
IF FOUND()
ThisForm.Grid1.setall("DynamicBackColor",;
"Iif(ALLTRIM(&pcMyTable..c_descri) = ALLTRIM(THISFORM.TEXT1.VALUE),RGB(0,255,255),
RGB(255,255,255))")
ThisForm.Grid1.REFRESH()
ELSE
> ENDIF
Previous
Reply
Map
View

Click here to load this message in the networking platform