- UID
- 743803
- 积分
- 25
- 精华
- 贡献
-
- 威望
-
- 活跃度
-
- D豆
-
- 在线时间
- 小时
- 注册时间
- 2014-12-3
- 最后登录
- 1970-1-1
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?立即注册
×
分享下自动读取excel成图技术要点,根据RTK测点的坐标裂成excel格式,然后读取excel坐标在CAD自动生成所要的地物。我写的代码这样:
// 获得Sheet9 _Worksheet excelSheet10;
GetWorkSheet(excelBook, 10, excelSheet10);
rowCount = GetRowCount(excelSheet10);
Range cells10;
cells10.AttachDispatch(excelSheet10.GetCells());
CString fileName9 = TEXT("C:\\环网柜.dwg");
for (long row = 2; row <= rowCount; row++)
{
AcGePoint3d startPoint;
long col = 2;
GetCellValue(cells10, row, col++, startPoint.x);
GetCellValue(cells10, row, col++, startPoint.y);
GetCellValue(cells10, row, col++, startPoint.z);
if (_taccess(fileName9, 0) != -1)
{
AcDbObjectId blkDefId = CBlockUtil::InsertDwgBlockDef(fileName9, TEXT("方井剖面"), true);
// CEntityUtil::SetLayer(blkDefId,TEXT("设备"));
if (blkDefId.isValid())
{
CBlockUtil::InsertBlockRef(blkDefId, AcGePoint3d(startPoint.x, startPoint.y, startPoint.z), 1, 0);
}
}
else
{
acutPrintf(TEXT("\n指定的图形文件不存在."));
}
}
|
|