Lisp HUG Maillist Archive

font, CLIM, Windows

If I invoke

(clim:make-text-style :fix :roman :small)
(clim:make-text-style :fix :roman :normal)
(clim:make-text-style :fix :roman :large)

what fonts do I get for Lispworks 4.0 on Windows?

Are these the same for Windows XP professional as Window XP home 
edition?
Windows 2000? Window95?

How can I retrieve exactly what font is decided upon?

The issue is trying to figure where in the window a given word within
one of several paragraphs will appear.

I tried:
(clim:text-style-mapping (clim:find-port) (clim:make-text-style :fix 
:roman :normal)

This returns:

#<WIN32-LIB-CLIM::WIN32-FONTOBJ Courier hlogfont 101321481 2AF75BAC>

with the 101321481 & 2AF75BAC different every time.

I was hoping for something like Courier 10 or Courier 12, etc.

Thanks,
Sheldon

Re: font, CLIM, Windows

Sheldon Ball wrote:

> The issue is trying to figure where in the window a given word within
> one of several paragraphs will appear.

Can't you use CLIM's TEXT-SIZE function?  To quote the manual, it
'computes the "cursor motion" in device units that would take place
if string (which may be either a string or a character) were output
to the medium medium starting at the position (0, 0).'

Arthur
Updated at: 2020-12-10 08:52 UTC