Update:
Reading one of the other questions from today from Ivan Aase led me to try the following....
this.Print (ll_job, 0, 0)
....where "this" is the current window. That successfully printed the window, which is what I was going for with the Alt+Printscreen printing code below.
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
PowerBuilder v12.1, build 7055
Windows 7m 64 bit platform
Oracle 12C
The goal is to print the Clipboard. Here's what I have so far. The issue is that I cannot seem to get the contents of the Clipboard into the blob variable.
Any ideas?
// Local external function
SUBROUTINE keybd_event (int bVk, int bScan, int dwFlags, int dwExtraInfo) LIBRARY "user32.dll"
// Code in the pfc_print event
// Start the print job
ll_job = PrintOpen()
// Put the current window into the Clipboard as a bitmap = [Alt + PrintScreen]
keybd_event ( 44,1,0,0 )
// Convert the Clipboard image to a blob
ll_rc = BlobEdit ( lblob, 1, Clipboard() ) <=== ERROR, this returns NULL
// Set the blob into a Picture object
ll_rc = lpic.Setpicture(lblob)
// Print the pictureobject
ll_rc = lpic.Print ( ll_job, 1, 1)
// Close the print job
PrintClose (ll_job)
Thanks,
Olan
Thank you for sharing it!
Olan