Topics
All
MacOS
(Only)
Windows
(Only)
Linux
(Only, Not)
iOS
(Only, Not)
Components
Crossplatform Mac & Win
Server
Client
Old
Deprecated
Guides
Examples
Videos
New in version:
12.2
12.3
12.4
12.5
13.0
13.1
13.2
13.3
13.4
13.5
Statistic
FMM
Blog
Sets device mode.
Component | Version | macOS | Windows | Linux | Server | iOS SDK |
DynaPDF | 7.0 | ❌ No | ✅ Yes | ❌ No | ❌ No | ❌ No |
Parameter | Description | Example |
---|---|---|
DevMode | The new device mode. Pass empty string to clear it. |
Returns OK or error.
See also Print function in DynaPDF manual.
Print with options
#Initialize DynaPDF if needed
If [MBS("DynaPDF.IsInitialized") ≠ 1]
Perform Script [“InitDynaPDF”]
End If
#New PDF session
Set Variable [$pdf; Value:MBS("DynaPDF.New")]
#Load PDF from container
Set Variable [$r; Value:MBS("DynaPDF.OpenPDFFromContainer"; $pdf; Print PDFs::InputPDF)]
Set Variable [$r; Value:MBS("DynaPDF.ImportPDFFile"; $pdf; 1)]
#Print
Set Variable [$flags; Value:If ( Position ( Print PDFs::Options; "ShrinkToPrintArea"; 1; 1)>0; 16; 0) + If ( Position ( Print PDFs::Options; "AutoRotateAndCenter"; 1; 1)>0; 4; 0) + If ( Position ( Print PDFs::Options; "Color"; 1; 1)>0; 2; 0) + If ( …]
Set Variable [$ShowDialog; Value:Position ( Print PDFs::Options ; "ShowDialog"; 1; 1)>0]
Set Variable [$r; Value:MBS( "DynaPDF.Print.SetDevMode"; Print PDFs::Printer Device Mode)]
Set Variable [$r; Value:MBS( "DynaPDF.Print.SetDevNames"; Print PDFs::Printer Device Names)]
Set Variable [$r; Value:MBS("DynaPDF.Print"; $pdf; Print PDFs::Printer Name; ""; ""; $flags; ""; ""; ""; ""; $ShowDialog)]
Set Field [Print PDFs::Printer Device Names; MBS( "DynaPDF.Print.GetDevNames" )]
Set Field [Print PDFs::Printer Device Mode; MBS("DynaPDF.Print.GetDevMode")]
#Cleanup
Set Variable [$r; Value:MBS("DynaPDF.Release"; $pdf)]
This function checks for a license.
Created 16th January 2017, last changed 9th August 2021