Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!swrinde!zaphod.mps.ohio-state.edu!rpi!uupsi!sunic!cs.umu.se!delann
From: delann@cs.umu.se (Anders Nyman)
Newsgroups: comp.sys.mac.programmer
Subject: Emergeny help on picture drawing wanted!!!
Message-ID: <1991Jan29.194323.7665@cs.umu.se>
Date: 29 Jan 91 19:43:23 GMT
Sender: news@cs.umu.se (News Administrator)
Organization: Dep. of Info.Proc, Umea Univ., Sweden
Lines: 59

I have a quickdraw picture wich I wan't to draw in different size. I wan't to
shrink or expand it. But I fail to get it to work when I expand the picture.
Nothing occurs on my screen. If I try to draw the picture with an windowrect.
of the same size as in the recording, but in a different place, nothing occurs.
I hope that someone out there can help me out with this. The following code
is an testprogram in Think C 4.0.2 to try this out. My machine is an SE.

Any answer could be sent either to comp.sys.mac.programmer or by e-mail to:
delann@cs.umu.se or
nyman@kicki.stacken.kth.se

/Thanks for your attention!!!

The testprogram:

inittoolbox()
{
	InitGraf(&thePort);
	InitFonts();
	FlushEvents(everyEvent,0);
	InitWindows();
	InitMenus();
	TEInit();
	InitDialogs(0L);
	InitCursor();
	MaxApplZone();
}
 
WindowPtr thewind;
 
setupwindow()
{
	Rect therect;
	
	SetRect(&therect,0,0,180,180);
	thewind=NewWindow(0L,&therect,"\pTheWindow",1,2,-1L,0,0);
	ShowWindow(thewind);
}
 
main()
{
	PicHandle pic;
	Rect therect,therect1;
	
	inittoolbox();
	setupwindow();
 
	SetPort(thewind);
	SetRect(&therect,0,0,180,180);
	SetRect(&therect1,50,50,70,70);
	pic=OpenPicture(&therect);
	FillRect(&therect1,white);
	FrameRect(&therect1);
	ClosePicture();
	DrawPicture(pic,&therect);
	SetRect(&therect,0,0,230,230);
	DrawPicture(pic,&therect);
	KillPicture(pic);
}