Page 1 of 1

Save FreeTextAnnotationData

Posted: Sat Jul 15, 2017 4:22 pm
by GHWels
Hello!

I want to save FreeTextAnnotationData in a file (xml,txt)
and rebuild them later on an another file.

The problem is the size of the outlinetextfield (width, height),I can not control it, and the text comes mirrored.

Code: Select all

Dim data As FreeTextAnnotationData = New FreeTextAnnotationData()
data.Name = Now.ToString("yyyyMMddHHmmssfff")

data.LeaderPoints.Add(New PointF(-643, 241))
data.Location = New PointF(823, 748)
data.Size = New SizeF(271, -258)

data.CanMirror = False
data.CanMove = True
data.CanResize = True
data.CanRotate = False
data.LeaderOutline.Color = System.Drawing.Color.Black
data.LeaderOutline.Width = 2
data.Symmetry = False
data.Outline.Color = System.Drawing.Color.Black
data.Outline.Width = 2
data.FillBrush = New AnnotationSolidBrush(Nothing)
data.CreatedBy = "GH"
data.CreationTime = Now
data.Text = "1234Text"
data.TextAlign = ContentAlignment.MiddleCenter
data.TextPadding = New Vintasoft.Imaging.PaddingF(2, 2, 2, 2)

Viewer.AnnotationDataCollection.Add(data)
is the a sample?

Thank you for your help.
Gunther

Re: Save FreeTextAnnotationData

Posted: Mon Jul 17, 2017 3:09 pm
by Alex
Hello Gunther,

Could you send us (to support@vintasoft.com) a small working project, which demonstrates your problem?

Best regards, Alexander