CAD图层和线型设置
主要用到函数说明：MxDrawXCustomFunction::Mx_SetSysVar
得到当前空间的所有实体。详细说明如下：
参数 说明
CString sVarName 系统变量名
Value 需要设置的值
设置图层使用如下： Dim param As MxDrawResbuf
Set param = New MxDrawResbuf
param.AddString "CLAYER"
param.AddString "图层1", 5005 ' 5005 = RTSTR,代码是一个字符串类型的值
MxDrawX1.CallEx "Mx_SetSysVar", paramjs创建图层，并设置成当前层代码如下：
function CreateCommentLayer()
{
var mxOcx = document.getElementById("MxDrawXCtrl");
mxOcx.AddLayer("MyComment");
mxOcx.LayerName = "MyComment";
var param = mxOcx.NewResbuf();
param.AddString("CLAYER");
param.AddStringEx("MyComment",5005);
mxOcx.CallEx("Mx_SetSysVar", param);
}设置线型使用如下：
Dim param As MxDrawResbuf
Set param = New MxDrawResbuf
param.AddString "CELTYPE"
param.AddString "DOT", 5005 ' 5005 = RTSTR,代码是一个字符串类型的值
MxDrawX1.CallEx "Mx_SetSysVar", param
页:
[1]