您可以使用叠加层.创建叠加层make-overlay:
(make-overlay (point) (point))
Run Code Online (Sandbox Code Playgroud)
然后在里面放一些文字overlay-put.
(overlay-put the-ol 'before-string "Tooltip message")
Run Code Online (Sandbox Code Playgroud)
为了以这种方式右对齐文本,您需要propertize在字符串之前的空格中设置display属性:align-to,并考虑工具提示本身将占用的空间.
(concat (propertize " "
'display `(space :align-to (- right ,(length tooltip))))
tooltip)
Run Code Online (Sandbox Code Playgroud)