* 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 ENDDEFINEI know this might be a very lame way of doing it but until I get another solution I will stick to this one.