TJSONDocumentAncestor Class

Manage documents as JSON files. If you provide a private key they are encrypted with a ??? algorithm.

System.TObject
uDocumentsAncestor.TDocumentAncestor
uDocumentsAncestor.TJSONDocumentAncestor

type TJSONDocumentAncestor = class(TDocumentAncestor)

The TJSONDocumentAncestor type exposes the following members.

	Name	Description
	FileName	The FileName for this document (no path, no extension) if opened by LoadFromFile(WithAName) or it has been saved by SaveToFile(WithAName) (Inherited from uDocumentsAncestor.TDocumentAncestor .)
	HasChanged	Returns True if a document parameter has changed since last Clear(), LoadXXX() or SaveXXX() (Inherited from uDocumentsAncestor.TDocumentAncestor .)
	Path	Path to the folder where this document will be saved. (Inherited from uDocumentsAncestor.TDocumentAncestor .)

	Name	Description
	AsJSON	Get the JSON object version of this instance.
	GetEncoding	Returns the encoding format of the JSON document source string
	GetPrivateXORKey	Returns the optional key to use to crypt/uncrypt the document file.
	IsCrypted	Returns True if this document as a Private XOR Key and should by crypted (Overrides uDocumentsAncestor.TDocumentAncestor.IsCrypted .)
	LoadFromFile	Load this document from a file. (Overrides uDocumentsAncestor.TDocumentAncestor.LoadFromFile .)
	LoadFromJSONObject	Fill this instance from a JSON object.
	SaveToFile	Save this document to a file. (Overrides uDocumentsAncestor.TDocumentAncestor.SaveToFile .)
	ToJSON	Get the JSON source version of this instance.

In your descendants, don't forget to override the methods GetDocumentGUID, GetDocumentExtension and GetPrivateKey