Показать сообщение отдельно
Старый 22.12.2008, 13:23   #5  
ZVV is offline
ZVV
MCITP
MCP
Oracle
MCBMSS
 
1,006 / 246 (11) ++++++
Регистрация: 13.02.2004
Адрес: Минск
->
Цитата:
Сообщение от DSPIC Посмотреть сообщение
То ли вопроса не понял, то ли шутку не оценил
Там используется "компонента" regex, а точнее .net класс Regex:
http://msdn.microsoft.com/en-us/libr...ons.regex.aspx
Думаю всё гораздо проще.
Просто нужно было уточнить, что смотреть нужно на 4-ке, а то в 3-ке код этого метода совсем другой.

4:
X++:
static boolean str2IntOk(str 100 _str)
{
    boolean retval;
    InteropPermission permission;
    System.Text.RegularExpressions.Regex re;
    ;

    permission = new InteropPermission(InteropKind::ClrInterop);
    permission.assert();

    // BP deviation documented
    re = new System.Text.RegularExpressions.Regex('^\\s*[+\\-]?\\s*[0-9]+\\s*$');

    //return ClrInterop::getAnyTypeForObject(re.IsMatch(_str));

    // BP deviation documented
    retval = CLRInterop::getAnyTypeForObject(re.IsMatch(_str));

    return retval;
}
3:
X++:
static boolean str2IntOk(str 100 _str)
{
    return (! strnFind(_str, '0123456789', 1, 999));
}
__________________
Zhirenkov Vitaly
За это сообщение автора поблагодарили: aidsua (1).