SOTOS@SUMEX-AIM.STANFORD.EDU (John Sotos) (02/18/88)
Does anyone know how [in Koto] to change the font of a window's title bar? I fought with this months ago, decided I didn't need it, but now have no way around it. Thanks in advance. John -------
lane@SUMEX-AIM.STANFORD.EDU (Christopher Lane) (02/18/88)
This can be done in both Koto and Lyric using the function DSPFONT on the global stream WindowTitleDisplayStream. Subsequent windows will use the new font in their title bar. To create just one window with a different font: (SETQ FONT (FONTCREATE 'HELVETICA 24)) (RESETLST (RESETSAVE NIL `(DSPFONT ,(DSPFONT FONT WindowTitleDisplayStream) ,WindowTitleDisplayStream)) (CREATEW NIL "Window Title")) To change an existing window: (RESETLST (RESETSAVE NIL `(DSPFONT ,(DSPFONT FONT WindowTitleDisplayStream) ,WindowTitleDisplayStream)) (WINDOWPROP WINDOW 'TITLE (WINDOWPROP WINDOW 'TITLE NIL))) - Christopher
denber.wbst@XEROX.COM (02/19/88)
You can also call (WINDOWTITLEFONT font). If called with no arguments, it returns the current font. - Michel