Adds a watermark to PDF document.
Namespace:
SautinSoftAssembly: PdfMetamorphosis (in PdfMetamorphosis.dll) Version: 7.1.2.14 (7.1.2.14)
Syntax
C# | Visual Basic |
public PdfMetamorphosis..::.WaterMark Add( string imagePath, int transparency )
Public Function Add ( _ imagePath As String, _ transparency As Integer _ ) As PdfMetamorphosis..::.WaterMark
Parameters
- imagePath
- String
Path to image for watermark.
- transparency
- Int32
Transparency in percents. 0 - invisible.
Return Value
Reference to the just added watermark.
Examples

using System; using System.IO; using System.Collections; namespace Sample { class Test { static void Main(string[] args) { SautinSoft.PdfMetamorphosis p = new SautinSoft.PdfMetamorphosis(); SautinSoft.PdfMetamorphosis.WaterMark w1 = new SautinSoft.PdfMetamorphosis.WaterMark(@"..\..\..\..\Testing files\WaterMark.png"); w1.PosX.Mm = 0; w1.PosX.Mm = 0; w1.PosDX.Mm = 50; w1.PosDY.Mm = 50; p.WaterMarks.Add(w1); SautinSoft.PdfMetamorphosis.WaterMark w2 = p.WaterMarks.Add(); w2.Img = System.Drawing.Image.FromFile(@"..\..\..\..\Testing files\WaterMark.png"); w2.Transparency = 20; w2.PosX.Mm = 60; w2.PosY.Mm = 0; w2.PosDX.Mm = 100; w2.PosDY.Mm = 100; w2.SelectedPages = new int[] { 1 }; if (p != null) { string rtfPath = @"..\..\..\..\Testing files\example.rtf"; string pdfPath = Path.ChangeExtension(rtfPath, ".pdf"); int i = p.RtfToPdfConvertFile(rtfPath, pdfPath); if (i != 0) { System.Console.WriteLine("An error occured during converting RTF to PDF!"); } else { System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(pdfPath) { UseShellExecute = true }); } } } } }

Module sample Sub Main() Dim p As New SautinSoft.PdfMetamorphosis() Dim w1 As New SautinSoft.PdfMetamorphosis.WaterMark("..\..\..\..\Testing files\WaterMark.png") w1.PosX.Mm = 0 w1.PosX.Mm = 0 w1.PosDX.Mm = 50 w1.PosDY.Mm = 50 p.WaterMarks.Add(w1) Dim w2 As SautinSoft.PdfMetamorphosis.WaterMark = p.WaterMarks.Add() w2.Img = System.Drawing.Image.FromFile("..\..\..\..\Testing files\WaterMark.png") w2.Transparency = 20 w2.PosX.Mm = 60 w2.PosY.Mm = 0 w2.PosDX.Mm = 100 w2.PosDY.Mm = 100 w2.SelectedPages = New Integer() {1} If p IsNot Nothing Then Dim rtfPath As String = "..\..\..\..\Testing files\example.rtf" Dim pdfPath As String = "..\..\..\..\Testing files\test.pdf" Dim i As Integer = p.RtfToPdfConvertFile(rtfPath, pdfPath) If i <> 0 Then System.Console.WriteLine("An error occured during converting RTF to PDF!") Else System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(pdfPath) With {.UseShellExecute = True}) End If End If End Sub End Module