[悬10币求]如何求出多个带分隔符字符串每段的最大值并返回带分隔符最大字符串（具体详

yjr111 · 发表于 2011-11-14 15:00:49

50楼俺来顶！飞版应该贡献源码了吧

x_s_s_1 · 发表于 2011-11-14 22:02:51

本帖最后由 x_s_s_1 于 2011-11-14 22:25 编辑

都是vlisp函数，看到晕，努力中

出现; 错误: 参数类型错误: fixnump: 1.2，在函数GetMaxStr（cad2004，2010测试）

飞诗(fsxm) · 发表于 2011-11-14 23:09:41

x_s_s_1 发表于 2011-11-14 22:02
都是vlisp函数，看到晕，努力中
出现; 错误: 参数类型错误: fixnump: 1.2，在函数GetMaxStr（cad200 ...

GetMaxStr中找到
(setq BodyStr (fsxm-join (mapcar 'itoa maxNums) "-")) 这一行~
将itoa改成vl-princ-to-string就行了吧，itoa只能整数，~vl-princ-to-string各种类型都ＯＫ

x_s_s_1 · 发表于 2011-11-14 23:55:15

飞诗(fsxm) 发表于 2011-11-14 23:09
GetMaxStr中找到
(setq BodyStr (fsxm-join (mapcar 'itoa maxNums) "-")) 这一行~
将itoa改成vl-princ ...

可以了，谢谢飞版，继续研究

海盗曹 · 发表于 2012-8-24 21:31:13

学习了，楼主是结构同行啊~

love_cq · 发表于 2020-12-6 22:47:31

最终版的程序有吗楼主，可否分享学习下？

账号		自动登录	找回密码
密码			注册