From: Max Chernoff via ntg-context <ntg-context@ntg.nl>
To: Stefan Nedeljkovic <tsar.srb@gmail.com>
Cc: Max Chernoff <mseven@telus.net>,
mailing list for ConTeXt users <ntg-context@ntg.nl>
Subject: Re: Changing font and font size inside textex
Date: Tue, 31 May 2022 01:42:02 -0600 [thread overview]
Message-ID: <043d95df-7e79-80b2-476b-4ae17b0febef@telus.net> (raw)
In-Reply-To: <CAGraPNeExiF11SQCUZ38q=SXT87EJfVmGWAmqSbK8qcAd_VVAA@mail.gmail.com>
> Thanks Max that works perfectly! But It would still be useful if I could
> change families inside a MPpage.
Sure, but you'll need to store the x-heights first:
\starttexdefinition storexheight [#1]
% Placing the first use of \switchtobodyfont inside a group messes
% with the definitions, so we need to reset the font family manually.
\edef\oldfontclass{\fontclass}
\switchtobodyfont[#1]
\expandafter\newcount\csname #1_xheight\endcsname
\global\csname #1_xheight\endcsname=\numexpr 100 * \number\dimexpr1em\relax / \number\dimexpr1ex\relax \relax
\switchtobodyfont[\oldfontclass]
\stoptexdefinition
\starttexdefinition setxheight [#1][#2]
% Combining these two lines into one sometimes fails. No idea why.
\switchtobodyfont[#1]
\switchtobodyfont[\the\dimexpr#2 * \csname #1_xheight\endcsname / 100 \relax]
\stoptexdefinition
\storexheight[adventor]
\storexheight[pagella]
\storexheight[heros]
\starttext
\startMPpage
draw textext.origin("\setxheight[adventor][1cm]Hello!");
draw (0, 1cm) -- (6cm, 1cm);
\stopMPpage
\startMPpage
draw textext.origin("\setxheight[pagella][1cm]Hello!");
draw (0, 1cm) -- (6cm, 1cm);
\stopMPpage
\startMPpage
draw textext.origin("\setxheight[heros][6pt]Hello!");
draw textext.origin("\setxheight[heros][24pt]Hello!");
draw (0, 6pt) -- (6cm, 6pt);
draw (0, 24pt) -- (6cm, 24pt);
\stopMPpage
\stoptext
It's pretty ugly code, but it seems to work alright.
-- Max
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
next prev parent reply other threads:[~2022-05-31 7:42 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2022-05-30 18:46 Stefan Nedeljkovic via ntg-context
2022-05-30 23:31 ` Max Chernoff via ntg-context
2022-05-31 5:10 ` Stefan Nedeljkovic via ntg-context
2022-05-31 7:42 ` Max Chernoff via ntg-context [this message]
2022-05-31 13:18 ` Stefan Nedeljkovic via ntg-context
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=043d95df-7e79-80b2-476b-4ae17b0febef@telus.net \
--to=ntg-context@ntg.nl \
--cc=mseven@telus.net \
--cc=tsar.srb@gmail.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).