[cl-typesetting-devel] Multi-page example
Jonathon McKitrick
jcm at FreeBSD-uk.eu.org
Tue Jan 16 16:27:55 UTC 2007
I'm working with the multi-page example, and I have some questions.
First, why does this code produce no output?
(defun test-multi-page ()
(with-document ()
(let* ((header (compile-text ()
(paragraph (:h-align :center :font *font* :font-size *font-size*)
"This is our header")
(hrule :dy 0.5)))
(footer (lambda (pdf:*page*)
(compile-text (:font *font* :font-size *font-size*)
(hrule :dy 0.5)
(hbox (:align :center :adjustable-p t)
:hfill
(verbatim
(format nil "Page ~D" pdf:*page-number*))))))
(content
(compile-text (:font *font* :font-size *font-size*)
(dotimes (i 40)
(paragraph (:font *font* :font-size *font-size*)
"Here is some content"))
:eop)))
(draw-pages content :margins '(72 72 72 72) :header header :footer footer)
(pdf:write-document "web/data/test-report.pdf"))))
Also, some definitions:
Why exactly is an hbox?
What is the function of :eop and :break :after?
What is the difference between put-string and verbatim?
When does finalize-page need to be called?
Thanks in advance for your help.
Jonathon McKitrick
--
My other computer is your Windows box.
More information about the cl-typesetting-devel
mailing list