Leadtools.Windows.Annotations Namespace > AnnObject Class : SaveOriginalLocation Method |
public virtual void SaveOriginalLocation()
'Declaration Public Overridable Sub SaveOriginalLocation()
'Usage Dim instance As AnnObject instance.SaveOriginalLocation()
public: virtual void SaveOriginalLocation();
Saves location information for an AnnObject including RotateCenter location and RotateGripper location. The information can be restored using RestoreOriginalLocation.
Notes to overriders: save any acutal points that define your object.
Imports Leadtools.Windows.Controls Imports Leadtools.Windows.Annotations Public Sub AnnObject_SaveOriginalLocation(ByVal obj As AnnObject) ' Save the original location obj.SaveOriginalLocation() ' Make some changes ' i.e. shift to right 100 pixels obj.Translate(100, 0) ' Restore original location ' Comment out the line below, to see the object shifts ' Leave the line below to see the object reverts to original location obj.RestoreOriginalLocation() End Sub
using Leadtools.Windows.Controls; using Leadtools.Windows.Annotations; using Leadtools.Demos; using Leadtools.Help; public void AnnObject_SaveOriginalLocation(AnnObject obj) { // Save the original location obj.SaveOriginalLocation(); // Make some changes // i.e. shift to right 100 pixels obj.Translate(100, 0); // Restore original location // Comment out the line below, to see the object shifts // Leave the line below to see the object reverts to original location obj.RestoreOriginalLocation(); }
using Leadtools.Windows.Controls; using Leadtools.Windows.Annotations; using Leadtools.Examples; public void AnnObject_SaveOriginalLocation(AnnObject obj) { // Save the original location obj.SaveOriginalLocation(); // Make some changes // i.e. shift to right 100 pixels obj.Translate(100, 0); // Restore original location // Comment out the line below, to see the object shifts // Leave the line below to see the object reverts to original location obj.RestoreOriginalLocation(); }
Imports Leadtools.Windows.Controls Imports Leadtools.Windows.Annotations Public Sub AnnObject_SaveOriginalLocation(ByVal obj As AnnObject) ' Save the original location obj.SaveOriginalLocation() ' Make some changes ' i.e. shift to right 100 pixels obj.Translate(100, 0) ' Restore original location ' Comment out the line below, to see the object shifts ' Leave the line below to see the object reverts to original location obj.RestoreOriginalLocation() End Sub