乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 138|回复: 9

如何将多行文字放进剪切板

[复制链接]
wdb

25

主题

123

帖子

6

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
223
发表于 2004-7-26 00:11:00 | 显示全部楼层 |阅读模式
有两行文字,第一行为str1,第二行为str2,需要将这两行文字放入剪切板。
希望在记事本中粘贴出来时是两行文字。
但粘贴出来后发现还是一行文字,且有非文字字符。
请高手帮忙解决这个问题。
;先装载dos_lib
(defun c:try( / str str1 str2)
                 (setq str1 "ABCD")
                 (setq str2 "EFGH")
                 (setq str (strcat str1 "\n" str2 "\n"))
                 (dos_clipboard str)
)
回复

使用道具 举报

74

主题

1603

帖子

24

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1906
发表于 2004-7-26 02:28:00 | 显示全部楼层
确实有问题
!str:
"ABCD\nEFGH\n"
(dos_clipboard str)代表什么意思?
回复

使用道具 举报

wdb

25

主题

123

帖子

6

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
223
发表于 2004-7-26 10:21:00 | 显示全部楼层

dosLib dos库函数.请参见乐筑天下的资料库.
dos_clipboard       
返回或设置Windows剪贴板的字符串。语法       
(dos_clipboard [string])参数        string 一个字符串值。返回值       
成功时返回一字符串。
出错时返回nil。样例       
(dos_clipboard)
(dos_clipboard "大家好!,这里是乐筑天下。")
回复

使用道具 举报

wdb

25

主题

123

帖子

6

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
223
发表于 2004-7-26 10:25:00 | 显示全部楼层
如果能将整个文本文件的内容放到剪切板就更好了.
回复

使用道具 举报

11

主题

125

帖子

9

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
169
发表于 2004-7-26 21:24:00 | 显示全部楼层
Try
(strcat str1 "\r\n" str)
回复

使用道具 举报

wdb

25

主题

123

帖子

6

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
223
发表于 2004-7-28 11:56:00 | 显示全部楼层
看来vlisp是不容易解决了。我用vc做了个exe用vlisp调用就行了。
回复

使用道具 举报

5

主题

66

帖子

8

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
86
发表于 2004-8-1 15:28:00 | 显示全部楼层
双击,在编辑框里拷贝.
回复

使用道具 举报

wdb

25

主题

123

帖子

6

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
223
发表于 2004-8-2 15:23:00 | 显示全部楼层
想要用vlisp程序实现.
回复

使用道具 举报

62

主题

938

帖子

10

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1186
发表于 2004-8-2 16:04:00 | 显示全部楼层
不好实现吧,要是把它们合在一起输出到外部文件还可以
回复

使用道具 举报

14

主题

46

帖子

6

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
102
发表于 2004-8-2 20:07:00 | 显示全部楼层
记得帮助文件里面有个程序有点类似。
是copy 某个text object里面所有的文字输出到word.
声明模型空间后。引入word的类型库文件。然后打开一个word文件。
在声明一个word文档。vla-get-textstring 取得text obj的内容。
最后用引入类型库文件时定义的方法把text的内容输出到word...
其中他有一个
的方法。
就是用-get-last定义了paragragh...然后用-insertAfter的方法加到前面的text的下一行。
.............
原谅我水平有限。。。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-8-19 07:05 , Processed in 2.936820 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表