Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Buffereing and multiple tablereverts ..
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00493164
Message ID:
00493207
Vues:
17
Hello Nadya

Thanx for your suggestion.

Oldval() and Curval() are of no help ...

I just wrote a small class to buffer the records.
Now I can Save() and Restore() them when needed.

Here's the Class Code.
* BufferClass.Prg
*
* This was defined by me in a VCX using the class builder.
* Sorry if ther are any mistakes

DEFINE Class Buffer as Custom

	cTable = ""
	oData = .f.

	PROCEDURE Save

		LOCAL loData
		IF type("this.cTable") != "C"
			RETURN
		ENDI
		SELE (this.cTable)
		SCATTER name loData
		this.oData = loData

	ENDPROC

	PROCEDURE Restore

		IF type("this.oData") = "O" and type("this.cTable") = "C"
			SELE (this.cTable)
			GATHER name this.oData
		ENDIF

	ENDPROC

ENDDEFINE
I know this might be a very lame way of doing it but until I get another solution I will stick to this one.

Thanx again !
Regards
Hiten K M

( The best and the worst are yet to come .. keep coding ! )

My Resume >>
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform