[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RE: _PrGeneral

Why not just call the page setup dialog? I have a page setup... menu item which 
does the following: 
(ask (front-window) (page-setup))

(defobfun (window-pagesetup TWindow) ()
        (let ((THPrint (get-print-record)))
            (_PRStlDialog :ptr THPrint :boolean)

Then the next time you print, and get the print record - it will be landscaped, 
Good luck. Printing isn't easy, and has many, many bugs, and workarounds, (not 
in lisp, but in the system..)
 ---------- Message from wilcox@cmns.think.com follows  ----------
------------------------ Internet Gateway Message follows 
Being encouraged by the success of my last request, let me try another:

Does anyone have code that sets the printer orientation and reduction (what
Apple calls the "rotation" and "resolution") in the printer style dialog?
I know it involves using the _PrGeneral trap and some opcodes to select
sub-routines. However, I'm not that good at writing low-level code yet.

By the way, thanks to everyone who answered my question about the name of
the startup document. The easiest and most useful answer was the function 

                                            --Greg Wilcox
----------------------------- Message Header follows 
 From ames!cambridge.apple.com!info-mcl-request  Thu Apr 25 16:38:43 1991
Received: by claris.com (4.1/SMI-3.2)
	id AA27334; Thu, 25 Apr 91 16:38:45 PDT
Received: from brazil.cambridge.apple.com by ames.arc.nasa.gov (5.64/1.2); Thu, 
25 Apr 91 12:52:34 -0700
 Received: from ministry.cambridge.apple.com by brazil.cambridge.apple.com with 
SMTP (5.64/25-eef)
 	id AA05923; Thu, 25 Apr 91 16:05:17 -0400
	for Ashok_Khosla@claris.com
Received: by cambridge.apple.com (5.64/25-eef)
	id AA11961; Thu, 25 Apr 91 15:32:06 -0400
Received: from [] by cambridge.apple.com with SMTP (5.64/25-eef)
	id AA11957; Thu, 25 Apr 91 15:32:04 -0400
Received: from Cmns.Think.COM by brazil.cambridge.apple.com with SMTP 
 	id AA05919; Thu, 25 Apr 91 16:02:42 -0400
	for info-macl@cambridge.apple.com
Received: by Cmns.Think.COM (5.57/Ultrix2.4-C)
	id AA28260; Thu, 25 Apr 91 15:48:52 EDT
Received: by cmns-sun.think.com; Thu, 25 Apr 91 15:49:07 EDT
Date: Thu, 25 Apr 91 15:49:07 EDT
From: wilcox@cmns.think.com
Message-Id: <9104251949.AA17145@cmns-sun.think.com>
To: info-macl@cambridge.apple.com
Subject: _PrGeneral