Method

FolderItem.OpenAsVectorPicture


Warning

This item was deprecated in version 2019r2. Please use Picture.OpenVector as a replacement.

Description

Opens the FolderItem to be read as a vector Picture.

Notes

It will do its best to convert a PICT file (on macOS) or an .emf file (Windows) to a Picture composed of Object2D objects. The original file may contain elements that do not have an equivalent Object2D object. This method will do its best to map these objects, but there may be some loss of information, depending on the characteristics of the original file. PICTs support unrotated Rectangles, Lines, Ellipses, RoundRects, Polygons, Text, Pixmaps, and Arcs.

.emf files support unrotated Rectangles, Lines, Ellipses, RoundRects, Polygons, Text, Pixmaps and Arcs.

.emf files are displayed as actual size. For the most part this is huge; you probably will want to scale them down before viewing (pic1.objects.scale = scalingFactor). We find that a scale factor of 0.045 is a good value.

Sample code

The following example opens an ancient PICT file as a Picture. The image/x-pict file type has been added using the File Types Editor.

Dim f As New FolderItem

f = GetOpenFolderItem("image/x-pict")
Dim p As Picture

p = f.OpenAsVectorPicture
If p <> Nil Then
  MsgBox(Str(p.ImageCount))
Else
  MsgBox("Open failed!")
End If

Compatibility

All project types on all supported operating systems.