Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
SetAll and DynamicBackColor problem
Message
From
22/09/2005 14:10:15
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Environment versions
Visual FoxPro:
VFP 7 SP1
OS:
Windows XP SP2
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01052066
Message ID:
01052103
Views:
11
Sorry, no.

>Unfortunately I tried that and got poor results. The dynamic back color shows until I actually enter the grid, then it goes white, and if I move to a different record I see a flash of the color but it instantly goes away. I thought I had it, too. This happens regardless of where the code is.
>
>I tried turning off Highlight and HightlightRow, but that didn't help. Maybe if I turn off SelectOnEntry?
>
>Any ideas?
>
>Dana
>
>>I am glad that you found a solution. And, as Sergey mentioned, be sore to move the SETALL code to the init of the grid where it belongs.
>>
>>>Tore,
>>>
>>> You put me on a track that I hadn't thought about. I put the "fully qualified path", ie. ThisForm.pgfBase.Page2.grdPromoDestinations.SetAll(... and that worked.
>>>
>>>Thanks for your help!
>>>
>>>Dana
>>>
>>>>I added some more text to my message, after you read it. When the DynamicBackColor expression is evaluated, it does not see the "With this" since it is not valid anymore.
>>>>
>>>>>I would think that it should not be an issue, since the code is within the
>>>>>
>>>>>WITH This
>>>>>...
>>>>>ENDWITH
>>>>>
>>>>> structure, but I'll check that out.
>>>>>
>>>>>Dana
>>>>>>>WITH This
>>>>>>> .Tag = STR(RECNO('vSbvPromoDestinations'))
>>>>>>>
>>>>>>> .SetAll("DynamicBackColor", "IIF(RECNO('vSbvPromoDestinations') = VAL(ALLTRIM(.Tag)), ;
>>>>>>> RGB(255,255,128), RGB(255,255,255))", "Column")
>>>>>>>
>>>>>>> .Refresh()
>>>>>>>*.colAirportCode.DynamicBackColor = RGB(0,128,255)
>>>>>>>ENDWITH
>>>>>>>
>>>>>>>
>>>>>>>Please help, it's driving me nuts!
>>>>>>>
>>>>>>>Thanks,
>>>>>>>Dana
>>>>>>
>>>>>>My guess is the missing "this"
>>>>>>WITH This
>>>>>>	.Tag = STR(RECNO('vSbvPromoDestinations'))
>>>>>>
>>>>>>	.SetAll("DynamicBackColor", "IIF(RECNO('vSbvPromoDestinations') = VAL(ALLTRIM(this.Tag)), ;
>>>>>>		RGB(255,255,128), RGB(255,255,255))", "Column")
>>>>>>
>>>>>>	.Refresh()
>>>>>>*.colAirportCode.DynamicBackColor = RGB(0,128,255)
>>>>>>ENDWITH
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform