New topic in General: landscape printing
tallelton - Sat Mar 29, 2008 6:51 am <http://forums.realsoftware.com/viewtopic.php?t=21510> I have a graphic that is a schedule made up of rectangles. Horizontal rows represent hours of a day and rows are days of the week. I want to print out a hard copy of this schedule. It has to be in landscape format to fit the page. Text is written within the rectangles. How do I accomplish this? The code (much simplified) to draw each rectangle has the following form. Sub DrawPage(gr As graphics) Dim r as New RectShape r.width=widthOfRectangle(teacherToBeScheduled,i,day) r.height=100 r.border=100 r.bordercolor=RGB(0,0,0) r.fillcolor= RGB(250,250,250) r.borderwidth=1 gr.DrawObject r,ULxCornerOfRectangle,ULyCornerOfRectangle gr.DrawString "some string",[some x],[some y]//coordinates are such that the text appears inside the rect. Thank you. -- Over 900 classes with 18000 functions in one REALbasic plug-in. The Monkeybread Software Realbasic Plugin v8.1. <http://www.monkeybreadsoftware.de/realbasic/plugins.shtml> [email protected]
