我有以下后记代码
1448 2069 /moveto
(Comparator) {show newpath}
我想在文本（Comparator）周围画一个矩形，因为我需要提供一个超链接来将它重定向到缩写页面。但是我很难找到2个坐标的其余部分。有人请指教。
答案 0 :(得分：2)
你的朋友
string bool charpath
pathbbox llx lly urx ury
来自Postscript语言。
所以
1448 2069 moveto
(Comparator) false charpath pathbbox newpath
会给你堆栈上的left-x，lower-y，right-x和upper-y。您可以减去/添加一些常量值以在文本周围留出一点空间，然后计算宽度和高度而不是右/上值并执行rectstroke
编辑小型工作样本
%!PS
/Helvetica findfont 20 scalefont setfont
20 dup moveto (Link on page1) show newpath
[ /Rect [ 20 dup moveto (Link on page1) false charpath pathbbox
2 add 4 1 roll 2 add 4 1 roll 2 sub 4 1 roll 2 sub 4 1 roll
newpath ] /Page 2 /Color [.7 0 0] /Subtype /Link /ANN pdfmark
showpage
20 dup moveto (Target on page2) show
showpage
2 add 4 1 roll ...行每边增加2个边距。你可以省略整行。