LiveCode Forums.

Code: Select all

function whatCards2Print
repeat with i = 1 to the num of btns of grp "ActivePrint" of cd 1
if the hilite of btn i of grp "ActivePrint" of cd 1 = true then
put i & "," after new_list
end if
end repeat

delete char -1 of new_list

RETURN new_list
end whatCards2Print



set the formatForPrinting of stack "qg" to true
   set the printRotated to false 

   open printing with dialog 



set the printScale to 1
    set the printMargins to 0, 0, 0, 0  --1/2 inch margins 
    set the printGutters to 0, 0 --1/4 inch gutters 
   put whatCards2Print() into  Cards2print
repeat for each item i in  Cards2print
print  Card i 
end repeat 
close printing

Code: Select all

...
## Your function will return a comma separated list of all the card number to be printed
put whatCards2Print() into  Cards2print

## Now you can get the COUNT of these card to be printed:
put the num of items of Card2Print into tCardCount

## Since "repeat for each" will noit give you a clue what number is curretnly processed you need to make you own counter:
put 0 into tCounter

repeat for each item i in  Cards2print
   add 1 to counter

   ## Now you can fill your info field of all these cards inside of this loop!
   put "Page" && tCounter && "of" && tCardCount into fld "pagenumber" of cd i
   print Card i 

   ## Optional: remove this info again after printing
   put empty into fld "pagenumber" of cd i
end repeat 
...