🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sys.mac
Article #47323

Re: Displaying 'PICT's in Think Pascal 2.03

#47323
From: Owen M. Hartnett
Date: Sun, 04 Mar 1990 04:06
29 lines
1904 bytes
In article <17714@boulder.Colorado.EDU> steelem@boulder.Colorado.EDU (STEELE MARK ALLEN) writes:
>I am trying to write a program in Think Pascal 2.03 that will display a 
>PICT resource. The problem is as follows: I created a resource with ResEdit
>pasted the picture into the PICT resource number 400, I checked the size
>of the rectangle, then in my project I used the command GetPicture(400) to
>get the pict resource ( I remebered to check the box in the run options...)
>then I set up a rectangle of the same size as the picture.rectangle, then
>copied the picture into that rectangle on the screen as ugh!!! the mess 
>that displays on the screen is nothing near what the PICT should be.
>What am I forgetting?????
>			-Mark Steele

1) for starters, remember to lock down the picture handle before you draw.
(Yes, Virginia, DrawPicture does move memory).  

2) Are you *sure* that the rectangle is the same size as the picFrame
rectangle?

3) If you haven't got enough memory, the picture won't load in.  This will
give you a nil handle, which you should check for.

-Owen



Owen Hartnett				omh@cs.brown.edu.CSNET
Brown University Computer Science	omh@cs.brown.edu
					uunet!brunix!omh
"Don't wait up for me tonight because I won't be home for a month."
Technical Details
Message-ID: <31439@brunix.UUCP>
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!usc!cs.utexas.edu!uunet!brunix!omh
References: <940@uvicctr.UVic.CA.UUCP> <1990Mar3.190730.15647@mintaka.lcs.mit.edu> <25f046a2.6509@polyslo.CalPoly.EDU> <17714@boulder.Colorado.EDU>

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!usc!cs.utexas.edu!uunet!brunix!omh
From: omh@cs.brown.edu (Owen M. Hartnett)
Newsgroups: comp.sys.mac,comp.sys.mac.programmer
Subject: Re: Displaying 'PICT's in Think Pascal 2.03
Message-ID: <31439@brunix.UUCP>
Date: 4 Mar 90 04:06:59 GMT
References: <940@uvicctr.UVic.CA.UUCP> <1990Mar3.190730.15647@mintaka.lcs.mit.edu> <25f046a2.6509@polyslo.CalPoly.EDU> <17714@boulder.Colorado.EDU>
Sender: news@brunix.UUCP
Reply-To: omh@cs.brown.edu (Owen M. Hartnett)
Distribution: usa
Organization: Brown University Department of Computer Science
Lines: 29