Leadtools.Annotations Namespace > AnnAutomation Class : ClipboardObjectFormat Property |
public static string ClipboardObjectFormat {get;}
'Declaration Public Shared ReadOnly Property ClipboardObjectFormat As String
'Usage Dim value As String value = AnnAutomation.ClipboardObjectFormat
Imports Leadtools Imports Leadtools.Annotations Imports Leadtools.WinForms Imports Leadtools.Drawing Public Sub AnnAutomation_ClipboardObjectFormat(ByVal automation As AnnAutomation) Dim canPaste As Boolean = False Dim data As IDataObject = Clipboard.GetDataObject() If Not data Is Nothing Then Dim format As DataFormats.Format = DataFormats.GetFormat(AnnAutomation.ClipboardObjectFormat) If data.GetDataPresent(AnnAutomation.ClipboardObjectFormat) Then canPaste = True End If End If If canPaste Then MessageBox.Show("Annotation information available in the clipboard") Else MessageBox.Show("No Annotation information available in the clipboard") End If End Sub
using Leadtools; using Leadtools.Annotations; using Leadtools.WinForms; using Leadtools.Drawing; public void AnnAutomation_ClipboardObjectFormat(AnnAutomation automation) { bool canPaste = false; IDataObject data = Clipboard.GetDataObject(); if(data != null) { DataFormats.Format format = DataFormats.GetFormat(AnnAutomation.ClipboardObjectFormat); if(data.GetDataPresent(AnnAutomation.ClipboardObjectFormat)) canPaste = true; } if(canPaste) MessageBox.Show("Annotation information available in the clipboard"); else MessageBox.Show("No Annotation information available in the clipboard"); }