Insert image as floating object

The following example shows you how to insert an image. The image is anchored within the text.

C# example

using System;
using Independentsoft.Office;
using Independentsoft.Office.Drawing;
using Independentsoft.Office.Word;
using Independentsoft.Office.Word.Drawing;

namespace Sample
{
    class Program
    {
        static void Main(string[] args)
        {
            WordDocument doc = new WordDocument();

            Picture picture = new Picture("c:\\test\\image.gif");
            Unit pictureWidth = new Unit(640, UnitType.Pixel);
            Unit pictureHeight = new Unit(480, UnitType.Pixel);

            Offset offset = new Offset(0, 0);
            Extents extents = new Extents(pictureWidth, pictureHeight);

            picture.ShapeProperties.PresetGeometry = new PresetGeometry(ShapeType.Rectangle);
            picture.ShapeProperties.Transform2D = new Transform2D(offset, extents);
            picture.ID = "1";
            picture.Name = "image.gif";

            Anchor anchor = new Anchor(picture);
            anchor.Size = new DrawingObjectSize(pictureWidth, pictureHeight); 
            anchor.ID = "1";
            anchor.Name = "Picture 1";
            anchor.Description = "image.gif";
            anchor.WrapType = new WrapSquare(WrapText.BothSides);
            anchor.SimplePositioningCoordinates = new SimplePositioningCoordinates(0, 0);
            anchor.HorizontalPositioning = new HorizontalPositioning(HorizontalRelativePositioning.Column, 0);

            Unit positionOffset = new Unit(1, UnitType.Inch);
            anchor.VerticalPositioning = new VerticalPositioning(VerticalRelativePositioning.Paragraph, positionOffset);

            DrawingObject drawingObject = new DrawingObject(anchor);

            Run run1 = new Run();
            run1.AddText("Below is an image:");

            Run run2 = new Run();
            run2.Add(drawingObject);

            Paragraph paragraph1 = new Paragraph();
            paragraph1.Add(run1);
            paragraph1.Add(run2);

            doc.Body.Add(paragraph1);

            doc.Save("c:\\test\\output.docx", true);
        }
    }
}

VB example

Imports System
Imports Independentsoft.Office
Imports Independentsoft.Office.Drawing
Imports Independentsoft.Office.Word
Imports Independentsoft.Office.Word.Drawing

Module Module1
    Sub Main(ByVal args() As String)

        Dim doc As WordDocument = New WordDocument()

        Dim picture As Picture = New Picture("c:\\test\\image.gif")
        Dim pictureWidth As Unit = New Unit(640, UnitType.Pixel)
        Dim pictureHeight As Unit = New Unit(480, UnitType.Pixel)

        Dim offset As Offset = New Offset(0, 0)
        Dim extents As Extents = New Extents(pictureWidth, pictureHeight)

        picture.ShapeProperties.PresetGeometry = New PresetGeometry(ShapeType.Rectangle)
        picture.ShapeProperties.Transform2D = New Transform2D(offset, extents)
        picture.ID = "1"
        picture.Name = "image.gif"

        Dim anchor As Anchor = New Anchor(picture)
        anchor.Size = New DrawingObjectSize(pictureWidth, pictureHeight)
        anchor.ID = "1"
        anchor.Name = "Picture 1"
        anchor.Description = "image.gif"
        anchor.WrapType = New WrapSquare(WrapText.BothSides)
        anchor.SimplePositioningCoordinates = New SimplePositioningCoordinates(0, 0)
        anchor.HorizontalPositioning = New HorizontalPositioning(HorizontalRelativePositioning.Column, 0)

        Dim positionOffset As Unit = New Unit(1, UnitType.Inch)
        anchor.VerticalPositioning = New VerticalPositioning(VerticalRelativePositioning.Paragraph, positionOffset)

        Dim drawingObject As DrawingObject = New DrawingObject(anchor)

        Dim run1 As Run = New Run
        run1.AddText("Below is an image:")

        Dim run2 As Run = New Run
        run2.Add(drawingObject)

        Dim paragraph1 As Paragraph = New Paragraph
        paragraph1.Add(run1)
        paragraph1.Add(run2)

        doc.Body.Add(paragraph1)

        doc.Save("c:\test\output.docx", True)

    End Sub
End Module

Independentsoft - any library, any programming language

Word .NET > Tutorial > Insert image as floating object

Need help? Ask our developers: