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: