ByteScout PDF SDK - VBScript and VB6 - Use Clipping for Drawing in PDF - ByteScout

ByteScout PDF SDK – VBScript and VB6 – Use Clipping for Drawing in PDF

  • Home
  • /
  • Articles
  • /
  • ByteScout PDF SDK – VBScript and VB6 – Use Clipping for Drawing in PDF

How to use clipping for drawing in PDF in VBScript and VB6 with ByteScout PDF SDK

This code in VBScript and VB6 shows how to use clipping for drawing in PDF with this how to tutorial

ByteScout tutorials are designed to explain the code for both VBScript and VB6 beginners and advanced programmers. What is ByteScout PDF SDK? It is the component to help programmers in generating new pdf files, modifying and updating existing pdf documents or pdf forms. Provides support for auto-filling pdf forms, adding text with adjustable font, style, size, font family, new form fields, vector and raster drawings. It can help you to use clipping for drawing in PDF in your VBScript and VB6 application.

This code snippet below for ByteScout PDF SDK works best when you need to quickly use clipping for drawing in PDF in your VBScript and VB6 application. In your VBScript and VB6 project or application you may simply copy & paste the code and then run your app! You can use these VBScript and VB6 sample examples in one or many applications.

Download free trial version of ByteScout PDF SDK from our website with this and other source code samples for VBScript and VB6.

Try ByteScout PDF SDK today:  60 Day Free Trial (on-premise) or  Web API (on-demand version)

Clipping.vbs
      
' 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

Try ByteScout PDF SDK today:  60 Day Free Trial (on-premise) or  Web API (on-demand version)

VIDEO

ON-PREMISE VERSION INFORMATION

Get 60 Day Free Trial or Visit ByteScout PDF SDK Home Page

Explore ByteScout PDF SDK Documentation

Get ByteScout PDF SDK Free Training

WEB API

Get Your Free API Key

Explore Web API Documentation

Tutorials:

prev
next