ByteScout Premium Suite - VBScript - Set transparency for drawing in pdf with pdf sdk - ByteScout

ByteScout Premium Suite – VBScript – Set transparency for drawing in pdf with pdf sdk

  • Home
  • /
  • Articles
  • /
  • ByteScout Premium Suite – VBScript – Set transparency for drawing in pdf with pdf sdk

How to set transparency for drawing in pdf with pdf sdk in VBScript using ByteScout Premium Suite

Continuous learning is a crucial part of computer science and this tutorial shows how to set transparency for drawing in pdf with pdf sdk in VBScript

These source code samples are assembled by their programming language and functions they apply. ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording and you can use it to set transparency for drawing in pdf with pdf sdk with VBScript.

Want to save time? You will save a lot of time on writing and testing code as you may just take the VBScript code from ByteScout Premium Suite for set transparency for drawing in pdf with pdf sdk below and use it in your application. Just copy and paste the code into your VBScript application’s code and follow the instructions. If you want to use these VBScript sample examples in one or many applications then they can be used easily.

You can download free trial version of ByteScout Premium Suite from our website with this and other source code samples for VBScript.

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

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

Transparency.vbs
      
' This example demonstrates how to draw transparent objects. ' 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) Set canvas = page1.Canvas ' Prepare pens and brushes Set borderPen = comHelpers.CreateSolidPen(comHelpers.CreateColorGray(0), 2.0) Set brush1 = comHelpers.CreateSolidBrush(comHelpers.CreateColorRGB(255, 0, 0)) Set brush2 = comHelpers.CreateSolidBrush(comHelpers.CreateColorRGB(0, 0, 255)) borderPen.Opacity = 50 brush1.Opacity = 30 brush2.Opacity = 60 ' Draw normal rectangles canvas.DrawRectangle_2 (brush1), 100, 100, 100, 100 canvas.DrawRectangle_3 (borderPen), (brush2), 150, 150, 100, 100 borderPen.Opacity = 80 brush1.Opacity = 60 brush2.Opacity = 30 ' Draw rounded rectangles canvas.DrawRoundedRectangle_2 (brush1), 220, 100, 100, 100, 10 canvas.DrawRoundedRectangle_3 (borderPen), (brush2), 270, 150, 100, 100, 10 ' 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

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Premium Suite Home Page

Explore ByteScout Premium Suite Documentation

Explore Samples

Sign Up for ByteScout Premium Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

VIDEO

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Premium Suite Home Page

Explore ByteScout Premium Suite Documentation

Explore Samples

Sign Up for ByteScout Premium Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

Tutorials:

prev
next