TStoredValue

pl 

OnSave

pl 

OnRestore