Small Print Problem

Robert Presender rpresender at cox.net
Sat Nov 26 12:28:34 EST 2005


Having a small problem with my print script shown below. Will 
appreciate any help.
Using a scrolling window stack. Rev 2.5.1, OS 10.3.9, Paper size 8.5x11

The top 232 pixels of the card contains numerous flds ,etc followed
  by fld Listfield. Fld Listfield can contain up to 47 lines for one 
page.

The first page prints fine. Using .88 as printScale, the textsize of 
ListField is
  between 9 and 10.  Subsequent pages,  containing  only the text of 
ListField,
use revPrintText but the printed text size is the initial size of 10.

Since I don't know how to emulate a printScale in revPrintText,  I 
change the
  textSize of ListField to 9.  This works fine but the text appearance 
is a little smaller
  than the first page. I would like subsequent pages  to be scaled like 
the first page.

Any thoughts will be appreciated.

on mouseUp
     lock screen
     set the vScroll of group "Checks" of this stack to 0 --zero
     set the backgroundcolor of this card to "White"
     set the printMargins to 36,36,0,0 --ltrb
     set the height of this stack to 800
     set the backSize of group "Checks" to 630,800
     set the printScale to .88
     put the num of lines of fld "ListField" into numLines

     if numLines <= 47 then -- up to one page
       open printing with dialog
       print this card from 0,20 to 630,800
       close printing
       set the height of this stack to 488 --reset to initial setting
       set the backSize of group "Checks" of this stack to 648,483 
--reset to initial setting
     end if

  if numLines > 47 then --prints first page and rest of fld ListField
       open printing with dialog -- test 11/25
       print this card from 0,20 to 630,800 -- as above

       set the textSize of fld "ListField" to 9
       revShowPrintDialog false,false --so dialogs doesn't show up 
--test 11/25
       revPrintText (line 48 to numLines of fld "ListField"),,,the long 
name of fld "ListField"

       set the textSize of fld "ListField" to 10 --reset to initial size
       set the height of this stack to 488
       set the backSize of group "Checks" of this stack to 648,483
     end if
end mouseUp  	

Regards ... Bob
rpresender at cox.net




More information about the use-livecode mailing list