TBinaryDocumentAncestor Class

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

Unit: uDocumentsAncestor
System.TObject
  uDocumentsAncestor.TDocumentAncestor
    uDocumentsAncestor.TBinaryDocumentAncestor
type TBinaryDocumentAncestor = class(TDocumentAncestor)

The TBinaryDocumentAncestor type exposes the following members.

Show:
 NameDescription
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 .)

Top
Show:
 NameDescription
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 .)

LoadFromStream

Load the document content in this instance.

SaveToFile

Save this document to a file. (Overrides uDocumentsAncestor.TDocumentAncestor.SaveToFile .)

SaveToStream

Save this instance to the given stream.

Top

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