Create an roSearchScreen
Put a string into the search terms list with a character from outside the US-ASCII set.
Run the code.
Select the item in the list.
msg.GetMessage() will not be the same as the item you inserted into the list.
sub main()
port = CreateObject("roMessagePort")
screen = CreateObject("roSearchScreen")
screen.SetMessagePort(port)
originalText = "Exposé"
history = [originalText]
screen.SetSearchTerms(history)
screen.Show()
loop:
msg = wait(0,screen.GetMessagePort())
if type(msg) = "Invalid" goto loop
' test whether the string in the search result is
if( msg.isFullResult() ) then
incoming = msg.GetMessage()
print "incoming: "+incoming
print len(incoming)
print "originalText: "+originalText
print len(originalText)
if( incoming = originalText ) then
print "No bug"
else
print "Yes bug"
endif
endif
goto loop
End Sub