Robert Covington wrote:

> Is there a way  using a UnicodeTextProc control  (912) to turn off the 
> anti-aliasing  (and to turn it back on)?
> Have a need for showing an anti-a free preview or not (according to 
> the current pref)

The _kControlEditUnicodeTextProc control is built around TXN 
(TeXteNsion, also known as MLTE, also known as MacTextEditor). The 
text, along with many ATSUI attributes, is presumably contained in an 
underlying TXNObject. Unfortunately there is no way to access the 
TXNObject to play tricks on it, such as turning off antialiasing.

For those unfamiliar with the control, here's a minimal demo:

'-----------------
'~'A
'                             Runtime : Rntm Appearance.Incl
'                                 CPU : Carbon
'~'B
_kControlEditUnicodeTextProc = 912
dim as Rect       r
if ( system( _sysVers ) < 1000 ) then ¬
     shutdown "Requires OS X"
window 1
SetRect( r, 100, 100, 350, 115 )
appearance button 1,,,,,, @r, _kControlEditUnicodeTextProc
def SetButtonTextString( 1, "_kControlEditUnicodeTextProc" )
def SetButtonFocus( 1 )

do
HandleEvents
until 0
'-----------------


Robert P.