The sample source codes on this page shows how to use clipping for drawing in pdf with pdf sdk in VBScript. ByteScout Premium Suite can use clipping for drawing in pdf with pdf sdk. It can be applied from VBScript. ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.
This prolific sample source code in VBScript for ByteScout Premium Suite contains various functions and other necessary options you should do calling the API to use clipping for drawing in pdf with pdf sdk. Follow the instructions from scratch to work and copy the VBScript code. Complete and detailed tutorials and documentation are available along with installed ByteScout Premium Suite if you’d like to learn more about the topic and the details of the API.
You can download free trial version of ByteScout Premium Suite from our website with this and other source code samples for VBScript.
' This example demonstrates how to use the graphics clipping. ' Create Bytescout.PDF.Document object Set pdfDocument = CreateObject("Bytescout.PDF.Document") pdfDocument.RegistrationName = "demo" pdfDocument.RegistrationKey = "demo" Set comHelpers = pdfDocument.ComHelpers ' Add page Set page1 = comHelpers.CreatePage(comHelpers.PAPERFORMAT_A4) pdfDocument.Pages.Add(page1) centerX = 200 centerY = 200 ' Create clipping path from circle Set clippingPath = comHelpers.CreatePath() clippingPath.AddCircle centerX, centerY, 100 page1.Canvas.SetClip(clippingPath) ' Paint Bytescout.PDF.Rectangle over the clipping circle. ' Only part of the Bytescout.PDF.Rectangle intersecting the clipping circle will be drawn. Set redBrush = comHelpers.CreateSolidBrush(comHelpers.CreateColorRGB(255, 0, 0)) page1.Canvas.DrawRectangle_2 (redBrush), centerX - 50, centerY - 50, 200, 200 ' Save document to file pdfDocument.Save("result.pdf") ' Open document in default PDF viewer app Set shell = CreateObject("WScript.Shell") shell.Run "result.pdf", 1, false