<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252">
<style type="text/css" style="display:none;"><!-- P {margin-top:0;margin-bottom:0;} --></style>
</head>
<body dir="ltr">
<div id="divtagdefaultwrapper" style="font-size:12pt;color:#000000;font-family:Calibri,Arial,Helvetica,sans-serif;" dir="ltr">
<p></p>
<div>This chunk of code has to be placed on “pd-gui.tcl” @line 433?</div>
<div><br>
</div>
<div>////////////////</div>
<div><br>
</div>
<div>    critcl::cproc AddFontResource {Tcl_Interp* interp Tcl_Obj* pathObj} ok {</div>
<div>        Tcl_DString ds;</div>
<div>        Tcl_Encoding unicode;</div>
<div>        int len, r = TCL_OK;</div>
<div>        const char *path = Tcl_GetStringFromObj(pathObj, &len);</div>
<div><br>
</div>
<div>        Tcl_DStringInit(&ds);</div>
<div>        unicode = Tcl_GetEncoding(interp, "unicode");</div>
<div>        Tcl_UtfToExternalDString(unicode, path, len, &ds);</div>
<div>        if (AddFontResourceExW(Tcl_DStringValue(&ds), FR_PRIVATE, NULL)</div>
<div>== 0) {</div>
<div>            r = TCL_ERROR;</div>
<div>        }</div>
<div>        Tcl_DStringFree(&ds);</div>
<div>        Tcl_FreeEncoding(unicode);</div>
<div>        return r;</div>
<div>    }</div>
<div><br>
</div>
<div>//////////////////////////</div>
<div><br>
</div>
<div> Of course needs a path to the .ttf and other tweaks right?</div>
<br>
<p></p>
<p><br>
</p>
<div id="Signature"><font face="Courier New, Courier, Monospace" size="2">Mensaje telepatico asistido por maquinas.</font>
</div>
<br>
<br>
<div style="color: rgb(0, 0, 0);">
<hr style="display:inline-block; width:98%" tabindex="-1">
<div id="divRplyFwdMsg" dir="ltr"><font face="Calibri, sans-serif" color="#000000" style="font-size:11pt"><b>From:</b> Pd-list <pd-list-bounces@lists.iem.at> on behalf of Lucas Cordiviola <lucarda27@hotmail.com><br>
<b>Sent:</b> Monday, February 13, 2017 10:29 AM<br>
<b>To:</b> Alexandre Torres Porres; Dan Wilcox; Jonathan Wilkes; Pd-List<br>
<b>Subject:</b> Re: [PD] cross platforms issues with displaying fonts in vanilla but not in Purr Data</font>
<div> </div>
</div>
<div>
<div id="divtagdefaultwrapper" dir="ltr" style="font-size:12pt; color:#000000; font-family:Calibri,Arial,Helvetica,sans-serif">
<p></p>
<div><a href="http:// https://msdn.microsoft.com/en-us/library/windows/desktop/ms533820(v=vs.85).aspx"><br>
</a></div>
<div><a href="http:// https://msdn.microsoft.com/en-us/library/windows/desktop/ms533820(v=vs.85).aspx"></a><a href="https://msdn.microsoft.com/en-us/library/windows/desktop/ms533820(v=vs.85).aspx">https://msdn.microsoft.com/en-us/library/windows/desktop/ms533820(v=vs.85).aspx</a><br>
</div>
<div><br>
</div>
<div><a href="http://code.activestate.com/lists/tcl-core/8158/#sthash.qJEhQALT.dpuf"></a><a href="http://code.activestate.com/lists/tcl-core/8158/#sthash.qJEhQALT.dpuf">http://code.activestate.com/lists/tcl-core/8158/#sthash.qJEhQALT.dpuf</a><br>
</div>
<div><br>
</div>
<p></p>
<blockquote style="margin:0 0 0 40px; border:none; padding:0px">
<blockquote style="margin:0 0 0 40px; border:none; padding:0px">
<p></p>
<div><i>>>@Dan:</i></div>
<p></p>
</blockquote>
</blockquote>
<p></p>
<div><br>
</div>
<p></p>
<blockquote style="margin:0 0 0 40px; border:none; padding:0px">
<blockquote style="margin:0 0 0 40px; border:none; padding:0px">
<p></p>
<div><i>>>The Tcl thing is just for Windows?</i></div>
<p></p>
</blockquote>
</blockquote>
<blockquote style="margin:0 0 0 40px; border:none; padding:0px">
<p></p>
<div><i><br>
</i></div>
<p></p>
<p></p>
<div><i>>Yes as it’s using the Window’s API.</i></div>
<p></p>
</blockquote>
<p></p>
<div><br>
</div>
<div><br>
</div>
<div>What can I do to test if this work?</div>
<div><br>
</div>
<div>Put the tcl code where?</div>
<div><br>
</div>
<div>Can you guide me?</div>
<div><br>
</div>
<div>Or IOhannes?</div>
<br>
<p></p>
<p><br>
</p>
<div id="Signature"><font face="Courier New, Courier, Monospace" size="2">Mensaje telepatico asistido por maquinas.</font>
</div>
<br>
<div style="color:rgb(0,0,0)">
<div>
<div dir="ltr">
<div class="gmail_extra">
<div class="gmail_quote">
<div><br>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</body>
</html>