[cl-typesetting-devel] Q: Reference points absolute coordinates?

Dmitri Ivanov divanov at aha.ru
Wed Oct 27 18:38:45 UTC 2004


Hello,

Is it possible to find the absolute coordinates of a ref-point on the page?
How can I get absolute top or bottom of  a table row, e.g.

 (tt:table (:col-widths (100 200))
     (tt:row ()
        (tt:mark-ref-point 'ref-point1)
        (tt:cell () (tt:p () "test11"))
        (tt:cell (:v-align :center) (tt:p () "test12")))
     (tt:row ()
        (tt:mark-ref-point 'ref-point2)
        (tt:cell () (tt:p () "test21"))
        (tt:cell (:v-align :center) (tt:p () "test22"))))

(let ((ref-point1 (tt:find-ref-point 'ref-point1))
        (ref-point2 (tt:find-ref-point 'ref-point2)))
  (format t "~%ref-point1 y = ~s,  ref-point2 y = ~s"
    (tt::y ref-point1) (tt::y ref-point2)))
; prints the save value for both
--
Sincerely,
Dmitri Ivanov
lisp.ystok.ru





More information about the cl-typesetting-devel mailing list