嗨,今天我尝试将画布导出到文件。首先,我尝试将其导出为 png 并且效果很好,一切看起来都与画布上的一样。
之后,我修改了代码以导出到 xps 文件。
Dim thePack As IO.Packaging.Package = IO.Packaging.Package.Open(path.LocalPath,IO.FileMode.Create)
Dim doc As New Xps.Packaging.XpsDocument(thePack)
Dim writer As Xps.XpsDocumentWriter = Xps.Packaging.XpsDocument.CreateXpsDocumentWriter(doc)
writer.Write(mycanvas)
doc.Close()
thePack.Close()
代码运行良好,但它不会生成与我的画布/png 完全相同的视图。
是否有任何功能可以更改编写器的输出?看起来视觉对象比它们内部的文本移动得更低。