Applies all the encryptor AnnEncryptObject objects in this AnnAutomation.

Syntax

Visual Basic (Declaration)
Public Overridable Sub ApplyAllEncryptors()

Visual Basic (Usage)	Copy Code
`Dim instance As AnnAutomation instance.ApplyAllEncryptors()`

C#
public virtual void ApplyAllEncryptors()

Managed Extensions for C++
public: virtual void ApplyAllEncryptors();

C++/CLI
public: virtual void ApplyAllEncryptors();

Example

Visual Basic Copy Code

Visual Basic	Copy Code
Public Sub AnnAutomation_ApplyAllEncryptors(ByVal automation As AnnAutomation) ' remove all objects from this automation automation.SelectAll() automation.Delete() ' see if we can apply all the encryptor or decrytor objects (this should show a message informing you there are no encrypt objects in this automation) EncryptDecryptAll(automation) ' first add a new a couple of encrypt object to the automation Dim encrypt As AnnEncryptObject = New AnnEncryptObject() encrypt.Bounds = New AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel) encrypt.Key = 123 automation.Container.Objects.Add(encrypt) automation.Viewer.Invalidate(encrypt.InvalidRectangle) encrypt = New AnnEncryptObject() encrypt.Bounds = New AnnRectangle(300, 300, 100, 100, AnnUnit.Pixel) encrypt.Key = 456 automation.Container.Objects.Add(encrypt) automation.Viewer.Invalidate(encrypt.InvalidRectangle) ' see if we can apply all encryptor objects (should apply the encryptors) EncryptDecryptAll(automation) ' see if we can apply all decryptor objects (should apply the decryptors) EncryptDecryptAll(automation) End Sub Private Sub EncryptDecryptAll(ByVal automation As AnnAutomation) If automation.CanApplyAllEncryptors Then ' apply encryptors automation.ApplyAllEncryptors() MessageBox.Show("Encryptor objects has been applied") ElseIf automation.CanApplyAllDecryptors Then ' apply decryptors automation.ApplyAllDecryptors() MessageBox.Show("Decryptor objects has been applied") Else MessageBox.Show("Cannot apply encryptors or decryptors because no encrypt object is currently in this automation") End If End Sub

Public Sub AnnAutomation_ApplyAllEncryptors(ByVal automation As AnnAutomation)

   ' remove all objects from this automation

   automation.SelectAll()

   automation.Delete()

   ' see if we can apply all the encryptor or decrytor objects (this should show a message informing you there are no encrypt objects in this automation)

   EncryptDecryptAll(automation)



   ' first add a new a couple of encrypt object to the automation

   Dim encrypt As AnnEncryptObject = New AnnEncryptObject()

   encrypt.Bounds = New AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel)

   encrypt.Key = 123

   automation.Container.Objects.Add(encrypt)

   automation.Viewer.Invalidate(encrypt.InvalidRectangle)



   encrypt = New AnnEncryptObject()

   encrypt.Bounds = New AnnRectangle(300, 300, 100, 100, AnnUnit.Pixel)

   encrypt.Key = 456

   automation.Container.Objects.Add(encrypt)

   automation.Viewer.Invalidate(encrypt.InvalidRectangle)



   ' see if we can apply all encryptor objects (should apply the encryptors)

   EncryptDecryptAll(automation)



   ' see if we can apply all decryptor objects (should apply the decryptors)

   EncryptDecryptAll(automation)

End Sub



Private Sub EncryptDecryptAll(ByVal automation As AnnAutomation)

   If automation.CanApplyAllEncryptors Then

      ' apply encryptors

      automation.ApplyAllEncryptors()

      MessageBox.Show("Encryptor objects has been applied")

   ElseIf automation.CanApplyAllDecryptors Then

      ' apply decryptors

      automation.ApplyAllDecryptors()

      MessageBox.Show("Decryptor objects has been applied")

   Else

      MessageBox.Show("Cannot apply encryptors or decryptors because no encrypt object is currently in this automation")

   End If

End Sub

C# Copy Code

C#	Copy Code
public void AnnAutomation_ApplyAllEncryptors(AnnAutomation automation) { // remove all objects from this automation automation.SelectAll(); automation.Delete(); // see if we can apply all the encryptor or decrytor objects (this should show a message informing you there are no encrypt objects in this automation) EncryptDecryptAll(automation); // first add a new a couple of encrypt object to the automation AnnEncryptObject encrypt = new AnnEncryptObject(); encrypt.Bounds = new AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel); encrypt.Key = 123; automation.Container.Objects.Add(encrypt); automation.Viewer.Invalidate(encrypt.InvalidRectangle); encrypt = new AnnEncryptObject(); encrypt.Bounds = new AnnRectangle(300, 300, 100, 100, AnnUnit.Pixel); encrypt.Key = 456; automation.Container.Objects.Add(encrypt); automation.Viewer.Invalidate(encrypt.InvalidRectangle); // see if we can apply all encryptor objects (should apply the encryptors) EncryptDecryptAll(automation); // see if we can apply all decryptor objects (should apply the decryptors) EncryptDecryptAll(automation); } private void EncryptDecryptAll(AnnAutomation automation) { if(automation.CanApplyAllEncryptors) { // apply encryptors automation.ApplyAllEncryptors(); MessageBox.Show("Encryptor objects has been applied"); } else if(automation.CanApplyAllDecryptors) { // apply decryptors automation.ApplyAllDecryptors(); MessageBox.Show("Decryptor objects has been applied"); } else MessageBox.Show("Cannot apply encryptors or decryptors because no encrypt object is currently in this automation"); }

public void AnnAutomation_ApplyAllEncryptors(AnnAutomation automation) 
{ 
   // remove all objects from this automation 
   automation.SelectAll(); 
   automation.Delete(); 
   // see if we can apply all the encryptor or decrytor objects (this should show a message informing you there are no encrypt objects in this automation) 
   EncryptDecryptAll(automation); 
 
   // first add a new a couple of encrypt object to the automation 
   AnnEncryptObject encrypt = new AnnEncryptObject(); 
   encrypt.Bounds = new AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel); 
   encrypt.Key = 123; 
   automation.Container.Objects.Add(encrypt); 
   automation.Viewer.Invalidate(encrypt.InvalidRectangle); 
 
   encrypt = new AnnEncryptObject(); 
   encrypt.Bounds = new AnnRectangle(300, 300, 100, 100, AnnUnit.Pixel); 
   encrypt.Key = 456; 
   automation.Container.Objects.Add(encrypt); 
   automation.Viewer.Invalidate(encrypt.InvalidRectangle); 
 
   // see if we can apply all encryptor objects (should apply the encryptors) 
   EncryptDecryptAll(automation); 
 
   // see if we can apply all decryptor objects (should apply the decryptors) 
   EncryptDecryptAll(automation); 
} 
 
private void EncryptDecryptAll(AnnAutomation automation) 
{ 
   if(automation.CanApplyAllEncryptors) 
   { 
      // apply encryptors 
      automation.ApplyAllEncryptors(); 
      MessageBox.Show("Encryptor objects has been applied"); 
   } 
   else if(automation.CanApplyAllDecryptors) 
   { 
      // apply decryptors 
      automation.ApplyAllDecryptors(); 
      MessageBox.Show("Decryptor objects has been applied"); 
   } 
   else 
      MessageBox.Show("Cannot apply encryptors or decryptors because no encrypt object is currently in this automation"); 
}

Remarks

Use the CanApplyAllEncryptors property to determine whether you can currently call this method.

This method will call the AnnEncryptObject Apply method for all AnnEncryptObject objects that have the CanEncrypt value set to true.

Requirements

Target Platforms: Microsoft .NET Framework 2.0, Windows 98, Windows NT 4.0, Windows Millennium Edition, Windows 2000, Windows XP Home Edition, Windows XP Professional, Windows Server 2003 family

Leadtools.Annotations	Requires Document/Medical product license \| Send comments on this topic. \| Back to Introduction - All Topics \| Help Version 15.10.31
ApplyAllEncryptors Method
See Also Example

Syntax

Example

Remarks

Requirements

See Also

Reference