static void FAN_int2ExcelColChar(Args _args)

{

    Dialog  dlg = new dialog("please enter int number");

    DialogField dlgNum = dlg.addField(types::Integer,"数字");

    int     num;

    name    name;

str THK_int2ColChar(int _col)

{

    int     k, i;

    str     ret;

;

    i    = _col;

    while(i > )

    {

       k    = i mod ;

       if(k == )

       {

           ret  = "Z" + ret;

           i    = i - ;

       }

       else

       {

           ret  = num2char(k + ) + ret;

       }

       i    = i / ;

    }

    return ret;

}

;

    dlg.doInit();

    if(!dlg.run())

        return;

    num = dlgNum.value();

    name = THK_int2ColChar(num);

    setprefix(strfmt("%1",num));

    info(name);

}