Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
VFP 5 Grid Not Refreshing
Message
 
To
11/12/2001 03:33:52
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00592329
Message ID:
00593076
Views:
26
Cetin,

I found that using the doscroll(2) and (3) seems to work in * most * cases. I found the idea here (probably one of your suggestions to fix another problem :)).
However, I still have a problem in * one case * when I refresh the grid as follows and the problem is not related to changing the position of the rows in the grid.
If the # of rows in the alias exceeds the # of rows in the grid and I edit the last row in another form in the formset the grid displays incorrectly when refreshed. Even after invoking the two doscrolls, the only row that displays is the last IE the other rows are scrolled off the top of the grid.


>>I have a grid in VFP5 which uses a free table (alias) as its source.
>>The buffer override is '5' - optimistic table buffering.
>>This alias is opened in the environment with an order.
>>One of my command buttons on the same form is 'move down' which basically moves this record down and the following record up in the grid. This is done by replacing a field on both records which is also the order of the table.
>>I have tried refreshing the grid and the form, however, the grid is still displayed in the original sequence. I know that the records have actually switched position because I have browsed the table in the command button.
>>When I modify the buffer modem override in the environment to '0' - no buffering, the data in the grid is displayed properly.
>>Thank you for any assistance.
>
>Allan,
>A plain refresh by itself is not sufficient. Go recno() to enforce a refresh :
>
>with ThisForm.myGrid
> lnRec1 = recno(.recordsource)
> skip in (.recordsource)
> if eof(.recordsource)
>  skip -1
>  return
> endif
> replace sorter with sorter-1 in .RecordSource
> go lnRec1
> replace sorter with sorter+1 in .RecordSource
> go recno() in .recordsource
> .Refresh
>endwith
>Cetin
Regards,

Allan Coganovitch
allanc@proven-solutions.com
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform