🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sys.mac
Article #26171

Re: need help to print screen using Lightspeed Pascal

#26171
From: ephraim vishniac
Date: Thu, 10 Mar 1988 14:02
21 lines
1461 bytes
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?"
Technical Details
Message-ID: <17709@think.UUCP>
Path: arc1-ca.pugleaf.net!utzoo!mnetor!uunet!husc6!think!ephraim
References: <1460@puff.cs.wisc.edu>

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!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