Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Printing Forms
- Thread starter jerold
- Start date
Hmm, it is hard, indeed. However, you can try SET PRINTER ON, use some drawing commands (like thisfrm.Print) and than SET PRINTER OFF/SET PRINTER TO., I doubt this will help a lot.
Vlad Grynchyshyn
vgryn@softserve.lviv.ua
The professional level of programmer could be determined by level of stupidity of his/her bugs
Vlad Grynchyshyn
vgryn@softserve.lviv.ua
The professional level of programmer could be determined by level of stupidity of his/her bugs
Download George Tasker's Obj2Bmp class from UniversalThread.com.
It allows you to create bitmap files from objects.
Example:
oBMP=CreateObject('BmpMaker')
oBMP.cFileName='C:\MyBmp.bmp'
oBMP.MakeBitmap(hWnd,4)
To print the bitmap,
DECLARE INTEGER ShellExecute IN SHELL32 INTEGER hwnd, STRING cOP, STRING cFile,;
STRING cParams, STRING cStartDir, INTEGER nShowCmd
DECLARE INTEGER GetDesktopWindow IN User32
lnWhnd = GetDesktopWindow()
lnResult = ShellExecute(lnWhnd, 'PRINT', 'C:\MyBmp.bmp', '', '', 0)
Now, this is straight off the top of my head, so take it for its worth. Jon Hawkins
jonscott8@yahoo.com
The World Is Headed For Mutiny,
When All We Want Is Unity. - Creed
It allows you to create bitmap files from objects.
Example:
oBMP=CreateObject('BmpMaker')
oBMP.cFileName='C:\MyBmp.bmp'
oBMP.MakeBitmap(hWnd,4)
To print the bitmap,
DECLARE INTEGER ShellExecute IN SHELL32 INTEGER hwnd, STRING cOP, STRING cFile,;
STRING cParams, STRING cStartDir, INTEGER nShowCmd
DECLARE INTEGER GetDesktopWindow IN User32
lnWhnd = GetDesktopWindow()
lnResult = ShellExecute(lnWhnd, 'PRINT', 'C:\MyBmp.bmp', '', '', 0)
Now, this is straight off the top of my head, so take it for its worth. Jon Hawkins
jonscott8@yahoo.com
The World Is Headed For Mutiny,
When All We Want Is Unity. - Creed
- Status
Similar threads
