网站首页 编程技术 正文

CAD从二进流加载数据（com接口VB语言）

2023-04-03编程技术229172

主要用到函数说明：

MxDrawXCustomFunction::ReadBinStreamEx

从二进流加载数据，详细说明如下：

参数 说明

IMxDrawBinStream* pBinStream

二进制流对象

代码实现如下：

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

Dim param As MxDrawResbuf
Set param = New MxDrawResbuf
 
Dim ret As MxDrawBinStream
 
Set ret = MxDrawX1.CallEx("WriteBinStreamEx", param)
 
If ret.GetCount() > 0 Then
 
    MsgBox "保存成功执行"
 
End If
 
' 读取
Dim retRead As MxDrawResbuf
Set retRead = MxDrawX1.CallEx("ReadBinStreamEx", ret)
If retRead.AtString(0) = "Ok" Then
    MsgBox "读取成功执行"
End If

CAD从二进流加载数据（com接口VB语言）的相关教程结束。

本文地址：https://www.ufcn.cn/tutorials/2345189.html

如非特殊说明，本站内容均来自于网友自主分享，概不代表本站观点，如有任何问题我们都将在收到反馈后的第一时间进行处理！