Hi All.

What is it a code below, and can the use of the character palette of  
kControlEditTextProc the edit field?
kControlEditUnicodeTextProc on the program structure cannot be used.

Yoshiyuki

'----------------------
// Requires OS X 10.3
dim as UInt16 i
dim as OSErr e
dim as Rect   r

edit menu 2
i=fn CountMenuItems(fn GetMenuHandle(2))+2
menu 2,i,1,"Special Characters..."
e=fn SetMenuItemCommandID(fn GetMenuHandle(2),i,_"chrp")

window 1
appearance button 1,,,,,,(23,23)-(477,227),_kControlEditTextProc
def SetButtonFocus(1)

//_kControlEditTextProc
//_kControlEditUnicodeTextProc

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