461 lines
14 KiB
C++
461 lines
14 KiB
C++
#include "stdafx.h"
|
|
#include "SprinklerByInterDlg.h"
|
|
#include "DbEquipment.h"
|
|
#include "dbpipe.h"
|
|
#include "AcDbObjectPtr.h"
|
|
#include "PickEntSet.h"
|
|
#include "layerdef.h"
|
|
|
|
extern AcDbObjectId InitLayer(const TCHAR *szLayer, AcDbDatabase *pDb = NULL);
|
|
extern bool GlobalFunc::IsStrAllNum(CString csText);
|
|
//**************************************************************************
|
|
// 交点喷头
|
|
//**************************************************************************
|
|
void SprinklerByInter(int idx, double nRadius, BOOL bDrawCir)
|
|
{
|
|
CString csDwb = g_csDwbPath + _T("TwtSys");
|
|
XString xsTmp, xsTmp2, xsTmp3d;
|
|
const TCHAR *szBlkName = NULL;
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000125"), xsTmp) != RTNORM)
|
|
return;
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000128"), xsTmp2) != RTNORM)
|
|
return;
|
|
if(g_Option::instance().g_bBlk3D){
|
|
if(idx == 0){
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000365"), xsTmp3d) != RTNORM)
|
|
return;
|
|
}
|
|
else if(idx == 1){
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000366"), xsTmp3d) != RTNORM)
|
|
return;
|
|
}
|
|
else if(idx == 2){
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000367"), xsTmp3d) != RTNORM)
|
|
return;
|
|
}
|
|
}
|
|
if(idx == 2)
|
|
xsTmp = xsTmp2;
|
|
|
|
CString m_csSysBlk1 = _T("TWTSYS(00000283)");
|
|
PickSet ssAll;
|
|
|
|
XPoint ptTmp1, ptTmp2;
|
|
if(ads_getpoint(NULL, _T("\n请输入第一角点(辅助线LINE,ARC,CIRCLE):<退出>"), ptTmp1) != RTNORM)
|
|
return;
|
|
// ptTmp1 = Ucs2Wcs(ptTmp1);
|
|
if(ads_getcorner(ptTmp1, _T("\n再点取其对角点(辅助线LINE,ARC,CIRCLE) <退出>:"), ptTmp2) != RTNORM)
|
|
return;
|
|
// ptTmp2 = Ucs2Wcs(ptTmp2);
|
|
Entity entTmp;
|
|
CString csLay = _T("*");
|
|
RBList rb;
|
|
if(GlobalFunc::SelectEntity(_T("\n如果希望指定辅助线图层，请选取其中一个图元:<不指定>"), entTmp, rb) == RTNORM){
|
|
TCHAR szLay[256];
|
|
entTmp.GetData(8, szLay);
|
|
csLay = szLay;
|
|
}
|
|
RBList rbMask = ads_buildlist( -4, _T("<or"),
|
|
-4, _T("<and"), RTDXF0, _T("CIRCLE"), 8, csLay, -4, _T("and>"),
|
|
-4, _T("<and"), RTDXF0, _T("ARC"), 8, csLay, -4, _T("and>"),
|
|
-4, _T("<and"), RTDXF0, _T("LINE"), 8, csLay, -4, _T("and>"),
|
|
-4, _T("or>"), NULL);
|
|
|
|
ssAll.Get(_T("C"), ptTmp1, ptTmp2, rbMask);
|
|
|
|
XPointList lstPt;
|
|
for(long i=0;i<ssAll.Length();i++){
|
|
Entity entTmp = ssAll[i];
|
|
XCurveSegment seg(entTmp);
|
|
seg.StartPoint().z = 0;
|
|
seg.EndPoint().z = 0;
|
|
|
|
for(long j=0;j<ssAll.Length();j++){
|
|
Entity entTmp2 = ssAll[j];
|
|
if(entTmp == entTmp2)
|
|
continue;
|
|
XCurveSegment seg2(entTmp2);
|
|
seg2.StartPoint().z = 0;
|
|
seg2.EndPoint().z = 0;
|
|
XPoint p1, p2;
|
|
seg.Intersection(seg2, p1, p2);
|
|
if(!!p1)
|
|
lstPt.NewAppend(p1);
|
|
if(!!p2)
|
|
lstPt.NewAppend(p2);
|
|
}
|
|
}
|
|
for(int m=0;m<lstPt.Length();m++){
|
|
XPoint ptTmp = *lstPt[m];
|
|
CDbEquipment *pEquip = new CDbEquipment;
|
|
pEquip->SetBlock2d(GlobalFunc::GetBlkIdByName(xsTmp));
|
|
if(idx == 1){
|
|
pEquip->SetHidePipe(FALSE);//下喷
|
|
pEquip->SetPipeLength(-250);
|
|
}
|
|
else{
|
|
pEquip->SetHidePipe(TRUE);
|
|
pEquip->SetPipeLength(250);
|
|
}
|
|
pEquip->SetBlock3d(GlobalFunc::GetBlkIdByName(xsTmp3d));
|
|
pEquip->SetLocation(ptTmp);
|
|
pEquip->SetAngle(0);
|
|
pEquip->SetNumber(_T("CIRCLE-1"));
|
|
pEquip->SetScale(g_Option::instance().g_nSprinklerRadius);
|
|
pEquip->SetSysBlock(m_csSysBlk1);
|
|
pEquip->setLayer(LAY_EQUIP_SPRINKLE);
|
|
pEquip->setColor(AcCmColor()); //随层
|
|
GlobalFunc::AddToCurrentSpace(pEquip, Adesk::kTrue);
|
|
if(bDrawCir){
|
|
Entity entLast;
|
|
entLast.GetLast();
|
|
GlobalFunc::WriteXdata(entLast, _T("HYDRANT_RADIUS"), XString(_T("%.2f"), nRadius));
|
|
}
|
|
|
|
}
|
|
SHads_command(RTNONE);
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
//**************************************************************************
|
|
// 交点喷头
|
|
//**************************************************************************
|
|
XCurveSegment GetPipeCurve(Entity ent)
|
|
{
|
|
XCurveSegment seg;
|
|
OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbPipe, pPipe);
|
|
if(pPipe && !pPipe->IsVertical()){
|
|
seg = (XCurveSegment)*pPipe;
|
|
}
|
|
OPENOBJ_END();
|
|
return seg;
|
|
}
|
|
|
|
void SprinklerByInter()
|
|
{
|
|
int nOsMode=0;
|
|
xg_getvar(_T("OSMODE"), &nOsMode);
|
|
nOsMode &= ~0x4000;
|
|
nOsMode |= OS_INT|OS_NEA|OS_CEN|OS_PER;
|
|
XPushVar<int> vOsMode(_T("OSMODE"), nOsMode);
|
|
XPoint ptStart, ptEnd;
|
|
CString csDwb = g_csDwbPath + _T("TwtSys");
|
|
XString xsTmp, xsTmp2, xsTmp3, xsTmp4, xsTmp5, xsTmp2d, xsTmp3d;
|
|
XString xsTmp8, xsTmp9, xsTmp10;//zxl 2011.12.19 add 增加水喷雾喷头
|
|
const TCHAR *szBlkName = NULL;
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000125"), xsTmp) != RTNORM)
|
|
return;
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000128"), xsTmp2) != RTNORM)
|
|
return;
|
|
if (GlobalFunc::LoadDwbBlock(csDwb, _T("00000283"), XString()) != RTNORM) // cet 2011.2.28 add 剖切时需要的图块
|
|
{
|
|
return;
|
|
}
|
|
if (GlobalFunc::LoadDwbBlock(csDwb, _T("00000529"), xsTmp8) != RTNORM)//zxl 2011.12.19 add 增加水喷雾喷头
|
|
{
|
|
return;
|
|
}
|
|
if (GlobalFunc::LoadDwbBlock(csDwb, _T("00000540"), xsTmp9) != RTNORM) // cet 2013.1.5 add 直立型水幕
|
|
{
|
|
return;
|
|
}
|
|
if (GlobalFunc::LoadDwbBlock(csDwb, _T("00000541"), xsTmp10) != RTNORM) // cet 2013.1.5 add 下垂型水幕
|
|
{
|
|
return;
|
|
}
|
|
|
|
if(g_Option::instance().g_bBlk3D){
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000365"), xsTmp3) != RTNORM)
|
|
return;
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000366"), xsTmp4) != RTNORM)
|
|
return;
|
|
if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000367"), xsTmp5) != RTNORM)
|
|
return;
|
|
}
|
|
CString m_csSysBlk1 = _T("TWTSYS(00000283)");
|
|
CString m_csSysBlk2 = _T("TWTSYS(00000530)");//水喷雾 系统 zxl 2011.12.19 add
|
|
CSprinklerByInterDlg dlg(acedGetAcadFrame());
|
|
{
|
|
CTemporaryResourceOverride vTemp;
|
|
dlg.Create(IDD_SPRINKLER_INTER, acedGetAcadFrame());
|
|
dlg.ShowWindow(SW_SHOW);
|
|
acedGetAcadDwgView()->SetFocus();
|
|
}
|
|
GlobalFunc::InitPipeLayer(LAY_PIPE_SPRINKLE);
|
|
InitLayer(LAY_EQUIP_SPRINKLE);
|
|
|
|
while(1){
|
|
PickSet ssAll;
|
|
|
|
XPoint ptTmp1, ptTmp2;
|
|
if(ads_getpoint(NULL, _T("\n请输入第一角点(辅助线LINE,ARC,CIRCLE):<退出>"), ptTmp1) != RTNORM)
|
|
break;
|
|
if(ads_getcorner(ptTmp1, _T("\n再点取其对角点(辅助线LINE,ARC,CIRCLE) <退出>:"), ptTmp2) != RTNORM)
|
|
break;
|
|
Entity entTmp;
|
|
CString csLay = _T("*");
|
|
dlg.UpdateData(TRUE);
|
|
if(dlg.m_bLay){
|
|
RBList rb;
|
|
if(GlobalFunc::SelectEntity(_T("\n如果希望指定辅助线图层，请选取其中一个图元:<不指定>"), entTmp, rb) == RTNORM){
|
|
TCHAR szLay[256];
|
|
entTmp.GetData(8, szLay);
|
|
csLay = szLay;
|
|
}
|
|
}
|
|
|
|
RBList rbMask = ads_buildlist( -4, _T("<or"),
|
|
-4, _T("<and"), RTDXF0, _T("CIRCLE"), 8, csLay, -4, _T("and>"),
|
|
-4, _T("<and"), RTDXF0, _T("ARC"), 8, csLay, -4, _T("and>"),
|
|
-4, _T("<and"), RTDXF0, _T("LINE"), 8, csLay, -4, _T("and>"),
|
|
-4, _T("<and"), RTDXF0, _T("AEC_ZT_PIPE"), 8, csLay, -4, _T("and>"),
|
|
-4, _T("or>"), NULL);
|
|
|
|
|
|
dlg.UpdateData(TRUE);
|
|
ssAll.Get(_T("C"), ptTmp1, ptTmp2, rbMask);
|
|
|
|
//zxl 2011.12.19 add
|
|
if(dlg.m_iType == 0){
|
|
xsTmp2d = xsTmp;
|
|
xsTmp3d = xsTmp4;
|
|
}
|
|
else if(dlg.m_iType == 1){
|
|
xsTmp2d = xsTmp;
|
|
xsTmp3d = xsTmp3;
|
|
}
|
|
else if(dlg.m_iType == 2){
|
|
xsTmp2d = xsTmp2;
|
|
xsTmp3d = xsTmp5;
|
|
}
|
|
else if (dlg.m_iType == 3)//zxl 2011.12.19 add 增加水喷雾喷头
|
|
{
|
|
xsTmp2d = xsTmp8;
|
|
xsTmp3d = xsTmp3;
|
|
}
|
|
else if (dlg.m_iType == 4) // cet 2013.1.5 add 直立型水幕
|
|
{
|
|
xsTmp2d = xsTmp9;
|
|
xsTmp3d = xsTmp4;
|
|
}
|
|
else if (dlg.m_iType == 5) // cet 2013.1.5 add 下垂型水幕
|
|
{
|
|
xsTmp2d = xsTmp10;
|
|
xsTmp3d = xsTmp3;
|
|
}
|
|
|
|
XPointList lstPt;
|
|
for(long i=0;i<ssAll.Length();i++){
|
|
Entity entTmp = ssAll[i];
|
|
if(entTmp.Is(_T("AEC_ZT_PIPE")) && !dlg.m_bPipe)
|
|
continue;
|
|
|
|
XCurveSegment seg(entTmp);
|
|
if(entTmp.Is(_T("AEC_ZT_PIPE")))
|
|
seg = GetPipeCurve(entTmp);
|
|
|
|
seg.StartPoint().z = 0;
|
|
seg.EndPoint().z = 0;
|
|
|
|
for(long j=0;j<ssAll.Length();j++){
|
|
Entity entTmp2 = ssAll[j];
|
|
if(entTmp2.Is(_T("AEC_ZT_PIPE")) && !dlg.m_bPipe)
|
|
continue;
|
|
if(entTmp == entTmp2)
|
|
continue;
|
|
XCurveSegment seg2(entTmp2);
|
|
if(entTmp2.Is(_T("AEC_ZT_PIPE")))
|
|
seg2 = GetPipeCurve(entTmp2);
|
|
seg2.StartPoint().z = 0;
|
|
seg2.EndPoint().z = 0;
|
|
XPoint p1, p2;
|
|
seg.Intersection(seg2, p1, p2);
|
|
if(!!p1)
|
|
lstPt.NewAppend(p1);
|
|
if(!!p2)
|
|
lstPt.NewAppend(p2);
|
|
}
|
|
}
|
|
for(int m=0;m<lstPt.Length();m++){
|
|
XPoint ptTmp = *lstPt[m];
|
|
CDbEquipment *pEquip = new CDbEquipment;
|
|
pEquip->SetBlock2d(GlobalFunc::GetBlkIdByName(xsTmp2d));
|
|
if(dlg.m_iType == 1){
|
|
pEquip->SetHidePipe(FALSE);//下喷
|
|
pEquip->SetPipeLength(-250);
|
|
pEquip->SetSysBlock(m_csSysBlk1);
|
|
}
|
|
else if (dlg.m_iType == 3)//zxl 2011.12.19 add 增加水喷雾喷头
|
|
{
|
|
pEquip->SetHidePipe(TRUE);
|
|
pEquip->SetPipeLength(-250);
|
|
pEquip->SetSysBlock(m_csSysBlk2);
|
|
}
|
|
else if (dlg.m_iType == 4) // cet 2013.1.5 add 增加直立型水幕
|
|
{
|
|
pEquip->SetHidePipe(TRUE);
|
|
pEquip->SetPipeLength(250);
|
|
pEquip->SetSysBlock(_T("TWTSYS(00000542)"));
|
|
}
|
|
else if (dlg.m_iType == 5) // cet 2013.1.5 add 增加下垂型水幕
|
|
{
|
|
pEquip->SetHidePipe(TRUE);
|
|
pEquip->SetPipeLength(-250);
|
|
pEquip->SetSysBlock(_T("TWTSYS(00000542)"));
|
|
}
|
|
else
|
|
{
|
|
pEquip->SetHidePipe(TRUE);
|
|
pEquip->SetPipeLength(250);
|
|
pEquip->SetSysBlock(m_csSysBlk1);
|
|
}
|
|
pEquip->SetBlock3d(GlobalFunc::GetBlkIdByName(xsTmp3d));
|
|
ptTmp.z = dlg.m_nEle*1000;
|
|
pEquip->SetLocation(ptTmp);
|
|
pEquip->SetAngle(0);
|
|
pEquip->SetNumber(_T("CIRCLE-1"));
|
|
pEquip->SetScale(g_Option::instance().g_nSprinklerRadius);
|
|
//pEquip->SetSysBlock(m_csSysBlk1);
|
|
pEquip->setLayer(LAY_EQUIP_SPRINKLE);
|
|
pEquip->setColor(AcCmColor()); //随层
|
|
GlobalFunc::AddToCurrentSpace(pEquip, Adesk::kTrue);
|
|
if(dlg.m_bDrawCir){
|
|
Entity entLast;
|
|
entLast.GetLast();
|
|
GlobalFunc::WriteXdata(entLast, _T("HYDRANT_RADIUS"), dlg.m_csRadius);
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
SHads_command(RTNONE);
|
|
dlg.DestroyWindow();
|
|
return;
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
// CSprinklerByInterDlg dialog
|
|
|
|
IMPLEMENT_DYNAMIC(CSprinklerByInterDlg, CDialog)
|
|
int CSprinklerByInterDlg::m_iType = 1;
|
|
|
|
CSprinklerByInterDlg::CSprinklerByInterDlg(CWnd* pParent /*=NULL*/)
|
|
: CDialog(CSprinklerByInterDlg::IDD, pParent)
|
|
{
|
|
//{{AFX_DATA_INIT(CSprinklerByInterDlg)
|
|
m_bDrawCir = TRUE;
|
|
m_csRadius = _T("");
|
|
m_nEle = 0.0;
|
|
m_bLay = FALSE;
|
|
m_bPipe = FALSE;
|
|
//}}AFX_DATA_INIT
|
|
}
|
|
|
|
|
|
void CSprinklerByInterDlg::DoDataExchange(CDataExchange* pDX)
|
|
{
|
|
CDialog::DoDataExchange(pDX);
|
|
//{{AFX_DATA_MAP(CSprinklerByInterDlg)
|
|
DDX_Control(pDX, IDC_EDIT_ELE, m_editEle);
|
|
DDX_Check(pDX, IDC_CHECK_DRAW, m_bDrawCir);
|
|
DDX_CBString(pDX, IDC_COMBO_RADIUS, m_csRadius);
|
|
DDX_Text(pDX, IDC_EDIT_ELE, m_nEle);
|
|
DDX_Check(pDX, IDC_CHECK_LAY, m_bLay);
|
|
DDX_Check(pDX, IDC_CHECK_PIPE, m_bPipe);
|
|
DDX_Radio(pDX, IDC_RADIO_POS1, m_iType);
|
|
//}}AFX_DATA_MAP
|
|
}
|
|
|
|
|
|
BEGIN_MESSAGE_MAP(CSprinklerByInterDlg, CDialog)
|
|
//{{AFX_MSG_MAP(CSprinklerByInterDlg)
|
|
ON_BN_CLICKED(IDC_CHECK_DRAW, OnCheckDraw)
|
|
ON_WM_CLOSE()
|
|
ON_EN_KILLFOCUS(IDC_EDIT_ELE, OnKillfocusEditEle)
|
|
ON_CBN_KILLFOCUS(IDC_COMBO_RADIUS, OnKillfocusComboRadius)
|
|
ON_MESSAGE(WM_ACAD_KEEPFOCUS, onAcadKeepFocus)
|
|
//}}AFX_MSG_MAP
|
|
END_MESSAGE_MAP()
|
|
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
// CSprinklerByInterDlg message handlers
|
|
|
|
void CSprinklerByInterDlg::OnCheckDraw()
|
|
{
|
|
UpdateData();
|
|
CWnd *pWnd1 = GetDlgItem(IDC_COMBO_RADIUS);
|
|
pWnd1->EnableWindow(m_bDrawCir);
|
|
}
|
|
|
|
void CSprinklerByInterDlg::OnClose()
|
|
{
|
|
CDialog::OnClose();
|
|
acedPostCommand(_T("\33\33"));
|
|
}
|
|
|
|
BOOL CSprinklerByInterDlg::OnInitDialog()
|
|
{
|
|
CDialog::OnInitDialog();
|
|
m_editEle.SetDataType(CRealEdit::eReal);
|
|
|
|
return TRUE; // return TRUE unless you set the focus to a control
|
|
// EXCEPTION: OCX Property Pages should return FALSE
|
|
}
|
|
|
|
void CSprinklerByInterDlg::OnKillfocusEditEle()
|
|
{
|
|
double dData = m_nEle;
|
|
CString sText;
|
|
m_editEle.GetWindowText(sText);
|
|
m_nEle = _tstof(sText);
|
|
if (sText.IsEmpty() || !GlobalFunc::IsStrAllNum(sText))
|
|
{
|
|
m_nEle = dData;
|
|
UpdateData(FALSE);
|
|
acedGetAcadDwgView()->SetFocus();
|
|
m_editEle.SetFocus();
|
|
m_editEle.SetSel(0, -1);
|
|
}
|
|
}
|
|
|
|
void CSprinklerByInterDlg::OnKillfocusComboRadius()
|
|
{
|
|
CString csData = m_csRadius;
|
|
CEdit *pWnd = (CEdit *)GetDlgItem(IDC_COMBO_RADIUS);
|
|
if (pWnd == NULL)
|
|
{
|
|
return;
|
|
}
|
|
CString sText;
|
|
pWnd->GetWindowText(sText);
|
|
double dNewData = _tstof(sText);
|
|
if (dNewData <= 0 || !GlobalFunc::IsStrAllNum(sText))
|
|
{
|
|
m_csRadius = csData;
|
|
UpdateData(FALSE);
|
|
acedGetAcadDwgView()->SetFocus();
|
|
pWnd->SetFocus();
|
|
pWnd->SetSel(0, -1);
|
|
}
|
|
}
|
|
|
|
LONG_PTR CSprinklerByInterDlg::onAcadKeepFocus(UINT_PTR, LONG_PTR)
|
|
{
|
|
POINT pt;
|
|
::GetCursorPos(&pt);
|
|
CRect rect;
|
|
GetWindowRect(&rect);
|
|
if (!(rect.PtInRect(pt)))
|
|
{
|
|
return FALSE;
|
|
}
|
|
return TRUE;
|
|
}
|