Path: utzoo!mnetor!uunet!husc6!think!ephraim
From: ephraim@think.COM (ephraim vishniac)
Newsgroups: comp.sys.mac
Subject: Re: need help to print screen using Lightspeed Pascal
Message-ID: <17709@think.UUCP>
Date: 10 Mar 88 14:02:45 GMT
References: <1460@puff.cs.wisc.edu>
Sender: usenet@think.UUCP
Reply-To: ephraim@vidar.think.com.UUCP (ephraim vishniac)
Organization: Thinking Machines Corporation, Cambridge, MA
Lines: 21
Keywords: Lightspeed Pascal

In article <1460@puff.cs.wisc.edu> geraldn@puff.WISC.EDU (Gerald Ngui ...Burp!) writes:
>I'm stuck.
>Could someone please offer me some info on how I could 
>in Lightspeed Pascal dump the screen to the
>printer (using the Print Manager?) ? 
>Maybe with an example or something?

Here's one way to tackle the problem, though it's a bit sleazy.

There's code for dumping/printing the screen in FKEY 3 and FKEY 4. So,
the easy way to dump/print the screen is to GetResource('FKEY', 3) or
GetResource('FKEY', 4), *check to be sure you got the FKEY*,
dereference the handle, cast the pointer into a procedure pointer, and
call the procedure.  Note that the procedure is void (no return value)
and has no parameters.

Ephraim Vishniac					  ephraim@think.com
Thinking Machines Corporation / 245 First Street / Cambridge, MA 02142-1214

     On two occasions I have been asked, "Pray, Mr. Babbage, if you put
     into the machine wrong figures, will the right answers come out?"