Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Buffereing and multiple tablereverts ..
Message
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00493164
Message ID:
00493207
Views:
18
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 >>
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform