ByteScout Watermarking SDK – VB.NET – Set Options for Text Watermark

Home
/
Articles
/
ByteScout Watermarking SDK – VB.NET – Set Options for Text Watermark

printable version:
ByteScout-Watermarking-SDK-VB-NET-Set-Options-for-Text-Watermark.pdf

How to set options for text watermark for textfitspage (vb in VB.NET and ByteScout Watermarking SDK

See how to set options for text watermark to have textfitspage (vb in VB.NET

Today we will explain the steps and algorithm of how to set options for text watermark and how to make it work in your application. Textfitspage (vb in VB.NET can be implemented with ByteScout Watermarking SDK. ByteScout Watermarking SDK is the library for software developers that can be used to quickly add image watermarking features into your web or desktop applications. Use ready to use presets or create your own to be applied for input PNG, JPG, BMP images. Can customize fonts, text position and rotation if required.

The SDK samples like this one below explain how to quickly make your application do textfitspage (vb in VB.NET with the help of ByteScout Watermarking SDK. Open your VB.NET project and simply copy & paste the code and then run your app! Further enhancement of the code will make it more vigorous.

Our website provides free trial version of ByteScout Watermarking SDK that includes source code samples to help with your VB.NET project.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

Module1.vb

      Imports System.Drawing

Imports Bytescout.Watermarking
Imports Bytescout.Watermarking.Presets

Module Module1

    Sub Main()
        ' Create Watermarker instance
        Dim waterMarker As New Watermarker()

        Dim inputFilePath As String
        Dim outputFilePath As String

        ' Initialize library
        waterMarker.InitLibrary("demo", "demo")

        ' Set input file name
        inputFilePath = "my_sample_image.jpg"
        ' Set output file title
        outputFilePath = "my_sample_output.jpg"

        ' Add image to apply watermarks to
        waterMarker.AddInputFile(inputFilePath, outputFilePath)

        ' Create new watermark
        Dim preset As New TextFitsPage()

        ' Set watermark text
        preset.Text = "Bytescout Watermarking"

        ' Set watermark font
        preset.Font = New WatermarkFont("Tahoma", FontStyle.Regular, FontSizeType.Points, 30)

        ' Set watermark text color
        preset.TextColor = Color.Black

        ' Set text transparency
        preset.Transparency = 40

        ' Add watermark to watermarker
        waterMarker.AddWatermark(preset)

        ' Set output directory
        waterMarker.OutputOptions.OutputDirectory = "."

        ' Set output format
        waterMarker.OutputOptions.ImageFormat = OutputFormats.JPEG

        ' Apply watermarks
        waterMarker.Execute()

        ' open generated image file in default image viewer installed in Windows
        Process.Start(outputFilePath)

    End Sub

End Module