Показать сообщение отдельно
Старый 28.05.2009, 10:43   #6  
DSPIC is offline
DSPIC
Боец
 
1,077 / 1235 (44) ++++++++
Регистрация: 11.04.2008
Думаю, примерно так:
X++:
static void classMethodInfo(Args _args)
{
    SysDictClass    sysDictClass;
    DictMethod      dictMethod;
    counter         methodCount, varCount;
    str             parmsStr;
    ;

    sysDictClass = new SysDictClass(classnum(RunBaseBatch));

    setPrefix(sysDictClass.name());

    methodCount = sysDictClass.objectMethodCnt();

    while (methodCount)
    {
        dictMethod = sysDictClass.objectMethodObject(methodCount);

        if (dictMethod)
        {
            parmsStr = '';

            for (varCount = dictMethod.parameterCnt(); varCount >= 1; varCount --)
            {
                parmsStr += strFmt("%1 %2, ", dictMethod.parameterType(varCount), dictMethod.parameterName(varCount));
            }

            parmsStr = strdel(parmsStr, strlen(parmsStr) - 1, 2);

            info (strFmt ("%1 (%2)", dictMethod.name(), parmsStr));
        }

        methodCount --;
    }
}