Module1.vb
Imports System.Diagnostics
Imports Bytescout.Watermarking
Imports Bytescout.Watermarking.Presets
Module Module1
Sub Main()
' Create new watermarker
Dim waterMarker As New Watermarker()
' Create new preset
Dim preset As New TextFitsPage()
' Create new string
Dim inputFilePath As String
' Create new string
Dim outputFilePath As String
' Set input file path
inputFilePath = "my_sample_image.jpg"
' Set output file path
outputFilePath = "my_sample_output.jpg"
' Initialize library
waterMarker.InitLibrary("demo", "demo")
' Add image to apply watermarks to
waterMarker.AddInputFile(inputFilePath, outputFilePath)
' Set preset text
preset.Text = "Bytescout Watermarking"
' Add watermark to watermarker
waterMarker.AddWatermark(preset)
' Set output directory
waterMarker.OutputOptions.OutputDirectory = "."
' Apply watermarks
waterMarker.Execute()
' Open generated image file in default image viewer installed in Windows
Process.Start(outputFilePath)
End Sub
End Module
Click here to get your Free Trial version of the SDK
Sorry! This product is not available.
Please click here to visit main page for the list of all available products and solutions.
Product Links: