ImageGear22.Art Assembly > ImageGear.ART Namespace > ImGearARTPage Class : PasteMarks Method |
'Declaration Public Sub PasteMarks()
'Usage Dim instance As ImGearARTPage instance.PasteMarks()
public void PasteMarks()
public: void PasteMarks();
public: void PasteMarks();
// Array to hold a list of marks. ArrayList igARTMarkList = new ArrayList(); // Add all valid marks with id's between 0 to 999 to an array. for (int i = 0; i < 1000; ++i ) { if (igARTPage.MarkIsValid(i)) igARTMarkList.Add(igARTPage.MarkGet(i)); } // Cut the marks from the page to the clipboard. igARTPage.CutMarks(igARTMarkList); // Create a new art page and paste the marks into it. ImGearARTPage igARTPageNew = new ImGearARTPage(); igARTPageNew.PasteMarks(); // Change the displayed marks to the new art page. igPageView.Display.ARTPage = igARTPageNew; igPageView.Invalidate();
' Array to hold a list of marks. Dim igARTMarkList As New ArrayList() For i As Integer = 0 To 999 ' Add all valid marks with id's between 0 to 999 to an array. If igARTPage.MarkIsValid(i) Then igARTMarkList.Add(igARTPage.MarkGet(i)) End If Next ' Cut the marks from the page to the clipboard. igARTPage.CutMarks(igARTMarkList) ' Create a new art page and paste the marks into it. Dim igARTPageNew As New ImGearARTPage() igARTPageNew.PasteMarks() ' Change the displayed marks to the new art page. igPageView.Display.ARTPage = igARTPageNew igPageView.Invalidate()