乐筑天下

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

vba中CAD的媒体播放器

[复制链接]
Matersammichman

57

主题

235

帖子

3

银币

后起之秀

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

铜币
463
发表于 2006-10-26 17:39:04 | 显示全部楼层 |阅读模式
它可以在vba工具中使用，所以有没有人尝试过编写代码使其正常工作
在ADT2005中，信息很少。

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复
回复

使用道具 举报

mohnston

12

主题

64

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
112
发表于 2006-10-26 20:21:28 | 显示全部楼层
你说的“可用”是什么意思
请记住，因为可以将工具（引用、控件等）添加到项目中，并不意味着这是一个好主意
有些东西不应该添加到VBA项目中，会破坏这些东西
此外，如果您要分发dvb项目，并且这些项目引用了目标计算机未安装和注册的工具，则您将遇到问题。
回复

使用道具 举报

Keith™

154

主题

1274

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1936
发表于 2006-10-26 21:52:56 | 显示全部楼层
我已经成功开发了一个程序，可以通过AutoCAD接口播放mp3、wav和midi文件。该计划被称为CadAMP，可以在这个论坛的其他地方找到。它尚未针对较新版本的AutoCAD进行更新，因此可能会出现一些问题。
在A2k和A2k2中，它将成功地连续播放多个文件，在A2k4中，它仅适用于单个文件(除非有人更新了它)
尝试了播放列表，但由于有太多不同的格式，我放弃了它。你可能知道，像这样的球员没有市场，这就是为什么我没有进一步修饰它。
顺便说一句，因为它使用独立于AutoCAD的API调用和VBA调用，所以只需少量调整，它也应该能够在Microstation中播放。
回复

使用道具 举报

Matersammichman

57

主题

235

帖子

3

银币

后起之秀

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

铜币
463
发表于 2006-10-30 15:21:11 | 显示全部楼层
实际上，这是我想出来的——简单，容易，而且有效。Private Sub command button 1 _ Click()
Me。hide
Dim RetVal
RetVal = Shell(" C:\ Program Files \ Windows Media Player \ WM Player . exe "，1)" Shell to path
' ' '这将加载完整大小的WM。去掉"，1 "使负载最小化。
结束Sub
回复

使用道具 举报

Keith™

154

主题

1274

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1936
发表于 2006-10-30 15:37:07 | 显示全部楼层
使用CadAMP不需要使用任何媒体播放器。相反，在AutoCAD进程中创建了一个新线程，因此AutoCAD正在播放mp3文件。您对AutoCAD的媒体播放器的兴趣激发了我的兴趣，以便重新访问它。我现在已经纠正了A2k2 +中多个文件的问题。
我会上传最新的，包括工具栏和菜单，只要我有时间。
回复

使用道具 举报

Matersammichman

57

主题

235

帖子

3

银币

后起之秀

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

铜币
463
发表于 2006-10-30 15:44:06 | 显示全部楼层
为什么不使用桌面上的快捷方式或工具栏链接呢？？为什么必须启动AutoCAD才能启动媒体播放器？
只是好奇...
作为补充说明...有人知道如何从快捷方式自动加载播放列表吗？？
回复

使用道具 举报

Keith™

154

主题

1274

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1936
发表于 2006-10-30 15:44:47 | 显示全部楼层
太棒了
现在，如果它只能播放M4a文件。。。
回复

使用道具 举报

Keith™

154

主题

1274

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1936
发表于 2006-10-30 18:25:58 | 显示全部楼层
来回答你的第一个问题。您不必启动AutoCAD来听mp3(即启动媒体播放器)，但是，由于这里的大多数人都使用AutoCAD或其他形式的支持VBA的设计软件，因此利用现有线程(即AutoCAD)来执行播放媒体文件所需的命令更有意义。不要困惑。CadAMP不是启动任何媒体播放器的手段，而是将AutoCAD(或Microstation、Excel、Word等)转变为媒体播放器，并且它使用有限数量的资源来实现这一点。更少的处理器时间，更少的内存需求等。因此，它更有效地利用计算机资源，对于那些不允许安装媒体播放器的人来说，它完全与AutoCAD合并，成为它的一部分。当您关闭AutoCAD时，播放器会停止。
现在...我不知道你需要做什么来加载一个快捷方式中的播放列表，我怀疑你需要编辑快捷方式来指向作为参数的播放列表。
回复

使用道具 举报

返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-7-6 20:18 , Processed in 1.068493 second(s), 68 queries .

© 2020-2025 乐筑天下

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