Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid does not refresh after adding empty row
Message
De
21/01/2003 14:36:36
 
 
À
21/01/2003 14:27:09
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00743140
Message ID:
00743866
Vues:
14
>>>I have found that grid dows not show added row in some case, if
>>>grid is empty.
>>>I preparead a sample about this at www.eetasoft.ee/gridnotrefreshed.zip
>>>
>>>1. Unpack files to some directory
>>>
>>>2. Run VFP 7 IDE
>>>
>>>3. SET DEFAULT TO the directory where you unzipped files.
>>>
>>>4. DO MAIN
>>>
>>>
>>>Result observed:
>>>
>>>Empty grid
>>>
>>>
>>>Result expected:
>>>
>>>Line with word Hello in first column in grid.
>>>Press Ctrl+Tab in grid to see expected result.
>>>
>>>Any ides how to force grid to refresh in this case ?
>>>
>>>I tried refresh, wait window timeout, doevents, acti window/deactivate window nut this does not help.
>>>
>>>Any ides how to fix this ?
>>>
>>>my row adding method contains the code:
>>>
>>>
>>>sele (thisform.brtabel)
>>>append blank
>>>REPLACE klient WITH 'hello'
>>>unlock
>>>thisform.gridbase1.setfocus()
>>>thisform.boundcontrolinteractivechange()
>>>
>>
>>
*...
>>unlock
>>with thisform.GridBase1
>> .RecordSource = .RecordSource
>> .setfocus()
>>endwith
>>*...
>
>Cetin,
>
>I found that adding this line loses current row in grid:
>first row becomes current row always.
>I added the recno() save and restore:
>
>
>nr = RECNO()
>with thisform.GridBase1
> .RecordSource = .RecordSource
> .setfocus()
>endwith
>BROWSE TITLE TRANSFORM(nr) FIELDS rno=RECNO()
>GO (nr)
>
>
>I got an error "Record is out of range" in the
>GO (nr) line.
>
>BROWSE command shows -1 in title and also shows that a record having recno() -1 exists.
>
>Any ideas why GO (nr) fails ?

Are you sure you've gotten the RECNO() of the correct table? Might be better to specify which table as the argument to the RECNO() function.
Fred
Microsoft Visual FoxPro MVP

foxcentral.net
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform