Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
DynamicBackColor not working
Message
 
À
28/10/2008 12:13:00
Jay Johengen
Altamahaw-Ossipee, Caroline du Nord, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Vista
Network:
Windows 2008 Server
Database:
MS SQL Server
Divers
Thread ID:
01357721
Message ID:
01357724
Vues:
23
>The records do not change color in the grid, though the cursor does have those values in the GroupHeading field.
>
>	.Fm_CONTAINER1.grdWorkListXMLCursor.RecordSource = ''
>	.Fm_CONTAINER1.grdWorkListXMLCursor.RecordSource = 'WorkListXMLCursor'
>	THISFORM.Fm_Container1.grdWorkListXMLCursor.SetAll("DynamicBackColor", ;
>		"IIF(ALLTRIM(WorkListXMLCursor.GroupHeading)='Receiver', RGB(192, 241, 190), ;
>		IIF(ALLTRIM(WorkListXMLCursor.GroupHeading)='Subscriber' OR ;
>			ALLTRIM(WorkListXMLCursor.GroupHeading)='Dependent', RGB(211, 210, 240), ;
>		RGB(249, 223, 223)))", "Column")
>	.Fm_CONTAINER1.grdWorkListXMLCursor.Refresh
>
How about:
TEXT TO lcDynBackColor NOSHOW PRETEXT 15
     ICASE(UPPER(ALLTRIM(WorkListXMLCursor.GroupHeading)) == [RECEIVER]                     ,  RGB(192, 241, 190),
           INLIST(UPPER(ALLTRIM(WorkListXMLCursor.GroupHeading)), [SUBSCRIBER], [DEPENDENT]),  RGB(211, 210, 240),
           RGB(249, 223, 223))
ENDTEXT
THISFORM.Fm_Container1.grdWorkListXMLCursor.SetAll([DynamicBackColor], lcDynBackColor, [Column])
THISFORM.Fm_Container1.grdWorkListXMLCursor.Refresh()
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform