Solved

How can I tell if clipboard contents can be pasted as Enhanced Metafile

Posted on 2007-12-01
4
232 Views
Last Modified: 2012-05-05
I am developing an add-in for Word in VB.NET. One of the functions is to Paste clipboard contents as an Enhanced Metafile (my company frequently copy charts and tables from Excel to Word in this format).

I would like to test that the contents of the clipboard can be pasted as enhanced metafile. Currently I just trap the error if it cannot but if I can find out in advance I can then disable the menu item (or change its name) to be clearer to the user.

Code for this test would be much appreciated.
0
Comment
Question by:CarlPritchard
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
4 Comments
 
LVL 10

Expert Comment

by:athapa
ID: 20389242
Use ClipBoard.GetDataPresent to figure out if the format you want is available in the clipboard. You can also enumerate all of the formats available in the clipboard.

HTH,
AT
0
 
LVL 6

Author Comment

by:CarlPritchard
ID: 20389333
Please could you give a code example that shows if there is data that can be pasted as enhanced metafile (ie is compatible data) including any required namespaces/imports.
0
 
LVL 63

Accepted Solution

by:
Fernando Soto earned 250 total points
ID: 20389501
Hi CarlPritchard;

Here is sample code to show you how to see if the clipboard has the correct data. No special imports needed.

Fernando
        If Clipboard.ContainsData(DataFormats.EnhancedMetafile) Then
            ' Then the Clipboard contains data in the EnhancedMetafile format
        Else
            ' The Clipboard DOES NOT contain data in the EnhancedMetafile
        End If

Open in new window

0
 
LVL 10

Expert Comment

by:athapa
ID: 20389509
the only required name space is
System.Windows.Form
which should be already there if your app is windows form app.

imports System.Windows.Form

Private Const FormatName As String = "EnhancedMetafile" 'Enhanced Meta-File Picture

'Call this function anytime you want to see if EnhancedMetaFile is in the clipboard
Private Function IsEnhancedMetaAvailableInClipboard() As Boolean
        Dim clip As IDataObject = Clipboard.GetDataObject()
        Dim AvailableFormats As String() = clip.GetFormats()

        Return (System.Array.IndexOf(AvailableFormats, FormatName) > -1)

End Function

I used the following test code to figure out what other formats are available in clipboard as well as to test the function above

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Debug.WriteLine(IsEnhancedMetaAvailableInClipboard())

        For Each ClipboardFormat As String In Clipboard.GetDataObject().GetFormats()
            System.Diagnostics.Debug.WriteLine(ClipboardFormat)
        Next

    End Sub
0

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Welcome my friends to the second instalment and follow-up to our Minify and Concatenate Your Scripts and Stylesheets (http://www.experts-exchange.com/Programming/Languages/.NET/ASP.NET/A_4334-Minify-and-Concatenate-Your-Scripts-and-Stylesheets.html)…
Wouldn’t it be nice if you could test whether an element is contained in an array by using a Contains method just like the one available on List objects? Wouldn’t it be good if you could write code like this? (CODE) In .NET 3.5, this is possible…
Although Jacob Bernoulli (1654-1705) has been credited as the creator of "Binomial Distribution Table", Gottfried Leibniz (1646-1716) did his dissertation on the subject in 1666; Leibniz you may recall is the co-inventor of "Calculus" and beat Isaac…

726 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question