Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Fixing record is out of range bug in grid
Message
De
25/04/2004 07:43:13
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Fixing record is out of range bug in grid
Divers
Thread ID:
00897980
Message ID:
00897980
Vues:
44
To reproduce:

1. Run the code in VFP 7 or 8
2. Press Page Down key

Observed result:

Error "Record is out of range."

Any idea how to fix this ?
I need to edit filtered buffered table in grid and asking save for
each row. This bug breaks my application.
This occurs if at least 3 rows are visible in grid.
ON SHUTDOWN QUIT
CLOSE DATABASES ALL

SET TALK OFF
SET SAFETY OFF
SET EXACT ON
SET DELETED ON

CREATE TABLE test ( test N(1) )
FOR i=1 TO 50
INSERT INTO test VALUES (1)
ENDF
SET FILTER TO test=1
GO BOTTOM
SKIP -1

SET MULTILOCK ON
CURSORSETPROP( 'Buffering', 5, 'test')
obrowse1=NEWOBJECT("browse1")
obrowse1.SHOW
KEYBOARD '2'
READ EVENTS

DEFINE CLASS browse1 AS FORM
ADD OBJECT gridbase1 AS GRID

PROCEDURE INIT
* At least 3 rows must be visible
THIS.gridbase1.DOSCROLL(0)
THIS.gridbase1.DOSCROLL(0)
ENDPROC

PROCEDURE gridbase1.BEFOREROWCOLCHANGE(nColIndex)
TABLEUPDATE(2, .T., 'TEST' )
ENDPROC

ENDDEFINE
Andrus
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform