Re: StylePrint problem
- To: mathgroup at smc.vnet.net
- Subject: [mg20512] Re: [mg20402] StylePrint problem
- From: "David Park" <djmp at earthlink.net>
- Date: Wed, 27 Oct 1999 02:05:07 -0400
- Sender: owner-wri-mathgroup at wolfram.com
Dana wrote:
>problems.
>If I know that I am going to do 30+ problems at the end of a chapter, I
>want to avoid typing in the text..Problem #1, Problem #2, etc
>
>I found this example in the "Tour of Mathematica" section of "The
>Mathematica Book."
>
>Do[StylePrint["Problem # " <> ToString[i], "Section"], {i, 10}]
>
>Which works...kind of. After the above prints out correctly, I move the
>cursor between say Problem #4, and Problem #5 to begin solving Problem #4.
>As soon as I hit enter, all the output from Problem #5, down to the last
>one is deleted!
>
>Does anyone do anything similar? Is there another command that I should be
>using instead. I have looked for a long time. Thank you for any insight /
>solution. Dana
>
This seems to work:
Do[CellPrint[
Cell["Problem # " <> ToString[i], "Section",
CellAutoOverwrite -> False]], {i, 10}]
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/