форумhttp://freepascal.ru/forum/
http://freepascal.ru/forum/viewtopic.php?f=13&t=7440
WideCompareText(UTF8Decode(Str1),UTF8Decode(Str2))