gjm/envi-code
1
0 Fork 0
Code Issues Pull Requests 5 Actions Packages Projects Releases Wiki Activity
Files
5993d6bda4e543ae468c9bdd08108aeac6d20f7c
envi-code/SourceCode/Code2026/Dimension/WellCalcSettingDlg.cpp
T

2844 lines
81 KiB
C++
Raw Normal View History

初始化提交
2026-09-28 15:28:50 +08:00
#include "stdafx.h"
#include "AcDbObjectPtr.h"
#include "GeCurveInline.h"
#include "RBGroups.h"
#include "DbWell.h"
#include "xtext.h"
#include "dbgridsheet.h"
#include "DbPool.h"
#include "DbVerticalSection.h"
#include "DbVerticalSectionFeed.h"
#include <vector>
#include <algorithm>
#include "DbStake.h"
#include <stack>
#include "DbPipe.h"
#include "SHAcDbBlockTableRecPtr.h"
#include "WellCalcSettingDlg.h"
#include "WellCalcModifyEleDlg.h"
#include "layerdef.h"
extern AcDbObjectId InitLayer(const TCHAR *szLayer, BOOL bApplyChange = TRUE);
extern void InsertWellCalcSheet(DList<TWellData> &lstWellSys);
extern void SetPipeLabelType(CDbPipe *pPipe);
namespace
{
AcDbObjectId InitDoteLayer(const TCHAR* szLay)
{
AcDbObjectId idLay = GlobalFunc::GetLayerIdFromString(szLay);
if (!!idLay)
return idLay;
AcDbObjectId id = InitLayer(szLay);
GlobalFunc::AddLineType(_T("CENTER2"));
AcDbLinetypeTable *pLinetypeTbl;
AcDbObjectId ltId;
Acad::ErrorStatus es = acdbCurDwg()->getLinetypeTable(pLinetypeTbl, AcDb::kForRead);
if (es != Acad::eOk) {
return NULL;
}
if ((pLinetypeTbl->getAt(_T("CENTER2"), ltId)) != Acad::eOk) {
pLinetypeTbl->close();
return NULL;
}
pLinetypeTbl->close();
OPENOBJ_BEGIN(id, AcDb::kForWrite, AcDbLayerTableRecord, pRec);
if (pRec) {
pRec->setLinetypeObjectId(ltId);
}
OPENOBJ_END();
return id;
}
AcDbObjectId GetHitSheet(XPoint ptHit)
{
AcDbObjectId id;
PickSet ss(SS_FREE);
RBList mask(RTDXF0, _T("AEC_ZT_SHEET"), NULL);
if (GlobalFunc::GetEntByDxf(ss, _T("AEC_ZT_SHEET")) == Acad::eOk) {
long lCount = ss.Length();
for (long i = 0L; i < lCount; i++) {
Entity ent = ss[i];
OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbSheet, pSheet);
if (pSheet && pSheet->IsValid()) {
XPoly2D poly;
pSheet->GetBorder(poly);
if ((ptHit & poly) == PR_INSIDE) {
acdbGetObjectId(id, ent.name);
break;
}
}
OPENOBJ_END();
}
}
return id;
}
}
//***************************************************************************************************
// 纵断面图
//***************************************************************************************************
// cet 2013.3.1 add 获得池子名
CString GetPoolName(const AcDbObjectId &id)
{
CString sName;
OPENOBJ_BEGIN(id, AcDb::kForRead, CDbPool, pPool);
if (pPool != NULL)
{
sName = pPool->GetLabel();
}
OPENOBJ_END();
return sName;
}
void InsertOtherWellSheet(AcDbObjectId idSheet, DList<TWellData> &lstWellSys)
{
OPENOBJ_BEGIN(idSheet, AcDb::kForWrite, CDbSheet, pSheet);
if (pSheet) {
int nRowAll, nColAll;
CString csText;
nRowAll = pSheet->GetRowNum();
nColAll = pSheet->GetColumnNum();
pSheet->AddRowAt(nRowAll);
GridCell &cell59 = *(*pSheet)(nRowAll - 1, 0);
CString csIdx = cell59.GetText();
int idx2 = _ttoi(csIdx);
int idx = nRowAll + 1;
for (int i = 0; i < lstWellSys.Length() - 1; i++) {
if (i % 2 == 0) {
nRowAll = pSheet->GetRowNum();
pSheet->AddRowAt(nRowAll);
}
else if ((i + 1) % 2 == 0) {
GridCell &cell50 = *(*pSheet)(idx, 0);
cell50.SetText(XString(_T("%d"), ++idx2));
idx++;
}
if (lstWellSys[i]->m_bIsWell) { //井
double nEle = lstWellSys[i]->m_nUpEle;
double nDeep = lstWellSys[i]->m_nDeep;
double nDownEle = lstWellSys[i]->m_nDownEle;
CString csWellUpEle, csDeep, csDownEle, csWellUpEle2, csDeep2, csDownEle2;
csDeep.Format(_T("%.2f"), nDeep);
csDownEle.Format(_T("%.2f"), nDownEle);
csWellUpEle.Format(_T("%.3f"), nEle);
nEle = lstWellSys[i + 2]->m_nUpEle;
nDeep = lstWellSys[i + 2]->m_nDeep;
nDownEle = lstWellSys[i + 2]->m_nDownEle;
csDeep2.Format(_T("%.2f"), nDeep);
csDownEle2.Format(_T("%.2f"), nDownEle);
csWellUpEle2.Format(_T("%.3f"), nEle);
GridCell &cell31 = *(*pSheet)(idx, 1);
cell31.SetText(lstWellSys[i]->m_csName);
GridCell &cell32 = *(*pSheet)(idx, 7);
cell32.SetText(csWellUpEle);
GridCell &cell33 = *(*pSheet)(idx, 11);
cell33.SetText(csDeep);
GridCell &cell34 = *(*pSheet)(idx, 9);
cell34.SetText(csDownEle);
GridCell &cell51 = *(*pSheet)(idx, 2);
cell51.SetText(lstWellSys[i + 2]->m_csName);
GridCell &cell52 = *(*pSheet)(idx, 8);
cell52.SetText(csWellUpEle2);
GridCell &cell53 = *(*pSheet)(idx, 12);
cell53.SetText(csDeep2);
GridCell &cell54 = *(*pSheet)(idx, 10);
cell54.SetText(csDownEle2);
if (lstWellSys[i + 2]->m_bIsDropWell) {
GridCell &cell55 = *(*pSheet)(idx, 13);
cell55.SetText(_T("跌水"));
}
}
else { //管
int iDn = lstWellSys[i]->m_iDn;
CString csDn, csPipeLen, csI, csI2;
csDn.Format(_T("%d"), iDn);
csI2.Format(_T("%.3f"), lstWellSys[i]->m_nI * lstWellSys[i]->m_nLength);
int iTmpI = (int)(lstWellSys[i]->m_nI * 1000);
if (lstWellSys[i]->m_nI * 1000 > iTmpI)
csI.Format(_T("%.4f"), lstWellSys[i]->m_nI);
else
csI.Format(_T("%.3f"), lstWellSys[i]->m_nI);
csPipeLen.Format(_T("%.2f"), lstWellSys[i]->m_nLength);
GridCell &cell61 = *(*pSheet)(idx - 1, 3);
cell61.SetText(csDn);
GridCell &cell62 = *(*pSheet)(idx - 1, 4);
cell62.SetText(csPipeLen);
GridCell &cell63 = *(*pSheet)(idx - 1, 5);
cell63.SetText(csI);
GridCell &cell64 = *(*pSheet)(idx - 1, 6);
cell64.SetText(csI2);
}
}
}
OPENOBJ_END();
}
//绘制高程表
void InsertWellCalcSheet(DList<TWellData> &lstWellSys)
{
XPoint pt;
int ret = XGetPoint(NULL, _T("点取高程表位置\n"), pt);
if (ret != RTNORM) {
return;
}
AcDbObjectId idSheet = NULL;
idSheet = GetHitSheet(pt);
BOOL bContinue = FALSE;
if (idSheet != NULL) {
OPENOBJ_BEGIN(idSheet, AcDb::kForRead, CDbSheet, pSheet);
if (pSheet) {
int nRowAll, nColAll;
CString csText;
nRowAll = pSheet->GetRowNum();
nColAll = pSheet->GetColumnNum();
SheetTitle &title = pSheet->GetTitle();
csText = title.GetText();
if (csText == _T("高程表") && nColAll == 14)
bContinue = TRUE;
}
OPENOBJ_END();
}
if (bContinue) {
InsertOtherWellSheet(idSheet, lstWellSys);
return;
}
AcDbObjectId idTextStyle = GlobalFunc::InitTwtTextStyle(g_Option::instance().g_csSheetStyle);
CDbSheet *pSheet = new CDbSheet;
pSheet->SetRotation(GlobalFunc::Ucs2Wcs(0.0));//add by sr
GridStyle gridStyle;
gridStyle.SetOverrideAll(TRUE);
gridStyle.SetTextHeight(g_Option::instance().g_nSheetHeight);
gridStyle.SetTextStyleId(idTextStyle);
SheetTitle &title = pSheet->GetTitle();
title.GetGridStyle().SetTextHeight(7.0);//设置标题文字高度 zxl 2011.11.29 add
title.SetHeight(7.0);
title.SetText(_T("高程表"));
DividerStyle &style = title.GetDividerStyle();
style.SetDividerFlag(DividerStyle::kNone);
gridStyle.SetHorMode(AcDb::kTextCenter);
gridStyle.SetVerMode(AcDb::kTextVertMid);
gridStyle.SetLineSpaceFactor(0.2);
gridStyle.SetTextWrap(FALSE);
pSheet->SetGridStyle(gridStyle);
pSheet->SetRowHeight(g_Option::instance().g_nSheetHeight + 2);
int rows = lstWellSys.Length() / 2 + 2;
if (!lstWellSys[lstWellSys.Length() - 1]->m_bIsWell)
rows--;
pSheet->InitSheet(rows, 14, g_Option::instance().g_nSheetHeight + 2, 50);
//zxl 0.11.11.25 add 设置外框线宽为中宽
DividerStyle &styleBorder = pSheet->GetBorderStyle();
styleBorder.SetLineWidth(0.2);
SheetRow *pRow = pSheet->GetRow(1);
if (pRow != NULL)
{
DividerStyle &styleRow = pRow->GetDividerStyle();
styleRow.SetLineWidth(0.2);
styleRow.SetDividerFlag(DividerStyle::kLocal);
}
SheetColumn column;
column.SetWidth(12);
pSheet->SetColumnAt(0, column);
GridCell &cell = *(*pSheet)(0, 0);
cell.SetText(_T("序号"));
column.SetWidth(15);
pSheet->SetColumnAt(1, column);
GridCell &cell2 = *(*pSheet)(0, 1);
cell2.SetText(_T("管段井号"));
column.SetWidth(15);
pSheet->SetColumnAt(2, column);
GridCell &cell3 = *(*pSheet)(0, 2);
cell3.SetText(_T("管段井号"));
pSheet->MergeCells(0, 1, 0, 2);
column.SetWidth(15);
pSheet->SetColumnAt(3, column);
GridCell &cell4 = *(*pSheet)(0, 3);
cell4.SetText(_T("管径(mm)"));
column.SetWidth(15);
pSheet->SetColumnAt(4, column);
GridCell &cell5 = *(*pSheet)(0, 4);
cell5.SetText(_T("管长(m)"));
column.SetWidth(15);
pSheet->SetColumnAt(5, column);
GridCell &cell6 = *(*pSheet)(0, 5);
cell6.SetText(_T("坡度"));
column.SetWidth(15);
pSheet->SetColumnAt(6, column);
GridCell &cell7 = *(*pSheet)(0, 6);
cell7.SetText(_T("管底坡降"));
column.SetWidth(15);
pSheet->SetColumnAt(7, column);
GridCell &cell8 = *(*pSheet)(0, 7);
cell8.SetText(_T("设计地面标高(m)"));
column.SetWidth(15);
pSheet->SetColumnAt(8, column);
GridCell &cell9 = *(*pSheet)(0, 8);
cell9.SetText(_T("设计地面标高(m)"));
pSheet->MergeCells(0, 7, 0, 8);
column.SetWidth(15);
pSheet->SetColumnAt(9, column);
GridCell &cell10 = *(*pSheet)(0, 9);
cell10.SetText(_T("管内底标高(m)"));
column.SetWidth(15);
pSheet->SetColumnAt(10, column);
GridCell &cell11 = *(*pSheet)(0, 10);
cell11.SetText(_T("管内底标高(m)"));
pSheet->MergeCells(0, 9, 0, 10);
column.SetWidth(15);
pSheet->SetColumnAt(11, column);
GridCell &cell12 = *(*pSheet)(0, 11);
cell12.SetText(_T("埋深(m)"));
column.SetWidth(15);
pSheet->SetColumnAt(12, column);
GridCell &cell13 = *(*pSheet)(0, 12);
cell13.SetText(_T("埋深(m)"));
pSheet->MergeCells(0, 11, 0, 12);
column.SetWidth(30);
pSheet->SetColumnAt(13, column);
GridCell &cell14 = *(*pSheet)(0, 13);
cell14.SetText(_T("备注"));
pSheet->MergeCells(0, 0, 1, 0);
GridCell &cell15 = *(*pSheet)(1, 1);
cell15.SetText(_T("起始"));
GridCell &cell16 = *(*pSheet)(1, 2);
cell16.SetText(_T("终止"));
pSheet->MergeCells(0, 3, 1, 3);
pSheet->MergeCells(0, 4, 1, 4);
pSheet->MergeCells(0, 5, 1, 5);
pSheet->MergeCells(0, 6, 1, 6);
pSheet->MergeCells(0, 13, 1, 13);
GridCell &cell17 = *(*pSheet)(1, 7);
cell17.SetText(_T("起始"));
GridCell &cell18 = *(*pSheet)(1, 8);
cell18.SetText(_T("终止"));
GridCell &cell19 = *(*pSheet)(1, 9);
cell19.SetText(_T("起始"));
GridCell &cell20 = *(*pSheet)(1, 10);
cell20.SetText(_T("终止"));
GridCell &cell21 = *(*pSheet)(1, 11);
cell21.SetText(_T("起始"));
GridCell &cell22 = *(*pSheet)(1, 12);
cell22.SetText(_T("终止"));
int idx = 2;
for (int i = 0; i < lstWellSys.Length() - 1; i++) {
if ((i + 1) % 2 == 0) {
GridCell &cell50 = *(*pSheet)(idx, 0);
cell50.SetText(XString(_T("%d"), idx - 2));
idx++;
}
if (lstWellSys[i]->m_bIsWell) { //井
if (i == lstWellSys.Length() - 2)
break;
CString csName1 = lstWellSys[i]->m_csName;
CString csName2 = lstWellSys[i + 2]->m_csName;
// cet 2013.3.1 modify 读取池的实际名称
// if(csName2 == _T("HC"))
// csName2 = _T("HC进");
// if(csName1 == _T("HC"))
// csName1 = _T("HC出");
if (csName2 == _T("HC"))
csName2 = GetPoolName(lstWellSys[i + 2]->m_ID) + _T("进");
if (csName1 == _T("HC"))
csName1 = GetPoolName(lstWellSys[i]->m_ID) + _T("出");
double nEle = lstWellSys[i]->m_nUpEle;
double nDeep = lstWellSys[i]->m_nDeep;
double nDownEle = lstWellSys[i]->m_nDownEle;
CString csWellUpEle, csDeep, csDownEle, csWellUpEle2, csDeep2, csDownEle2;
// csDeep.Format(_T("%.3f"), nDeep);
csDeep = GlobalFunc::GetDimWellDeep(nDeep);
//csDownEle.Format(_T("%.3f"), nDownEle);
csDownEle = GlobalFunc::GetDimWellDeep(nDownEle);
csWellUpEle = GlobalFunc::GetDimWellDeep(nEle);
// csWellUpEle.Format(_T("%.3f"), nEle);
nEle = lstWellSys[i + 2]->m_nUpEle;
nDeep = lstWellSys[i + 2]->m_nDeep;
nDownEle = lstWellSys[i + 2]->m_nFrondDownEle;
// csDeep2.Format(_T("%.3f"), nEle-nDownEle);
// csDownEle2.Format(_T("%.3f"), nDownEle);
// csWellUpEle2.Format(_T("%.3f"), nEle);
csDeep2 = GlobalFunc::GetDimWellDeep(nEle - nDownEle);
csDownEle2 = GlobalFunc::GetDimWellDeep(nDownEle);
csWellUpEle2 = GlobalFunc::GetDimWellDeep(nEle);
GridCell &cell31 = *(*pSheet)(idx, 1);
cell31.SetText(csName1);
GridCell &cell32 = *(*pSheet)(idx, 7);
cell32.SetText(csWellUpEle);
GridCell &cell33 = *(*pSheet)(idx, 11);
cell33.SetText(csDeep);
GridCell &cell34 = *(*pSheet)(idx, 9);
cell34.SetText(csDownEle);
GridCell &cell51 = *(*pSheet)(idx, 2);
cell51.SetText(csName2);
GridCell &cell52 = *(*pSheet)(idx, 8);
cell52.SetText(csWellUpEle2);
GridCell &cell53 = *(*pSheet)(idx, 12);
cell53.SetText(csDeep2);
GridCell &cell54 = *(*pSheet)(idx, 10);
cell54.SetText(csDownEle2);
if (lstWellSys[i + 2]->m_bIsDropWell) {
GridCell &cell55 = *(*pSheet)(idx, 13);
// 跌水0.000时,不显示跌水值 zxl 2011.11.16 add
double dDropHeight = nDeep - (nEle - nDownEle);
if (fabs(dDropHeight - 0.0) < 0.001)
{
continue;
}
cell55.SetText(XString(_T("跌水%.3f"), nDeep - (nEle - nDownEle)));
}
}
else { //管
CString csDnType;
OPENOBJ_BEGIN(lstWellSys[i]->m_ID, AcDb::kForRead, CDbPipe, pPipe);
if (pPipe) {
CString csMat = GlobalFunc::GetPipeMaterialByIdx(pPipe->GetMaterial());
csDnType = GlobalFunc::GetDnByMat(csMat); // 2009-9-16 增加DN
}
OPENOBJ_END();
int iDn = lstWellSys[i]->m_iDn;
CString csDn, csPipeLen, csI, csI2;
csDn.Format(_T("%s%d"), csDnType, iDn);
csI2.Format(_T("%.3f"), lstWellSys[i]->m_nI * lstWellSys[i]->m_nLength);
int iTmpI = (int)(lstWellSys[i]->m_nI * 1000);
double nTmpI = iTmpI + 0.01;
if (lstWellSys[i]->m_nI * 1000 > nTmpI)
csI.Format(_T("%.4f"), lstWellSys[i]->m_nI);
else
csI.Format(_T("%.3f"), lstWellSys[i]->m_nI);
//csPipeLen.Format(_T("%.2f"), lstWellSys[i]->m_nLength);
csPipeLen = GlobalFunc::GetDimPipeLen(lstWellSys[i]->m_nLength);
GridCell &cell61 = *(*pSheet)(idx - 1, 3);
cell61.SetText(csDn);
GridCell &cell62 = *(*pSheet)(idx - 1, 4);
cell62.SetText(csPipeLen);
GridCell &cell63 = *(*pSheet)(idx - 1, 5);
cell63.SetText(csI);
GridCell &cell64 = *(*pSheet)(idx - 1, 6);
cell64.SetText(csI2);
}
}
pSheet->SetLocation(GlobalFunc::Ucs2Wcs(pt));
//pSheet->AddToCSpace(TRUE);
GlobalFunc::AddToCurrentSpace(pSheet, TRUE);
}
//绘制纵断面图
//void DrawVerticalSection(DList<TWellData> &lstWellSys, int iScaleX, int iScaleY, double nGridScale, int iMode, double nDeepStart) cet 2011.6.3 modify 添加控制是否显示碰撞标高
//void DrawVerticalSection(DList<TWellData> &lstWellSys, int iScaleX, int iScaleY, double nGridScale, int iMode, double nDeepStart, bool bDimEle) // cet 2011.12.5 modify 添加控制交叉管是否显示
//void DrawVerticalSection(DList<TWellData> &lstWellSys, int iScaleX, int iScaleY, double nGridScale, int iMode, double nDeepStart, bool bDimEle, const std::map<TPipeSys::SysType,bool> &data)// zxl 2013.12.10 modify
void DrawVerticalSection(DList<TWellData> &lstWellSys, int iScaleX, int iScaleY, double nGridScale, int iMode, double nDeepStart, bool bDimEle, bool bDimDist, const std::map<TPipeSys::SysType, bool> &data)
{
InitLayer(_T("0"));
GlobalFunc::PushVarStr clayer(_T("CLAYER"), _T("0"));
XPoint ptIns, ptStart, ptEnd;
xg_getvar(_T("VIEWCTR"), ptIns);
ptIns = GlobalFunc::Ucs2Wcs(ptIns);
PickSet ssDraw(SS_FREE);
ssDraw.IncludeBegin();
CDbVerticalSection *pSect = new CDbVerticalSection;
pSect->SetLayoutRotation(GlobalFunc::Ucs2Wcs(0.0));
pSect->SetInsert(ptIns);
pSect->SetGridScale(nGridScale);
pSect->SetScaleX(iScaleX);
pSect->SetScaleY(iScaleY);
pSect->SetDimEle(bDimEle);
pSect->SetDimDist(bDimDist);
// cet 2011.12.5 add 控制交叉管显示
std::map<TPipeSys::SysType, bool>::const_iterator it;
for (it = data.begin(); it != data.end(); it++)
{
pSect->SetShowCrossPipe(it->first, it->second);
}
pSect->SetCalcMode(iMode);
pSect->SetTextHeight(g_Option::instance().g_nTwtDimHeight);
pSect->SetTextStyleId(GlobalFunc::InitTwtTextStyle(g_Option::instance().g_csTwtDimStyle));
pSect->SetDoteLayer(InitDoteLayer(LAY_TWT_DOTE));
pSect->SetWellDatas(lstWellSys);
pSect->setColor(AcCmColor()); //随层
pSect->SetStartDeep(nDeepStart);
pSect->SetTextLayer(InitLayer(LAY_TEXT));
pSect->SetGridLayer(GlobalFunc::InitGridLayer(LAY_TWT_GRID));
pSect->SetSectLayer(InitLayer(LAY_TWT_SECTION));
if (iMode == 3) //给水系统
pSect->SetSheetHead(g_Option::instance().g_csVerticalSectionHeadFeed);
else
pSect->SetSheetHead(g_Option::instance().g_csVerticalSectionHead);
pSect->Calc();
double nHighEle = pSect->GetMaxDeep();
double nLowEle = pSect->GetMinDeep();
AcDbObjectId id = GlobalFunc::AddToCurrentSpace(pSect, Adesk::kTrue);
ssDraw.IncludeEnd();
ssDraw.Redraw(2);
ptIns = GlobalFunc::Wcs2Ucs(ptIns);
actrTransactionManager->flushGraphics(); //acad 刷新
XPoint xp;
if (GlobalFunc::DragMovePickSet(ssDraw, _T("\n请点取纵断面图位置<退出>: "), ptIns, xp) != RTNORM)
ssDraw.Erase();
}
//绘制给水纵断面图
void DrawVerticalSectionFeed(DList<TFeedWellData> &lstWellSys, int iScaleX, int iScaleY, double nGridScale, double nDeepStart, bool bDimEle, bool bDimDist, const std::map<TPipeSys::SysType, bool> &data)
{
InitLayer(_T("0"));
GlobalFunc::PushVarStr clayer(_T("CLAYER"), _T("0"));
XPoint ptIns, ptStart, ptEnd;
xg_getvar(_T("VIEWCTR"), ptIns);
ptIns = GlobalFunc::Ucs2Wcs(ptIns);
PickSet ssDraw(SS_FREE);
ssDraw.IncludeBegin();
CDbVerticalSectionFeed *pSect = new CDbVerticalSectionFeed;
pSect->SetLayoutRotation(GlobalFunc::Ucs2Wcs(0.0));
pSect->SetInsert(ptIns);
pSect->SetGridScale(nGridScale);
pSect->SetScaleX(iScaleX);
pSect->SetScaleY(iScaleY);
// zxl 2013.12.5 add 控制交叉管显示
pSect->SetDimEle(bDimEle);
pSect->SetDimDist(bDimDist);
std::map<TPipeSys::SysType, bool>::const_iterator it;
for (it = data.begin(); it != data.end(); it++)
{
pSect->SetShowCrossPipe(it->first, it->second);
}
pSect->SetCalcMode(0);
pSect->SetTextHeight(g_Option::instance().g_nTwtDimHeight);
pSect->SetTextStyleId(GlobalFunc::InitTwtTextStyle(g_Option::instance().g_csTwtDimStyle));
pSect->SetDoteLayer(InitDoteLayer(LAY_TWT_DOTE));
pSect->SetWellDatas(lstWellSys);
pSect->setColor(AcCmColor()); //随层
pSect->SetStartDeep(nDeepStart);
pSect->SetTextLayer(InitLayer(LAY_TEXT));
pSect->SetGridLayer(GlobalFunc::InitGridLayer(LAY_TWT_GRID));
pSect->SetSectLayer(InitLayer(LAY_TWT_SECTION));
pSect->SetSheetHead(g_Option::instance().g_csVerticalSectionHeadFeed);
pSect->Calc();
double nHighEle = pSect->GetMaxDeep();
double nLowEle = pSect->GetMinDeep();
AcDbObjectId id = GlobalFunc::AddToCurrentSpace(pSect, Adesk::kTrue);
ssDraw.IncludeEnd();
ssDraw.Redraw(2);
ptIns = GlobalFunc::Wcs2Ucs(ptIns);
actrTransactionManager->flushGraphics(); //acad 刷新
XPoint xp;
if (GlobalFunc::DragMovePickSet(ssDraw, _T("\n请点取纵断面图位置<退出>: "), ptIns, xp) != RTNORM)
ssDraw.Erase();
}
// cet 2012.7.24 add 管网是否已经计算过
bool IsCalced(SSearchPipeList *pList, bool bFromImport = true)
{
std::stack<SSearchPipeList*> stackItem;
stackItem.push(pList);
SSearchPipeList *pLstTemp = NULL;
double dGradient = 0.0; // 坡度
XPoint ptS, ptE, ptFront;
while (!stackItem.empty())
{
pLstTemp = stackItem.top();
stackItem.pop();
if (pLstTemp->m_iType == 0)
{
OPENOBJ_BEGIN(pLstTemp->m_ID, AcDb::kForRead, CDbPipe, pPipe);
if (pPipe != NULL)
{
dGradient = pPipe->GetPipeGradient();
ptS = pPipe->StartPoint();
ptE = pPipe->EndPoint();
TPipeSys::FlowDirection flowDir = pPipe->GetFlowDir();
// 流向
if (pLstTemp->m_pPrevious != NULL)
{
OPENOBJ_BEGIN(pLstTemp->m_pPrevious->m_ID, AcDb::kForRead, CDbPipeNode, pNode);
if (pNode != NULL)
{
ptFront = pNode->GetLocation();
CDbPool *pPool = CDbPool::cast(pNode);
if (pPool != NULL)
{
int nNum = pPool->GetInterfaceNum();
for (int i = 0; i < nNum; i++)
{
const CPipeInterface &face = pPool->GetInterface(i);
if (face.m_idPipe == pLstTemp->m_ID)
{
ptFront = face.m_ptLocation;
break;
}
}
}
}
OPENOBJ_END();
if (ptFront.Distance2d(ptS) < 0.001)
{
if (bFromImport && (flowDir == TPipeSys::kFromEnd)
|| !bFromImport && (flowDir == TPipeSys::kFromStart))
{
return false;
}
}
else if (ptFront.Distance2d(ptE) < 0.001)
{
if (bFromImport && (flowDir == TPipeSys::kFromStart)
|| !bFromImport && (flowDir == TPipeSys::kFromEnd))
{
return false;
}
}
}
// 管道坡度为零或起始点标高相等视为未计算过
if (fabs(dGradient) < 1e-6 || fabs(ptS.z - ptE.z) < 0.0001)
{
return false;
}
}
OPENOBJ_END();
}
for (int i = 0; i < pLstTemp->m_lstNode.Length(); i++)
{
stackItem.push(pLstTemp->m_lstNode[i]);
}
}
return true;
}
// 内径改为工程直径，和图面赋值保持一致 zxl 2013.10.12 modify
// cet 2012.7.26 add 管内底标高
double GetPipeDownEle(const AcDbObjectId &idPipe, const AcDbObjectId &idWell)
{
// 获得与管道相连的点
XPoint ptWell;
AcDbEntity *pEnt = NULL;
acdbOpenObject(pEnt, idWell, AcDb::kForRead);
if (pEnt != NULL)
{
AecXDbWell *pWell = AecXDbWell::cast(pEnt);
CDbPool *pPool = CDbPool::cast(pEnt);
if (pWell != NULL)
{
ptWell = pWell->GetLocation();
}
else if (pPool != NULL)
{
int nNum = pPool->GetInterfaceNum();
for (int i = 0; i < nNum; i++)
{
const CPipeInterface &face = pPool->GetInterface(i);
if (face.m_idPipe == idPipe)
{
ptWell = face.m_ptLocation;
break;
}
}
}
pEnt->close();
}
double dEle = 0.0;
OPENOBJ_BEGIN(idPipe, AcDb::kForRead, CDbPipe, pPipe);
if (pPipe != NULL)
{
// 内径改为工程直径，和图面赋值保持一致 zxl 2013.10.12 modify
//CString sMaterial = GlobalFunc::GetPipeMaterialByIdx(pPipe->GetMaterial());
//double dDn = pPipe->GetDnDiameter();
//double dRadius = GetPipeDjByDn(sMaterial, static_cast<int>(dDn)) * 0.5;
double dUnit = 1.0;
if (!GlobalFunc::DocGetMeterUnitDraw())
{
dUnit = 0.001;
}
double dDn = pPipe->GetDnDiameter();
double dRadius = dDn * 0.001 * 0.5;
XPoint ptS = pPipe->StartPoint();
XPoint ptE = pPipe->EndPoint();
if (ptS.Distance2d(ptWell) < 0.001)
{
dEle = ptS.z * dUnit - dRadius;
}
else if (ptE.Distance2d(ptWell) < 0.001)
{
dEle = ptE.z * dUnit - dRadius;
}
}
OPENOBJ_END();
return dEle;
}
//把树结构的数据转化为DLIST链表结构
BOOL GetWellListData2(SSearchPipeList *pListAll, DList<TWellData> &lstWellSys)
{
if (pListAll->m_iType == -1)
return FALSE;
TWellData *pList = new TWellData();
pList->m_iDn = pListAll->m_iDn;
if (pListAll->m_iType == 0)
{
OPENOBJ_BEGIN(pListAll->m_ID, AcDb::kForRead, CDbPipe, pPipe);
if (pPipe) {
CString csMat = GlobalFunc::GetPipeMaterialByIdx(pPipe->GetMaterial());
double nDnOut = GlobalFunc::GetPipeOutDByDn(csMat, pList->m_iDn) * 1000;
pList->m_iSpare = (int)nDnOut;
}
OPENOBJ_END();
}
if (pListAll->m_iType == 3 || pListAll->m_iType == 4) {
pList->m_bIsWell = TRUE;
AcDbObjectId id = pListAll->m_ID;
ads_name ent;
acdbGetAdsName(ent, id);
CString csWellRadius = GlobalFunc::ReadXdata(ent, _T("TG-WELL-RADIUS"));
CString csGroundEle = GlobalFunc::ReadXdata(ent, _T("TG-WELL-GroundEle"));
BOOL bIsRectWell = FALSE;
OPENOBJ_BEGIN(id, AcDb::kForRead, CDbEquipment, pEquip);
if (pEquip) {
AcDbObjectId idRec = pEquip->GetBlock2d();
if (_tcsicmp(GlobalFunc::GetBlkNameById(idRec), _T("$TwtSys$00000336")) == 0)
bIsRectWell = TRUE;
}
OPENOBJ_END();
pList->m_nGroundEle = _tstof(csGroundEle);
pList->m_nWellRadius = _tstof(csWellRadius) / 2.0; //转化为半径
if (fabs(pList->m_nWellRadius) < 0.1)
pList->m_nWellRadius = 350;
if (bIsRectWell)
pList->m_nWellRadius *= (-1);
}
else
pList->m_bIsWell = FALSE;
if (pListAll->m_iNum == 4)
pList->m_bIsDropWell = TRUE;
//如果接化粪池，管线长度要减去化粪池遮挡的部分
if (pListAll->m_iType == 0) {
SSearchPipeList *pListPrevious = pListAll->m_pPrevious;
BOOL bFlag = FALSE;
if (pListPrevious != NULL && pListPrevious->m_iType == 4) {
bFlag = TRUE;
}
else if (pListAll->m_lstNode.Length() == 1) {
pListPrevious = pListAll->m_lstNode[0];
if (pListPrevious != NULL && pListPrevious->m_iType == 4) //4:化粪池
bFlag = TRUE;
}
if (bFlag) {
AcDbObjectId id = pListPrevious->m_ID;
OPENOBJ_BEGIN(id, AcDb::kForRead, CDbPool, pEquip);
if (pEquip) {
double nXScale = pEquip->GetSizeX();
if (!GlobalFunc::DocGetMeterUnitDraw())
nXScale = nXScale / 2000;
else
nXScale = nXScale / 2.0;
pListAll->m_nSpare = pListAll->m_nLength + nXScale;//管长＝对象长－池长度/2
// pListAll->m_nLength = pListAll->m_nLength - nXScale/2000;//管长＝对象长－池长度/2
}
OPENOBJ_END();
}
}
pList->m_csName = pListAll->m_csName;
pList->m_ID = pListAll->m_ID;
pList->m_nI = pListAll->m_nI;
pList->m_nUpEle = pListAll->m_nDang; //井地面标高
// cet 2012.7.26 add 化粪池地面标高
if (pListAll->m_iType == 4)
{
CDbPool *pPool = NULL;
acdbOpenObject(pPool, pListAll->m_ID, AcDb::kForRead);
if (pPool != NULL)
{
pList->m_nUpEle = pPool->GetGroundEle();
pPool->close();
}
}
pList->m_nDownEle = pListAll->m_nStartPress; //跌水井底标高
pList->m_nLength = pListAll->m_nLength;
pList->m_dRealLength = pListAll->m_nSpare; //真实管长用m_nSpare存放
// if(!GlobalFunc::DocGetMeterUnitDraw())
// pList->m_nLength = pList->m_nLength/1000;
lstWellSys.Append(pList);
BOOL bRet = TRUE;
long len = pListAll->m_lstNode.Length();
for (long i = 0; i < len; i++) {
SSearchPipeList *pList = pListAll->m_lstNode[i];
bRet = GetWellListData2(pList, lstWellSys);
}
return bRet;
}
// cet 2012.7.24 add 读取已计算管网信息
void GetCalcedWellListData(SSearchPipeList *pListAll, DList<TWellData> &lstWellSys, int nMode)
{
if (!GetWellListData2(pListAll, lstWellSys))
{
return;
}
double dDeepStart = 0.0;
double dPipeLen(0), dI(0), dFrontPipeEle(0);
double dEleStart = 0.0;
XPoint ptWell;
for (int i = 0; i < lstWellSys.Length(); i++)
{
if (lstWellSys[i]->m_bIsWell) // 井
{
AcDbObjectId id = lstWellSys[i]->m_ID;
if (dPipeLen > 0)
{
if (i != lstWellSys.Length() - 1)
{
lstWellSys[i]->m_nDownEle = GetPipeDownEle(lstWellSys[i + 1]->m_ID, id);
}
if (i != 0)
{
lstWellSys[i]->m_nFrondDownEle = GetPipeDownEle(lstWellSys[i - 1]->m_ID, id);
}
double dWellEle = lstWellSys[i]->m_nUpEle;
double dWellDownEle = lstWellSys[i]->m_nDownEle;
double dWellDeep = dWellEle - dWellDownEle; // 埋深 地面－井底
if (lstWellSys[i]->m_bIsDropWell)
{
dDeepStart = lstWellSys[i]->m_nDownEle;
}
else
{
double dRadiusFront(0), dRadiusBack(0);
if (i != 0)
{
dRadiusFront = lstWellSys[i - 1]->m_iDn;
}
if (i != lstWellSys.Length() - 1)
{
dRadiusBack = lstWellSys[i + 1]->m_iDn;
}
// 得到外径
double dDifference(0);
if (dRadiusFront > 0 && dRadiusBack > 0) // 井前后管径差
{
dDifference = (dRadiusBack - dRadiusFront) / 1000;
}
if (nMode == 0) // 管顶平接
dDeepStart = dDeepStart - dI * dPipeLen - dDifference;
else if (nMode == 1) // 管底平接
dDeepStart = dDeepStart - dI * dPipeLen;
else if (nMode == 2 || nMode == 3) // 水面平接
dDeepStart = dDeepStart - dI * dPipeLen - dDifference / 2;
if (lstWellSys[i]->m_csName == _T("HC"))
{
OPENOBJ_BEGIN(id, AcDb::kForRead, CDbPool, pEquip);
if (pEquip)
{
if (pEquip->GetSpare() > 0.01)
dDeepStart -= pEquip->GetSpare();
else
dDeepStart -= 0.1; // 化粪池
}
OPENOBJ_END();
}
}
dWellDeep = dWellEle - dDeepStart;
lstWellSys[i]->m_nDeep = dWellDeep;
}
if (i == 0)
{
lstWellSys[i]->m_nDownEle = GetPipeDownEle(lstWellSys[i + 1]->m_ID, id);
lstWellSys[i]->m_nDeep = lstWellSys[i]->m_nUpEle - lstWellSys[i]->m_nDownEle;
dDeepStart = lstWellSys[i]->m_nDownEle;
}
}
else if (!lstWellSys[i]->m_bIsWell) // 管
{
dPipeLen = lstWellSys[i]->m_nLength;
dI = lstWellSys[i]->m_nI;
}
}
}
//重新确定水流方向, 链表第一个点为水入口 cet 2012.7.26 add
void ResetPipeDirFromImport(SSearchPipeList *pListAll)
{
if (pListAll == NULL)
{
return;
}
long len = pListAll->m_lstNode.Length();
if (pListAll->m_iType == 0)
{
XPoint ptFront;
if (pListAll->m_pPrevious != NULL)
{
OPENOBJ_BEGIN(pListAll->m_pPrevious->m_ID, AcDb::kForRead, CDbPipeNode, pNode);
if (pNode != NULL)
{
ptFront = pNode->GetLocation();
CDbPool *pPool = CDbPool::cast(pNode);
if (pPool != NULL)
{
int nNum = pPool->GetInterfaceNum();
for (int i = 0; i < nNum; i++)
{
const CPipeInterface &face = pPool->GetInterface(i);
if (face.m_idPipe == pListAll->m_ID)
{
ptFront = face.m_ptLocation;
break;
}
}
}
}
OPENOBJ_END();
}
OPENOBJ_BEGIN(pListAll->m_ID, AcDb::kForWrite, CDbPipe, pPipe);
if (pPipe && !!ptFront)
{
XPoint p1 = ptFront;
p1.z = 0;
XPoint p2 = pPipe->StartPoint();
p2.z = 0;
if (pPipe->IsVertical())
{
if (pPipe->StartPoint().z > pPipe->EndPoint().z)
{
pPipe->SetFlowDir(TPipeSys::kFromEnd);
}
else
{
pPipe->SetFlowDir(TPipeSys::kFromStart);
}
}
else if (p1 == p2)
pPipe->SetFlowDir(TPipeSys::kFromStart);
else
pPipe->SetFlowDir(TPipeSys::kFromEnd);
}
OPENOBJ_END();
}
for (long i = 0; i < len; i++)
{
SSearchPipeList *pList = pListAll->m_lstNode[i];
ResetPipeDirFromImport(pList);
}
}
//纵断面图主函数
void VerticalSection()
{
Entity entStartWell, entEndWell;
RBList rbMask(RTDXF0, _T("AEC_ZT_WELL"), NULL);
RBList rbMaskDim(RTDXF0, _T("AEC_ZT_WELLDIM"), NULL);
if (GlobalFunc::SelectEntity(_T("\n请选择起点井:<退出>"), entStartWell, rbMask) != RTNORM)
return;
TCHAR szLay[256];
entStartWell.GetData(8, szLay);
if (_tcsicmp(szLay, LAY_WELL_FEED) == 0)
{
//VerticalSectionFeed(entStartWell);
return;
}
GlobalFunc::SelectEntity(_T("\n请选择终止井:<自动搜索>"), entEndWell, rbMask);
SSearchPipeList *pListAll = new SSearchPipeList();
PickSet ssAll(SS_FREE);
ssAll += entStartWell;
//if (!SearchOutdoorWell(entStartWell, entEndWell, pListAll, ssAll, FALSE)) {
// g_Option::instance().adsout << _T("起点井和终止井没有正确相连\n");
// ssAll.Redraw(3);
// delete pListAll;
// return;
//}
if (ssAll.Length() < 3) {
AfxMessageBox(_T("系统数据不全, 请检查管线是否标注管径, 管线流动方向是否不一致!"));
delete pListAll;
return;
}
actrTransactionManager->flushGraphics(); //acad 刷新
ssAll.Redraw(3);
/* cet 2012.7.24 modify 根据管网是否已经计算过加以区分
long len = ssAll.Length();
TCHAR szTmp[256];
int rett = ads_getstring(NULL, _T("\n需要计算的管网系统已高亮显示:<计算>"), szTmp);
if(rett == RTCAN){
ssAll.Redraw(4);
delete pListAll;
return;
}
double nDeepStart(0.8);
CTemporaryResourceOverride vTemp;
CWellCalcSettingDlg dlg(0);
if(_tcsicmp(szLay, LAY_WELL_FEED) == 0)
dlg.m_iMode = 3;
GetWellListData(pListAll, dlg.m_lstWellSys);
*/
CTemporaryResourceOverride vTemp;
CWellCalcSettingDlg dlg(0);
dlg.SetListAll(pListAll);
if (_tcsicmp(szLay, LAY_WELL_FEED) == 0)
dlg.m_iMode = 3;
if (IsCalced(pListAll)) // 计算过
{
TCHAR szTmp[256];
int nRet = 0;
INITGET_BEG(0, _T("A"));
nRet = ads_getkword(_T("\n需要计算的管网系统已高亮显示[读取已经算信息(A)]<重新计算>:"), szTmp);
INITGET_END();
if (nRet == RTNONE)
{
GetWellListData2(pListAll, dlg.m_lstWellSys);
}
else if (nRet == RTNORM)
{
GetCalcedWellListData(pListAll, dlg.m_lstWellSys, dlg.m_iMode);
// 计算过的管网可直接进行图面赋值，高程表，纵断面
dlg.m_bCalc = TRUE;
}
else if (nRet == RTCAN)
{
ssAll.Redraw(4);
delete pListAll;
return;
}
}
else // 未计算
{
TCHAR szTmp[256];
int nRet = ads_getstring(NULL, _T("\n需要计算的管网系统已高亮显示:<计算>"), szTmp);
if (nRet == RTCAN)
{
ssAll.Redraw(4);
delete pListAll;
return;
}
GetWellListData2(pListAll, dlg.m_lstWellSys);
}
dlg.m_ssAll += ssAll;
XPoint ptLow3, ptUp3;
ssAll.GetExtend(ptLow3, ptUp3);
GlobalFunc::AssureInCurrentView_New(ptLow3, ptUp3);
if (dlg.DoModal() != IDOK) {
delete pListAll; //删除链头
ssAll.Redraw(4);
return;
}
delete pListAll; //删除链头
ssAll.Redraw(4);
return;
}
//***************************************************************************************************
// 编辑纵断
//***************************************************************************************************
//extern int EditVerticalSectionFeed(AcDbObjectId id);
int EditVerticalSection(AcDbObjectId id)
{
if (!id)
return RTERROR;
CTemporaryResourceOverride vTemp;
CWellCalcSettingDlg dlg(1);
// cet 2011.12.5 add
std::map<TPipeSys::SysType, bool> data;
data[TPipeSys::kFeedWater] = false;
data[TPipeSys::kDirtWater] = false;
data[TPipeSys::kUselessWater] = false;
data[TPipeSys::kRainWater] = false;
data[TPipeSys::kUsedWater] = false;
data[TPipeSys::kFireFighting] = false;
data[TPipeSys::kOther] = false;
// cet 2012.1.30 add 设置当前对话框为编辑纵断面图状态
dlg.EditVerticalSection(TRUE);
OPENOBJ_BEGIN(id, AcDb::kForRead, CDbVerticalSection, pVS);
if (pVS) {
dlg.m_csSheetHead = pVS->GetSheetHead();
pVS->GetWellDatas(dlg.m_lstWellSys);
// dlg.m_dDeep = pVS->GetStartDeep();
dlg.m_csDeep.Format(_T("%.3f"), pVS->GetStartDeep());
dlg.m_iX = pVS->GetScaleX();
dlg.m_iY = pVS->GetScaleY();
int iMode = pVS->GetCalcMode();
if (iMode >= 100) {
iMode -= 100;
dlg.m_bFromRight = TRUE;
}
dlg.m_iMode = iMode;
dlg.m_bDimEle = pVS->IsDimEle(); // cet 2011.6.3 add
dlg.m_bDimDist = pVS->IsDimDist();// zxl 2013.12.10 add
if (fabs(pVS->GetGridScale() - 0.5) < 0.01)
dlg.m_iGridScale = 0;
else if (fabs(pVS->GetGridScale() - 1) < 0.01)
dlg.m_iGridScale = 1;
else if (fabs(pVS->GetGridScale() - 2) < 0.01)
dlg.m_iGridScale = 2;
else if (fabs(pVS->GetGridScale()) < 0.01)
dlg.m_iGridScale = 3;
// cet 2011.12.5 add
std::map<TPipeSys::SysType, bool>::iterator it;
for (it = data.begin(); it != data.end(); it++)
{
(*it).second = pVS->IsShowCrossPipe(it->first);
}
}
OPENOBJ_END();
OPENOBJ_BEGIN(dlg.m_lstWellSys[0]->m_ID, AcDb::kForRead, AecXDbWell, pWell);
if (!pWell) {
g_Option::instance().adsout << _T("\n平面图信息已经丢失！请确认平面图和纵断面图在一张DWG中。");
return RTERROR;
}
OPENOBJ_END();
dlg.SetShowPipeData(data); // cet 2011.12.5 add
if (dlg.DoModal() == IDOK) {
dlg.GetShowPipeData(data); // cet 2011.12.5 add
OPENOBJ_BEGIN(id, AcDb::kForWrite, CDbVerticalSection, pVS);
if (pVS) {
if (dlg.m_iGridScale == 0)
pVS->SetGridScale(0.5);
else if (dlg.m_iGridScale == 1)
pVS->SetGridScale(1);
else if (dlg.m_iGridScale == 2)
pVS->SetGridScale(2);
else if (dlg.m_iGridScale == 3)
pVS->SetGridScale(0);
pVS->SetWellDatas(dlg.m_lstWellSys);
pVS->SetStartDeep(_tstof(dlg.m_csDeep));
int iMode = dlg.m_iMode;
if (dlg.m_bFromRight && iMode != 3)
iMode += 100;
pVS->SetCalcMode(iMode);
pVS->SetScaleX(dlg.m_iX);
pVS->SetScaleY(dlg.m_iY);
pVS->SetDimEle(dlg.m_bDimEle ? true : false); // cet 2011.6.3 add
pVS->SetDimDist(dlg.m_bDimDist ? true : false);// zxl 2013.12.10 add
pVS->Calc();
// cet 2011.12.5 add
std::map<TPipeSys::SysType, bool>::iterator it;
for (it = data.begin(); it != data.end(); it++)
{
pVS->SetShowCrossPipe(it->first, it->second);
}
}
OPENOBJ_END();
}
return 1;
}
//***************************************************************************************************
// 纵断标高
//***************************************************************************************************
//从纵断面图读取井的跌落高度 zxl 2011.11.17 add
void SetWellDropHeight(DList<TWellData> &lstWellSys)
{
double dLen = 0.0;
double dDI = 0.0;
double dDim1 = 0.0;
double dDim2 = 0.0;
for (int i = 1; i < lstWellSys.Length(); i++)
{
dLen = lstWellSys[i]->m_nLength;
dDI = lstWellSys[i]->m_nI;
dDim1 = lstWellSys[i]->m_nFrondDownEle;
dDim2 = lstWellSys[i]->m_nDownEle;
if (fabs(dDim1 + dDI * dLen - dDim2) > 0.001)
{
CString sTemp;
sTemp.Format(_T("%0.3f"), fabs(dDim1 + dDI * dLen - dDim2));
lstWellSys[i]->m_csSpare = sTemp;
}
}
}
void ModifyVericalSectionEle()
{
Entity ent;
RBList rbMask(RTDXF0, _T("AEC_ZT_VERTICALSECTION,AEC_ZT_VERTICALSECTION_FEED"), NULL);
if (GlobalFunc::SelectEntity(_T("\n请选择纵断面图<退出>:"), ent, rbMask) != RTNORM)
return;
if (ent.Is(_T("AEC_ZT_VERTICALSECTION")))
{
CTemporaryResourceOverride vTemp;
CWellCalcModifyEleDlg dlg(0);
OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbVerticalSection, pVS);
if (pVS) {
pVS->GetWellDatas(dlg.m_lstWellSys);
SetWellDropHeight(dlg.m_lstWellSys);//从纵断面图读取井的跌落高度 zxl 2011.11.17 add
}
OPENOBJ_END();
if (dlg.DoModal() == IDOK) {
OPENOBJ_BEGIN(ent, AcDb::kForWrite, CDbVerticalSection, pVS);
if (pVS) {
pVS->SetWellDatas(dlg.m_lstWellSys);
pVS->Calc();
}
OPENOBJ_END();
}
}
else
{
CTemporaryResourceOverride vTemp;
CWellCalcModifyEleDlg dlg(1);
OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbVerticalSectionFeed, pVS);
if (pVS) {
pVS->GetWellDatas(dlg.m_lstFeedWellSys);
}
OPENOBJ_END();
if (dlg.DoModal() == IDOK) {
OPENOBJ_BEGIN(ent, AcDb::kForWrite, CDbVerticalSectionFeed, pVS);
if (pVS) {
pVS->SetWellDatas(dlg.m_lstFeedWellSys);
pVS->Calc();
}
OPENOBJ_END();
}
}
}
TGridWellDeep::TGridWellDeep()
{
AppendCol(_T("起点"), 35);
AppendCol(_T("终点"), 35);
AppendCol(_T("管长m"), 50);
AppendCol(_T("管径mm"), 50);
AppendCol(_T("坡度‰"), 55);
AppendCol(_T("管底坡降m"), 50);
AppendCol(_T("起点"), 45);
AppendCol(_T("终点"), 45);
AppendCol(_T("起点"), 45);
AppendCol(_T("终点"), 45);
AppendCol(_T("起点"), 45);
AppendCol(_T("终点"), 45);
SetColPosFix();
SetColFixLength();
SetColFixWidth(); //不响应调整列宽度操作
SetNoPaste();
FitLastCol();
GetCol(3).SetComboEdit();
GetCol(4).SetComboEdit();
COLORREF color = RGB(255, 0, 0);
GetCol(4).SetTextColor(color);
GetCol(3).SetTextColor(color);
COLORREF color2 = RGB(0, 0, 255);;
GetCol(5).SetTextColor(color2);
GetCol(8).SetTextColor(color2);
GetCol(9).SetTextColor(color2);
GetCol(10).SetTextColor(color2);
GetCol(11).SetTextColor(color2);
}
void TGridWellDeep::OnCellComboString(WDGridCell&cell, CComboBox&combo)
{
if (cell.GetColIndex() == 3) {
combo.AddString(_T("200"));
combo.AddString(_T("250"));
combo.AddString(_T("300"));
combo.AddString(_T("350"));
combo.AddString(_T("400"));
combo.AddString(_T("450"));
combo.AddString(_T("500"));
combo.AddString(_T("600"));
}
else if (cell.GetColIndex() == 4) {
combo.AddString(_T("1"));
combo.AddString(_T("2"));
combo.AddString(_T("3"));
combo.AddString(_T("4"));
combo.AddString(_T("5"));
combo.AddString(_T("6"));
}
}
/////////////////////////////////////////////////////////////////////////////
// CWellCalcSettingDlg dialog
//double CWellCalcSettingDlg::m_nDeep = 0.8;
const UINT nMenuId = 100; // cet 2011.12.5 add
const UINT nMenuTypeId = 1000; // zxl 2012.03.29 add
int CWellCalcSettingDlg::m_iLengthType = 0;
CWellCalcSettingDlg::CWellCalcSettingDlg(int mode, CWnd* pParent /*=NULL*/)
: CDialog(CWellCalcSettingDlg::IDD, pParent), m_ssAll(SS_FREE)
{
//{{AFX_DATA_INIT(CWellCalcSettingDlg)
m_iMode = 0;
m_csX = _T("100");
m_csY = _T("50");
m_iGridScale = 0;
m_bFromRight = FALSE;
m_iInput = 0;
m_csDeep = _T("0.8");
m_csEndEle = _T("");
m_bDimEle = FALSE;
m_bDimDist = FALSE;
//}}AFX_DATA_INIT
// m_dDeep = 0.8;
// m_dEndEle = 0;
m_bNeedDraw = FALSE;
/* cet 2012.1.30 modify 读取比例数据
m_iX = (int)DocGetPScale();
if(GlobalFunc::DocGetMeterUnitDraw())
m_iX =m_iX*1000;
m_iY = 50;
*/
ReadWriteScaleFromRegedit(TRUE);
m_bEdit = FALSE;
m_bCalc = FALSE;
// m_nMaxDeep = 0;
// m_nMinDeep = 0;
m_iOpenMode = mode;
m_csSheetHead = _T("");
m_pMenu = NULL;
// zxl 2012.03.28 add
m_pMenuLength = NULL;
m_pListAll = NULL;
InitMapData(); // cet 2011.12.5 add
}
void CWellCalcSettingDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
//{{AFX_DATA_MAP(CWellCalcSettingDlg)
DDX_Control(pDX, IDC_COMBO_Y, m_comboY);
DDX_Control(pDX, IDC_COMBO_X, m_comboX);
DDX_CBIndex(pDX, IDC_COMBO_MODE, m_iMode);
DDX_CBString(pDX, IDC_COMBO_X, m_csX);
DDX_CBString(pDX, IDC_COMBO_Y, m_csY);
DDX_CBIndex(pDX, IDC_COMBO_GRID, m_iGridScale);
DDX_Check(pDX, IDC_CHECK_FROM_RIGHT, m_bFromRight);
DDX_Radio(pDX, IDC_RADIO_INPUT1, m_iInput);
DDX_Text(pDX, IDC_EDIT_DEEP, m_csDeep);
DDX_Text(pDX, IDC_EDIT_ENDELE, m_csEndEle);
DDX_Check(pDX, IDC_CHECK_DIMELE, m_bDimEle);
DDX_Check(pDX, IDC_CHECK_DIMDIST, m_bDimDist);
//}}AFX_DATA_MAP
}
BEGIN_MESSAGE_MAP(CWellCalcSettingDlg, CDialog)
//{{AFX_MSG_MAP(CWellCalcSettingDlg)
ON_BN_CLICKED(IDC_BUTTON_CALC, OnButtonCalc)
ON_BN_CLICKED(IDC_BUTTON_SHEET, OnButtonSheet)
ON_BN_CLICKED(IDC_BUTTON_TODWG, OnButtonTodwg)
ON_BN_CLICKED(IDC_BUTTON_MODIFYELE, OnButtonModifyele)
ON_BN_CLICKED(IDC_BUTTON_HIDE, OnButtonHide)
ON_BN_CLICKED(IDC_RADIO_INPUT1, OnRadioInput1)
ON_BN_CLICKED(IDC_RADIO_INPUT2, OnRadioInput2)
ON_BN_CLICKED(IDC_BUTTON_SHOW, OnButtonShow)
ON_BN_CLICKED(IDC_BTN_MENU, OnBtnLengthType)
//}}AFX_MSG_MAP
END_MESSAGE_MAP()
/////////////////////////////////////////////////////////////////////////////
// CWellCalcSettingDlg message handlers
//绘制纵断面图
void CWellCalcSettingDlg::OnOK()
{
UpdateData(TRUE);
m_iX = _ttoi(m_csX);
m_iY = _ttoi(m_csY);
// cet 2012.1.30 add 非编辑纵断面图时，保存比例数据
if (!m_bEdit)
{
ReadWriteScaleFromRegedit(FALSE);
}
ResetWellStake();
if (m_iOpenMode == 1) {
CDialog::OnOK();
return;
}
if (m_lstWellSys.Length() < 3 || !m_bCalc)
return;
if (m_iX < 1 || m_iY < 1)
{
MessageBox(_T("绘图比例应大于0！"), _T("比例错误")); // cet 2011.6.13 add
return;
}
GlobalFunc::HideDialog(this, TRUE);
double nGridScale(0);
if (m_iGridScale == 0)
nGridScale = 0.5;
else if (m_iGridScale == 1)
nGridScale = 1;
else if (m_iGridScale == 2)
nGridScale = 2;
else if (m_iGridScale == 3)
nGridScale = 0;
int iMode = m_iMode;
if (m_bFromRight && m_iMode != 3)
iMode += 100;
// DrawVerticalSection(m_lstWellSys, m_iX, m_iY, nGridScale, iMode, _tstof(m_csDeep)); cet 2011.6.3 modify
// cet 2011.12.5 modify
// DrawVerticalSection(m_lstWellSys, m_iX, m_iY, nGridScale, iMode, _tstof(m_csDeep), m_bDimEle ? true : false);
std::map<TPipeSys::SysType, bool> data;
GetShowPipeData(data);
DrawVerticalSection(m_lstWellSys, m_iX, m_iY, nGridScale, iMode, _tstof(m_csDeep), m_bDimEle ? true : false, m_bDimDist ? true : false, data);
TCHAR szTmp[256];
//TPipePerDocData *pData = GetCurPipeDocData();
//pData->ApplyUpdates();
ads_getstring(NULL, _T("\n按任意键返回对话框:<返回>"), szTmp);
GlobalFunc::HideDialog(this, FALSE);
return;
}
//std::vector 的回调函数
static bool GreaterByParm(TPtOnStake item1, TPtOnStake item2)
{
if (item1.m_dParm - item2.m_dParm < AcGeContext::gTol.equalPoint())//倒序
{
return false;
}
return true;
}
//对桩进行排序
BOOL SortStakePoints(AcArray<TPtOnStake> &arStake, AcDbCurve * pCurve)
{
std::vector<TPtOnStake> PtOnStakeVector;
TPtOnStake ptOnCrItem;
int len = arStake.length();
for (int i = 0; i < len; i++)
{
ptOnCrItem = arStake.at(i);
ptOnCrItem.m_pCurve = pCurve;
pCurve->getClosestPointTo(ptOnCrItem.m_ptGeOn, ptOnCrItem.m_ptGeOn);
pCurve->getParamAtPoint(ptOnCrItem.m_ptGeOn, ptOnCrItem.m_dParm);
PtOnStakeVector.push_back(ptOnCrItem);
}
//排序
std::vector<TPtOnStake>::iterator itHead = PtOnStakeVector.begin();
std::vector<TPtOnStake>::iterator itTail = PtOnStakeVector.end();
std::sort(itHead, itTail, GreaterByParm);
itHead = PtOnStakeVector.begin();
itTail = PtOnStakeVector.end();
arStake.setLogicalLength(0);
std::vector<TPtOnStake>::iterator it;
for (it = itHead; it != itTail; it++)
{
arStake.append(*it);
}
return TRUE;
}
void CWellCalcSettingDlg::GetCurveFPick(Entity ent, PickSet &ss, RBList &rbMask)
{
if (ent.Is(_T("LINE"))) {
XLine line(ent);
GlobalFunc::AssureInCurrentView_New(line.StartPoint(), line.EndPoint());
line.TransUCS(RBGroups(0), RBGroups(1)); // 把 UCS 转为 WCS
RBList rbPoint = ads_buildlist(RT3DPOINT, &line.StartPoint(), RT3DPOINT, &line.EndPoint(), NULL);
ss.Get(_T("F"), rbPoint, NULL, rbMask);
}
else if (ent.Is(_T("ARC"))) {
XArc arc(ent);
XCurveSegment seg;
seg = arc;
XPoly2D xPline;
seg.AsPoly2D(xPline);
XPoint pt1, pt2;
pt1 = *xPline[0];
xPline.Length();
pt2 = *xPline[xPline.Length() - 1];
GlobalFunc::AssureInCurrentView_New(pt1, pt2);
xPline.TransUCS(RBGroups(0), RBGroups(1)); // 把 UCS 转为 WCS
RBList rbPoint = xPline.Polygon();
ss.Get(_T("F"), rbPoint, NULL, rbMask);
}
else {
XPoly2D xPline(ent);
XPoint pt1, pt2;
pt1 = *xPline[0];
xPline.Length();
pt2 = *xPline[xPline.Length() - 1];
GlobalFunc::AssureInCurrentView_New(pt1, pt2);
xPline.TransUCS(RBGroups(0), RBGroups(1)); // 把 UCS 转为 WCS
RBList rbPoint = xPline.Polygon();
ss.Get(_T("F"), rbPoint, NULL, rbMask);
}
}
//已知桩号数字，返回标注内容， 如：820 返回K0+825
CString GetStakeName(double dTextValue, CString sStakePrefix)
{
double dTextN = dTextValue / 1000;
CString sText, sTextN;
sTextN.Format(_T("%.2f"), dTextN);
//文字是1000的多少倍
int nTextN = _ttoi(sTextN);
//除以1000后的余数
double dTextResidue = fabs(dTextValue - 1000 * nTextN);
sTextN.Format(_T("%.0f"), dTextResidue);
int nLen = sTextN.GetLength();
sTextN.Format(_T("%.2f"), dTextResidue);
//判断有没有小数
double dEndResidue = _tstof(sTextN.Right(2));
dEndResidue /= 100;
if (dEndResidue < 0.01)
{
if (nLen == 1)
sText.Format(_T("%s%d+00%.0f"), sStakePrefix, nTextN, dTextResidue);
else if (nLen == 2)
sText.Format(_T("%s%d+0%.0f"), sStakePrefix, nTextN, dTextResidue);
else
sText.Format(_T("%s%d+%.0f"), sStakePrefix, nTextN, dTextResidue);
}
else
{
if (nLen == 1)
sText.Format(_T("%s%d+00%.2f"), sStakePrefix, nTextN, dTextResidue);
else if (nLen == 2)
sText.Format(_T("%s%d+0%.2f"), sStakePrefix, nTextN, dTextResidue);
else
sText.Format(_T("%s%d+%.2f"), sStakePrefix, nTextN, dTextResidue);
}
return sText;
}
//更新井的桩号
void CWellCalcSettingDlg::ResetWellStake()
{
RBList rbMask(RTDXF0, _T("AEC_ZT_STAKE"), NULL);
RBList rbMask2(RTDXF0, _T("LINE,ARC,LWPOLYLINE"), NULL);
PickSet ss(SS_FREE);
ss.Get(_T("X"), NULL, NULL, rbMask);
long dd = ss.Length();
if (ss.Length() < 2) //本图根本就没有桩号
return;
if (m_iOpenMode == 1) {
if (m_csSheetHead.Find(_T("桩号")) < 0)
return;
}
else
{
if (g_Option::instance().g_csVerticalSectionHead.Find(_T("桩号")) < 0)
return;
}
//1. 得到桩号所经过的路径曲线
CString csStakeHead = _T("K");
Entity entCurve;
for (int i = 0; i < m_lstWellSys.Length(); i++) {
if (m_lstWellSys[i]->m_bIsWell) { //井
AcDbObjectId id = m_lstWellSys[i]->m_ID;
XPoint ptWell, ptStake;
OPENOBJ_BEGIN(id, AcDb::kForRead, CDbEquipment, pEquip);
if (pEquip) {
ptWell = pEquip->GetLocation();
ptWell.z = 0;
}
OPENOBJ_END();
//得到该井最近的1桩号
double dDist = -1;
Entity entStake;
for (long j = 0; j < ss.Length(); j++)
{
Entity ent = ss[j];
OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbStake, pEquip);
if (pEquip) {
pEquip->GetStakeBeforeChar(csStakeHead);
XPoint pt = pEquip->GetLocation();
pt.z = 0;
double dDistTmp = ads_distance(pt, ptWell);
if (dDist < 0 || dDist > dDistTmp)
{
dDist = dDistTmp;
ptStake = pt;
entStake = ent;
}
}
OPENOBJ_END();
}
PickSet ssCurve(SS_FREE);
GlobalFunc::AssureInCurrentView_New(ptStake, ptStake);
GlobalFunc::GetPointPickSet(ptStake, ssCurve, rbMask2);
long len3 = ssCurve.Length();
if (ssCurve.Length() == 1)
{
entCurve = ssCurve[0L];
break;
}
else if (ssCurve.Length() == 2)
{
TCHAR szLay1[256];
TCHAR szLay2[256];
Entity ent1 = ssCurve[0L];
Entity ent2 = ssCurve[1L];
ent1.GetData(8, szLay1);
ent2.GetData(8, szLay2);
if (_tcsicmp(szLay1, _T("TWT_STAKE")) == 0)
entCurve = ent2;
if (_tcsicmp(szLay2, _T("TWT_STAKE")) == 0)
entCurve = ent1;
}
}
}
if (!entCurve)
return;
//2. 得到通过该曲线所有的桩号，并把他们放到桩号容器中arStake
AcArray<TPtOnStake> arStake2;
PickSet ssStake(SS_FREE);
GetCurveFPick(entCurve, ssStake, rbMask);
int len = ssStake.Length();
for (long m = 0; m < len; m++)
{
Entity ent = ssStake[m];
OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbStake, pEquip);
if (pEquip) {
XPoint pt = pEquip->GetLocation();
pt.z = 0;
AcDbObjectId id = pEquip->objectId();
TPtOnStake ptOnStake;
ptOnStake.m_ptGeOn = pt;
ptOnStake.m_dVal = pEquip->GetStakeValue();
arStake2.append(ptOnStake);
}
OPENOBJ_END();
// CString csVal = GlobalFunc::ReadXdata(ent, _T("STAKEVALUE"));
//
// OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbEquipment, pEquip);
// if(pEquip){
// XPoint pt = pEquip->GetLocation();
// pt.z = 0;
// AcDbObjectId id = pEquip->objectId();
// TPtOnStake ptOnStake;
// ptOnStake.m_ptGeOn = pt;
// ptOnStake.m_dVal = _tstof(csVal);
// arStake2.append(ptOnStake);
// }
// OPENOBJ_END();
}
//3. 对容器中的桩号，按曲线进行排序（倒序）
OPENOBJ_BEGIN(entCurve, AcDb::kForRead, AcDbCurve, pCurve);
if (pCurve)
{
SortStakePoints(arStake2, pCurve);
//4. 求每个井的桩号（先投影到曲线上，然后根据前后2桩号，差值求桩号）
for (i = 0; i < m_lstWellSys.Length(); i++) {
if (m_lstWellSys[i]->m_bIsWell) { //井
AcDbObjectId id = m_lstWellSys[i]->m_ID;
XPoint ptWell, ptStake;
OPENOBJ_BEGIN(id, AcDb::kForRead, CDbEquipment, pEquip);
if (pEquip) {
ptWell = pEquip->GetLocation();
ptWell.z = 0;
}
OPENOBJ_END();
pCurve->getClosestPointTo(ptWell, ptWell, Adesk::kTrue);
double dParmWell(0);
pCurve->getParamAtPoint(ptWell, dParmWell);
int iIdx1(-1), iIdx2(-1);
for (int n = 0; n < arStake2.length(); n++)
{
if ((dParmWell - arStake2.at(n).m_dParm) > -0.001)
{
iIdx1 = n;
break;
}
}
iIdx2 = iIdx1 - 1;
if (iIdx1 > -1 && iIdx2 > -1 && iIdx1 < arStake2.length())
{
double dVal1 = arStake2.at(iIdx1).m_dVal;
double dVal2 = arStake2.at(iIdx2).m_dVal;
double dValRet = GlobalFunc::GetValBetween2(dVal1, dVal2, arStake2.at(iIdx1).m_dParm, arStake2.at(iIdx2).m_dParm, dParmWell);
CString csText = GetStakeName(dValRet, csStakeHead);
// 求出来的桩号写入井的扩展数据，自定义绘制的时候会自动取
ads_name entWell;
acdbGetAdsName(entWell, id);
GlobalFunc::WriteXdata(entWell, _T("TWT-STAKEVALUE"), csText);
}
}
}
}
OPENOBJ_END();
//delete pCurve;
}
// zxl 2012.03.29 add
void CWellCalcSettingDlg::RetsetLength(DList<TWellData> &lst)
{
if (m_iLengthType == 0)
{
return;
}
double dLen = 0.0;
int iIndex = 0;
for (int i = 0; i < lst.Length(); i++)
{
dLen = lst[i]->m_nLength;
iIndex = dLen;
if (m_iLengthType == 1)
{
double d = dLen - iIndex;
if (d - 0.5 > 0.0)
{
dLen = iIndex + 1;
}
else if (d - 0.5 < 0.0 && d - 0.0 > 0.0)
{
dLen = iIndex + 0.5;
}
lst[i]->m_nLength = dLen;
}
else if (m_iLengthType == 2)
{
if (fabs(dLen - iIndex) > 0.001)
{
dLen = iIndex + 1;
lst[i]->m_nLength = dLen;
}
}
}
}
//绘制高程表
void CWellCalcSettingDlg::OnButtonSheet()
{
UpdateData(TRUE);
if (m_iOpenMode == 0 && (m_lstWellSys.Length() < 3 || !m_bCalc))
return;
GlobalFunc::HideDialog(this, TRUE);
// zxl 2012.03.29 add
DList<TWellData> lstWellSysCopy;
lstWellSysCopy.copyFrom(m_lstWellSys);
RetsetLength(lstWellSysCopy);
InsertWellCalcSheet(lstWellSysCopy);
actrTransactionManager->flushGraphics(); //acad 刷新
TCHAR szTmp[256];
ads_getstring(NULL, _T("\n按任意键返回对话框:<返回>"), szTmp);
GlobalFunc::HideDialog(this, FALSE);
return;
}
void CWellCalcSettingDlg::ResetWellDownEle()
{
for (int i = 0; i < m_lstWellSys.Length(); i++) {
m_lstWellSys[i]->m_nDownEle = m_lstWellOld[i]->m_nDownEle;
m_lstWellSys[i]->m_bIsDropWell = m_lstWellOld[i]->m_bIsDropWell;
}
}
//反算起点
void CWellCalcSettingDlg::CalcFromEnd()
{
//先检查是否有跌水井
for (int i = 0; i < m_lstWellSys.Length(); i++) {
if (m_lstWellSys[i]->m_bIsWell) {
if (m_lstWellSys[i]->m_bIsDropWell) {
MessageBox(_T("有跌水井，不支持反向计算。"));
return;
}
}
}
int len = m_lstWellSys.Length();
if (len < 3)
return;
double nPipeLen(0), nI(0), nFrontPipeEle(0);
double dEndEle = _tstof(m_csEndEle);
m_lstWellSys[len - 1]->m_nDownEle = dEndEle;
m_lstWellSys[len - 1]->m_nFrondDownEle = dEndEle;
m_lstWellSys[len - 1]->m_nDeep = m_lstWellSys[len - 1]->m_nUpEle - dEndEle;
nFrontPipeEle = dEndEle;
//m_nPipeQ 为井埋深(米), m_nV 为井底标高(米), nI为管坡度, m_nDang地面标高, m_nStartPress跌水井底标高
for (i = len - 1; i > -1; i--) {
if (m_lstWellSys[i]->m_bIsWell) { //井
AcDbObjectId id = m_lstWellSys[i]->m_ID;
if (nPipeLen > 0) {
double dRadiusFront(0), dRadiusBack(0);
if (i != 0)
dRadiusFront = m_lstWellSys[i - 1]->m_iDn;
dRadiusBack = m_lstWellSys[i + 1]->m_iDn;
double dDifference(0);
if (dRadiusFront > 0 && dRadiusBack > 0)//井前后管径差
dDifference = (dRadiusBack - dRadiusFront) / 1000;
double dWellDownEle = nFrontPipeEle + nI * nPipeLen;
if (m_iMode == 0) //管顶平接
nFrontPipeEle = dWellDownEle + dDifference;
else if (m_iMode == 1) //管底平接
nFrontPipeEle = dWellDownEle;
else if (m_iMode == 2 || m_iMode == 3) //水面平接
nFrontPipeEle = dWellDownEle + dDifference / 2;
double dWellDeep = m_lstWellSys[i]->m_nUpEle - m_lstWellSys[i]->m_nDownEle;
m_lstWellSys[i]->m_nDownEle = dWellDownEle;
m_lstWellSys[i]->m_nDeep = dWellDeep;
m_lstWellSys[i]->m_nFrondDownEle = nFrontPipeEle;
}
}
else if (!m_lstWellSys[i]->m_bIsWell) { //管
nPipeLen = m_lstWellSys[i]->m_nLength;
nI = m_lstWellSys[i]->m_nI;
CString csPipeName = m_lstWellSys[i - 1]->m_csName + m_lstWellSys[i + 1]->m_csName;
OPENOBJ_BEGIN(m_lstWellSys[i]->m_ID, AcDb::kForWrite, CDbPipe, pPipe);
if (pPipe) {
pPipe->SetSysLabel(csPipeName);
}
OPENOBJ_END();
}
}
}
//计算
void CWellCalcSettingDlg::OnButtonCalc()
{
UpdateData(TRUE);
for (m_grid.MoveToFirst(); !m_grid.IsOut(); m_grid.MoveToNext()) {
WDGridRow *pRow = m_grid.CurRow();
CString csName1 = (LPCTSTR)(*pRow)[0].GetText();
CString csName2 = (LPCTSTR)(*pRow)[1].GetText();
CString csName;
CString csDn = (LPCTSTR)(*pRow)[3].GetText();
CString csI = (LPCTSTR)(*pRow)[4].GetText();
csName = csName1 + csName2;
if (csName == _T(""))
break;
for (int i = 0; i < m_lstWellSys.Length(); i++) {
if (!m_lstWellSys[i]->m_bIsWell) {
OPENOBJ_BEGIN(m_lstWellSys[i]->m_ID, AcDb::kForRead, CDbPipe, pPipe);
if (pPipe) {
CString csPipeName = pPipe->GetSysLabel();
if (csPipeName == csName) {
m_lstWellSys[i]->m_iDn = _ttoi(csDn);
m_lstWellSys[i]->m_nI = _tstof(csI) / 1000;
CString csMat = GlobalFunc::GetPipeMaterialByIdx(pPipe->GetMaterial());
double nDnOut = GlobalFunc::GetPipeOutDByDn(csMat, _ttoi(csDn)) * 1000;
m_lstWellSys[i]->m_iSpare = (int)nDnOut;
break;
}
}
OPENOBJ_END();
}
}
}
m_bCalc = TRUE;
//反算起点
if (m_iInput == 1) {
CalcFromEnd();
CheckDropWell();
UpdateGrid();
double dDeepS = m_lstWellSys[0]->m_nUpEle - m_lstWellSys[0]->m_nDownEle;
m_csDeep.Format(_T("%.3f"), dDeepS);
UpdateData(FALSE);
return;
}
double nDeepStart = _tstof(m_csDeep);
m_lstWellSys[0]->m_nDeep = nDeepStart; //m_nPipeQ 为井埋深
double nPipeLen(0), nI(0), nFrontPipeEle(0);
double nEleStart = m_lstWellSys[0]->m_nUpEle;
nDeepStart = nEleStart - nDeepStart; //井底标高 = 起点井地面标高-最小埋深
m_lstWellSys[0]->m_nDownEle = nDeepStart;
if (m_iOpenMode == 0) {
XPoint ptLow3, ptUp3;
m_ssAll.GetExtend(ptLow3, ptUp3);
GlobalFunc::AssureInCurrentView_New(ptLow3, ptUp3);
}
//m_nPipeQ 为井埋深(米), m_nV 为井底标高(米), nI为管坡度, m_nDang地面标高, m_nStartPress跌水井底标高
for (int i = 0; i < m_lstWellSys.Length(); i++) {
if (m_lstWellSys[i]->m_bIsWell) { //井
AcDbObjectId id = m_lstWellSys[i]->m_ID;
if (nPipeLen > 0) {
double nWellEle = m_lstWellSys[i]->m_nUpEle;
double nWellDownEle = m_lstWellSys[i]->m_nDownEle;
double nLastEnd = nDeepStart - nI * nPipeLen;
// double nFrontPipeDeep = nWellEle - nLastEnd; //埋深 地面－前管
double nWellDeep = nWellEle - nWellDownEle; //埋深 地面－井底
nFrontPipeEle = nLastEnd;
if (m_lstWellSys[i]->m_bIsDropWell) {
nDeepStart = m_lstWellSys[i]->m_nDownEle;
m_lstWellSys[i]->m_nFrondDownEle = nFrontPipeEle;
}
else {
double nRadiusFront(0), nRadiusBack(0);
nRadiusFront = m_lstWellSys[i - 1]->m_iDn;
if (i != m_lstWellSys.Length() - 1)
{
nRadiusBack = m_lstWellSys[i + 1]->m_iDn;
}
//得到外径
double nDifference(0);
if (nRadiusFront > 0 && nRadiusBack > 0) {//井前后管径差
nDifference = (nRadiusBack - nRadiusFront) / 1000;
}
m_lstWellSys[i]->m_nFrondDownEle = nDeepStart - nI * nPipeLen;
if (m_iMode == 0) //管顶平接
nDeepStart = nDeepStart - nI * nPipeLen - nDifference;
else if (m_iMode == 1) //管底平接
nDeepStart = nDeepStart - nI * nPipeLen;
else if (m_iMode == 2 || m_iMode == 3) //水面平接
nDeepStart = nDeepStart - nI * nPipeLen - nDifference / 2;
if (m_lstWellSys[i]->m_csName == _T("HC"))
{
OPENOBJ_BEGIN(id, AcDb::kForRead, CDbPool, pEquip);
if (pEquip) {
if (pEquip->GetSpare() > 0.01)
nDeepStart -= pEquip->GetSpare();
else
nDeepStart -= 0.1;//化粪池
}
OPENOBJ_END();
}
}
m_lstWellSys[i]->m_nDownEle = nDeepStart;
nWellDeep = nWellEle - nDeepStart;
m_lstWellSys[i]->m_nDeep = nWellDeep;
}
}
else if (!m_lstWellSys[i]->m_bIsWell) { //管
if (i == m_lstWellSys.Length() - 1)
continue;
nPipeLen = m_lstWellSys[i]->m_nLength;
// if(m_lstWellSys[i]->m_dRealLength > 0.1)
// nPipeLen = m_lstWellSys[i]->m_dRealLength;
nI = m_lstWellSys[i]->m_nI;
CString csPipeName = m_lstWellSys[i - 1]->m_csName + m_lstWellSys[i + 1]->m_csName;
if (m_lstWellSys[i + 1]->m_csName == _T("HC"))
csPipeName += _T("进");
else if (m_lstWellSys[i - 1]->m_csName == _T("HC"))
csPipeName = m_lstWellSys[i - 1]->m_csName + _T("出") + m_lstWellSys[i + 1]->m_csName;
OPENOBJ_BEGIN(m_lstWellSys[i]->m_ID, AcDb::kForWrite, CDbPipe, pPipe);
if (pPipe) {
pPipe->SetSysLabel(csPipeName);
}
OPENOBJ_END();
}
}
CheckDropWell();
UpdateGrid();
}
//检查每个井是否有支路汇进来，如果有，而且支路的管底标高低于本次计算该井的底标高，建议用户干涉让他成为跌水井
void CWellCalcSettingDlg::CheckDropWell()
{
m_map.RemoveAll();
double nPipeLen(0);
CString csPromptAll = _T("标高检查：\n");
for (int i = 0; i < m_lstWellSys.Length(); i++) {
if (m_lstWellSys[i]->m_bIsWell) { //井
AcDbObjectId id = m_lstWellSys[i]->m_ID;
if (nPipeLen > 0) {
double nWellEle = m_lstWellSys[i]->m_nUpEle;
double nWellDownEle = m_lstWellSys[i]->m_nDownEle;
if (m_lstWellSys[i]->m_bIsDropWell)
continue;
OPENOBJ_BEGIN(id, AcDb::kForRead, CDbEquipment, pEquip);
if (pEquip) {
int num = pEquip->GetInterfaceNum();
if (num > 2) {
for (int j = 0; j < num; j++) {
CPipeInterface face;
pEquip->GetInterface(j, face);
if (i > 0 && face.m_idPipe == m_lstWellSys[i - 1]->m_ID)
continue;
if (i < m_lstWellSys.Length() - 1 && face.m_idPipe == m_lstWellSys[i + 1]->m_ID)
continue;
CString csPipeDownEle = pEquip->GetISysLabel(j);
if (csPipeDownEle == _T(""))
continue;
double nPipeDownEle = _tstof(csPipeDownEle);
if (nWellDownEle - nPipeDownEle > 0.001) {
CString csPrompt = m_lstWellSys[i]->m_csName;
csPrompt.Format(_T("%s 井支路管线计算的管底标高（%.2f）小于%.2f,建议改为跌水井"), csPrompt, nPipeDownEle, nWellDownEle);
csPromptAll = csPromptAll + _T("\n\n") + csPrompt;
m_map.SetAt(m_lstWellSys[i]->m_csName, csPipeDownEle);
}
}
}
}
OPENOBJ_END();
}
}
else if (!m_lstWellSys[i]->m_bIsWell) { //管
if (i == m_lstWellSys.Length() - 1)
continue;
nPipeLen = m_lstWellSys[i]->m_nLength;
}
}
if (csPromptAll != _T("标高检查：\n"))
MessageBox(csPromptAll);
}
BOOL CWellCalcSettingDlg::OnInitDialog()
{
CDialog::OnInitDialog();
if (m_iOpenMode == 1) {//编辑对话框
CWnd *pWnd2 = GetDlgItem(IDOK);
// CWnd *pWnd3 = GetDlgItem(IDC_BUTTON_SHEET);
pWnd2->SetWindowText(_T("更新"));
// pWnd3->ShowWindow(SW_HIDE);
}
for (int i = 0; i < m_lstWellSys.Length(); i++) {
TWellData *pList = new TWellData();
pList->m_iDn = m_lstWellSys[i]->m_iDn;
pList->m_bIsWell = m_lstWellSys[i]->m_bIsWell;
pList->m_bIsDropWell = m_lstWellSys[i]->m_bIsDropWell;;
pList->m_csName = m_lstWellSys[i]->m_csName;
pList->m_ID = m_lstWellSys[i]->m_ID;
pList->m_nI = m_lstWellSys[i]->m_nI;
pList->m_nUpEle = m_lstWellSys[i]->m_nUpEle;
pList->m_nDownEle = m_lstWellSys[i]->m_nDownEle;
pList->m_nLength = m_lstWellSys[i]->m_nLength;
pList->m_dRealLength = m_lstWellSys[i]->m_dRealLength;
m_lstWellOld.Append(pList);
}
// m_comboX.SetWindowText(XString(_T("%d"), m_iX));
// m_comboY.SetWindowText(XString(_T("%d"), m_iY));
m_grid.Clear();
m_grid.Create(this, IDC_LIST_PIPE);
m_grid.FitLastCol();
m_grid.SetNoAppendButton(TRUE);
m_grid.SetNoDefaultMenu(true);
UpdateGrid();
m_grid.GetCol(0).SetReadOnly();
m_grid.GetCol(1).SetReadOnly();
m_grid.GetCol(2).SetReadOnly();
m_grid.GetCol(5).SetReadOnly();
m_grid.GetCol(6).SetReadOnly();
m_grid.GetCol(7).SetReadOnly();
m_grid.GetCol(8).SetReadOnly();
m_grid.GetCol(9).SetReadOnly();
m_grid.GetCol(10).SetReadOnly();
m_grid.GetCol(11).SetReadOnly();
double dDeep = m_lstWellSys[0]->m_nUpEle - m_lstWellSys[0]->m_nDownEle;
// m_nDeep = dDeep;
if (dDeep < 0.01 || fabs(m_lstWellSys[0]->m_nDownEle) < 0.001)
dDeep = 0.8;
if (m_lstWellSys[0]->m_bIsDropWell) { //如果第一个井是跌水井, 则计算起点埋深
CWnd *pWnd = GetDlgItem(IDC_EDIT_DEEP);
pWnd->EnableWindow(FALSE);
}
for (i = 0; i < m_lstWellSys.Length(); i++) {
if (!m_lstWellSys[i]->m_bIsWell) { //管
if (i == m_lstWellSys.Length() - 1)
continue;
CString csPipeName = m_lstWellSys[i - 1]->m_csName + m_lstWellSys[i + 1]->m_csName;
OPENOBJ_BEGIN(m_lstWellSys[i]->m_ID, AcDb::kForWrite, CDbPipe, pPipe);
if (pPipe) {
pPipe->SetSysLabel(csPipeName);
}
OPENOBJ_END();
}
}
CWnd *pWnd2 = GetDlgItem(IDC_EDIT_ENDELE);
pWnd2->EnableWindow(FALSE);
// m_dEndEle = m_lstWellSys[m_lstWellSys.Length()-1]->m_nDownEle;
m_csDeep.Format(_T("%.3f"), dDeep);
m_csEndEle.Format(_T("%.3f"), m_lstWellSys[m_lstWellSys.Length() - 1]->m_nDownEle);
m_csX.Format(_T("%d"), m_iX);
m_csY.Format(_T("%d"), m_iY);
// zxl 2012.03.28 add
CWnd *pWndLength = GetDlgItem(IDC_BTN_MENU);
CString sText;
pWndLength->GetWindowText(sText);
if (sText.Find(_T("↓")) == -1)
{
sText += _T("↓");
pWndLength->SetWindowText(sText);
}
UpdateData(FALSE);
return TRUE; // return TRUE unless you set the focus to a control
// EXCEPTION: OCX Property Pages should return FALSE
}
void CWellCalcSettingDlg::OnRadioInput1()
{
CWnd *pWnd1 = GetDlgItem(IDC_EDIT_DEEP);
CWnd *pWnd2 = GetDlgItem(IDC_EDIT_ENDELE);
pWnd1->EnableWindow(TRUE);
pWnd2->EnableWindow(FALSE);
}
void CWellCalcSettingDlg::OnRadioInput2()
{
CWnd *pWnd1 = GetDlgItem(IDC_EDIT_DEEP);
CWnd *pWnd2 = GetDlgItem(IDC_EDIT_ENDELE);
pWnd2->EnableWindow(TRUE);
pWnd1->EnableWindow(FALSE);
}
void CWellCalcSettingDlg::UpdateGrid()
{
long iCurRow = m_grid.GetCurRowIndex();
m_grid.Clear();
int idx = 0;
for (int i = 0; i < m_lstWellSys.Length() - 1; i++) {
if (m_lstWellSys[i]->m_bIsWell) { //井
if (i == m_lstWellSys.Length() - 2)
break;
CString csName1 = m_lstWellSys[i]->m_csName;
CString csName2 = m_lstWellSys[i + 2]->m_csName;
if (csName1 == _T("") || csName2 == _T("")) {
MessageBox(_T("请检查井是否都编号。"));
break;
}
// if(csName2 == _T("HC"))
// csName2 = _T("HC进");
// if(csName1 == _T("HC"))
// csName1 = _T("HC出");
if (csName2 == _T("HC"))
csName2 = GetPoolName(m_lstWellSys[i + 2]->m_ID) + _T("进");
if (csName1 == _T("HC"))
csName1 = GetPoolName(m_lstWellSys[i]->m_ID) + _T("出");
CString csArea, csAllArea, csFactor, csQ, csTime;
m_grid.AppendRow();
m_grid.GetCell(idx, 0).SetText(csName1);
m_grid.GetCell(idx, 1).SetText(csName2);
double nEle = m_lstWellSys[i]->m_nUpEle;
double nDeep = m_lstWellSys[i]->m_nDeep;
double nDownEle = m_lstWellSys[i]->m_nDownEle;
CString csWellUpEle, csDeep, csDownEle, csWellUpEle2, csDeep2, csDownEle2;
csDeep.Format(_T("%.3f"), nDeep);
csDownEle.Format(_T("%.3f"), nDownEle);
csWellUpEle.Format(_T("%.3f"), nEle);
nEle = m_lstWellSys[i + 2]->m_nUpEle;
nDeep = m_lstWellSys[i + 2]->m_nDeep;
nDownEle = m_lstWellSys[i + 2]->m_nFrondDownEle;
csDeep2.Format(_T("%.3f"), nEle - nDownEle);
csDownEle2.Format(_T("%.3f"), nDownEle);
csWellUpEle2.Format(_T("%.3f"), nEle);
m_grid.GetCell(idx, 6).SetText(csWellUpEle);
m_grid.GetCell(idx, 7).SetText(csWellUpEle2);
m_grid.GetCell(idx, 8).SetText(csDownEle);
m_grid.GetCell(idx, 9).SetText(csDownEle2);
m_grid.GetCell(idx, 10).SetText(csDeep);
m_grid.GetCell(idx, 11).SetText(csDeep2);
}
else { //管
if (i == m_lstWellSys.Length() - 1)
continue;
double nPipeLen = m_lstWellSys[i]->m_nLength;
// if(m_lstWellSys[i]->m_dRealLength > 0.1)
// nPipeLen = m_lstWellSys[i]->m_dRealLength;
int iDn = m_lstWellSys[i]->m_iDn;
CString csDn, csPipeLen, csI, csI2;
csDn.Format(_T("%d"), iDn);
csI.Format(_T("%.3f"), m_lstWellSys[i]->m_nI * 1000);
csI2.Format(_T("%.3f"), m_lstWellSys[i]->m_nI * m_lstWellSys[i]->m_nLength);
// csPipeLen.Format(_T("%.2f"), m_lstWellSys[i]->m_nLength);
csPipeLen.Format(_T("%.2f"), nPipeLen);
m_grid.GetCell(idx, 2).SetText(csPipeLen);
m_grid.GetCell(idx, 3).SetText(csDn);
m_grid.GetCell(idx, 4).SetText(csI);
m_grid.GetCell(idx, 5).SetText(csI2);
idx++;
}
}
m_grid.SelectRow(iCurRow, TRUE);
}
void CWellCalcSettingDlg::OnButtonHide()
{
long idx = m_grid.GetCurRowIndex();
CString csName1;
if (idx > -1) {
WDGridRow *pRow = &m_grid.GetRow(idx);
if (pRow)
csName1 = (*pRow)[0].GetText();
}
if (csName1 != _T("")) {
RBList rbMask(RTDXF0, _T("AEC_ZT_WELL"), NULL);
PickSet ss(SS_FREE);
ss.Get(_T("X"), NULL, NULL, rbMask);
long len = ss.Length();
for (long i = 0; i < len; i++) {
Entity ent = ss[i];
OPENOBJ_BEGIN(ent, AcDb::kForRead, AecXDbWell, pEquip);
if (pEquip) {
CString csName = pEquip->GetWellName();
if (_tcsicmp(csName, csName1) == 0) {
XPoint ptCen;
double nX(1), nY(1);
ent.GetExtend(ptCen, &nX, &nY);
GlobalFunc::ArxZoomTo(ptCen, 10 * pEquip->GetPScale(), 10 * pEquip->GetPScale());
double nDist = pEquip->GetPScale();
XPoint p1, p2, p3, p4;
ads_polar(ptCen, 0, nDist, p1);
ads_polar(p1, PI / 2, nDist, p1);
ads_polar(ptCen, PI, nDist, p2);
ads_polar(p2, PI / 2, -nDist, p2);
ads_grdraw(p1, p2, 2, 0);
ads_polar(ptCen, PI / 2, nDist, p3);
ads_polar(p3, PI, nDist, p3);
ads_polar(ptCen, PI / 2, -nDist, p4);
ads_polar(p4, 0, nDist, p4);
ads_grdraw(p3, p4, 2, 0);
}
}
OPENOBJ_END();
}
}
GlobalFunc::HideDialog(this, TRUE);
TCHAR szTmp[256];
ads_getstring(NULL, _T("\n按任意键返回对话框:<返回>"), szTmp);
GlobalFunc::HideDialog(this, FALSE);
}
extern void ShowPipe(const AcDbObjectId &idPipe);
extern bool HandlePipeDimType(CDbPipe *pPipe, int &nSelType);
void CWellCalcSettingDlg::OnButtonTodwg()
{
UpdateData(TRUE);
if (m_lstWellSys.Length() < 3 || (!m_bCalc && m_iOpenMode == 0))
return;
GlobalFunc::HideDialog(this, TRUE);
// 更改流向 cet 2012.7.26 add
ResetPipeDirFromImport(m_pListAll);
RBList rbMaskDim(RTDXF0, _T("AEC_ZT_WELLDIM"), NULL);
if (m_iOpenMode == 0) {
XPoint ptLow3, ptUp3;
m_ssAll.GetExtend(ptLow3, ptUp3);
GlobalFunc::AssureInCurrentView_New(ptLow3, ptUp3);
}
int nSelType = -1; // cet 2012.1.9 add 管线标注与管线原有标注不同时，用户的选择 0: Y 1: N 2: A 3: D
bool bShow = false; // cet 2012.1.9 add
std::vector<XPoint> vecPoolPts; // cet 2012.10.25 add 池子插入点
for (int i = 0; i < m_lstWellSys.Length(); i++) {
if (m_lstWellSys[i]->m_bIsWell) { //井
AcDbObjectId id = m_lstWellSys[i]->m_ID;
XPoint ptLoc;
CString csEleLow, csEleUp;
csEleLow.Format(_T("%.2f"), m_lstWellSys[i]->m_nDownEle);
csEleUp.Format(_T("%.2f"), m_lstWellSys[i]->m_nUpEle);
if (m_lstWellSys[i]->m_csName == _T("HC"))
{
OPENOBJ_BEGIN(id, AcDb::kForWrite, CDbPool, pEquip);
if (pEquip) {
pEquip->SetGroundEle(m_lstWellSys[i]->m_nUpEle);
vecPoolPts.push_back(pEquip->GetLocation()); // cet 2012.10.25 add 记录池子插入点以便更新池子连接的管底标注
}
OPENOBJ_END();
continue;
}
OPENOBJ_BEGIN(id, AcDb::kForWrite, AecXDbWell, pEquip);
if (pEquip) {
pEquip->SetDropWell(m_lstWellSys[i]->m_bIsDropWell);
double nPipeDownEle = m_lstWellSys[i]->m_nFrondDownEle;
double nPipeDownEle2 = m_lstWellSys[i]->m_nDownEle;
if (i > 1) { //设置前管道 管底标高
AcDbObjectId idPipe = m_lstWellSys[i - 1]->m_ID;
pEquip->SetPipeEndEle(idPipe, XString(_T("%.3f"), m_lstWellSys[i]->m_nFrondDownEle));
}
if (i < m_lstWellSys.Length() - 1) { //设置后管道 管底标高
AcDbObjectId idPipe = m_lstWellSys[i + 1]->m_ID;
pEquip->SetPipeEndEle(idPipe, XString(_T("%.3f"), m_lstWellSys[i]->m_nDownEle));
}
ptLoc = pEquip->GetLocation();
//搜索这个井其他连接管，最低标高才是井标高
int num = pEquip->GetInterfaceNum();
double nEleOther = m_lstWellSys[i]->m_nDownEle;
for (int m = 0; m < num; m++) {
CPipeInterface iFace;
pEquip->GetInterface(m, iFace);
CString csLabel = pEquip->GetISysLabel(m);
if (csLabel != _T("") && nEleOther - _tstof(csLabel) > 0.001)
nEleOther = _tstof(csLabel);
}
// if(nEleOther > m_lstWellSys[i]->m_nDownEle)
// pEquip->SetWellEleDown(m_lstWellSys[i]->m_nDownEle);
if (fabs(nEleOther - m_lstWellSys[i]->m_nDownEle) < 0.001)
pEquip->SetWellEleDown(m_lstWellSys[i]->m_nDownEle);
pEquip->SetWellEleUp(m_lstWellSys[i]->m_nUpEle);
}
OPENOBJ_END();
CString csGroundEle;
csGroundEle.Format(_T("%.3f"), m_lstWellSys[i]->m_nGroundEle);
ads_name entWell;
acdbGetAdsName(entWell, id);
GlobalFunc::WriteXdata(entWell, _T("TG-WELL-GroundEle"), csGroundEle);
CString csSand = GlobalFunc::ReadXdata(entWell, _T("TG-WELL-DeepSand"));
if (m_lstWellSys[i]->m_nSpare > 0.001 || csSand != _T(""))
{
csSand.Format(_T("%.3f"), m_lstWellSys[i]->m_nSpare);
GlobalFunc::WriteXdata(entWell, _T("TG-WELL-DeepSand"), csSand);
}
// cet 2012.6.6 add 更新井半径
CString strWellRadius;
strWellRadius.Format(_T("%f"), m_lstWellSys[i]->m_nWellRadius * 2);
GlobalFunc::WriteXdata(entWell, _T("TG-WELL-RADIUS"), strWellRadius);
PickSet ss2(SS_FREE);
XPoint ptUcs = GlobalFunc::Wcs2Ucs(ptLoc);
GlobalFunc::GetPointPickSet(ptUcs, ss2, rbMaskDim, 50);
GlobalFunc::UpdateGraphic(ss2);
}
else {
bShow = false; // cet 2012.1.9 add
BOOL bDrawLabel = FALSE;// zxl 2012.12.26 add
int iDn = m_lstWellSys[i]->m_iDn;
double nI = m_lstWellSys[i]->m_nI * 1000;
double nEleDown = m_lstWellSys[i - 1]->m_nDownEle;
ads_name ent;
acdbGetAdsName(ent, m_lstWellSys[i]->m_ID);
OPENOBJ_BEGIN(ent, AcDb::kForWrite, CDbPipe, pPipe);
if (pPipe) {
pPipe->SetPipeGradient(nI / 1000);
XPoint pt1(pPipe->GetStartPoint()), pt2(pPipe->GetEndPoint());
pt1.z = 0;
pt2.z = 0;
double dLen = pPipe->GetPlanLength();
// dLen = ads_distance(pt1, pt2); //这时候, 要的是平面长度
// if(GlobalFunc::DocGetMeterUnitDraw())
// dLen = dLen * 1000.0;
double dI = pPipe->GetPipeGradient();
double nDrop = dLen * dI;
if (GlobalFunc::DocGetMeterUnitDraw())
{//米
if (pPipe->GetFlowDir() == TPipeSys::kFromStart) {
pt1.z = nEleDown + (double)iDn / 2000;
pt2.z = pt1.z - nDrop;
}
else {
pt2.z = nEleDown + (double)iDn / 2000;
pt1.z = pt2.z - nDrop;
}
}
else
{
nDrop = nDrop * 1000;
if (pPipe->GetFlowDir() == TPipeSys::kFromStart) {
pt1.z = nEleDown * 1000 + (double)iDn / 2;
pt2.z = pt1.z - nDrop;
}
else {
pt2.z = nEleDown * 1000 + (double)iDn / 2;
pt1.z = pt2.z - nDrop;
}
}
XPoint ptDimTmp = pPipe->GetLabelLocation();//先把标注点读出来，setstartpoint会修改这个点 2010-4-26 sr
pPipe->SetStartPoint(pt1);
pPipe->SetEndPoint(pt2);
if (!pPipe->IsDrawLabel())
{
SetPipeLabelType(pPipe);
}
else // cet 2012.1.9 add
{
bShow = HandlePipeDimType(pPipe, nSelType);
}
pPipe->SetLabelLocation(ptDimTmp);
// zxl 2012.12.28 del
// // cet 2011.12.5 add 标注样式为-1时不标注
// if (static_cast<int>(pPipe->GetSpare()) == -1)
// {
// pPipe->EnableDrawLabel(FALSE);
// }
bDrawLabel = pPipe->IsDrawLabel();// zxl 2012.12.26 add
}
OPENOBJ_END();
// cet 2012.1.9 add 显示交叉线
if (bShow)
{
ShowPipe(m_lstWellSys[i]->m_ID);
GlobalFunc::AnyKeyReturn(_T("\n按任意键继续查找下一段待修改管标注..."));
}
// zxl 2012.12.25 modify
//DoDimPipeDn(ent, iDn, _T("自动"), g_nPipeDnHeight, FALSE);
GlobalFunc::DoDimPipeDn(ent, iDn, _T("自动"), g_Option::instance().g_nPipeDnHeight, FALSE, TRUE);
OPENOBJ_BEGIN(ent, AcDb::kForWrite, CDbPipe, pPipe);
if (pPipe)
{
pPipe->EnableDrawLabel(bDrawLabel);
}
OPENOBJ_END();
////////////////////////////////标注////////////////////////////////////////
}
}
// 更新化粪池连接的管底标注 cet 2012.10.25 add
std::vector<XPoint>::iterator it;
PickSet ss2(SS_FREE);
for (it = vecPoolPts.begin(); it != vecPoolPts.end(); it++)
{
GlobalFunc::GetPointPickSet(GlobalFunc::Wcs2Ucs(*it), ss2, rbMaskDim, 50);
GlobalFunc::UpdateGraphic(ss2);
ss2.Free();
}
acedRedraw(0, 0); // cet 2012.1.9 add 刷新清除显示管线时的X
GlobalFunc::UpdateMultDim();
actrTransactionManager->flushGraphics(); //acad 刷新
TCHAR szTmp[32];
ads_getstring(NULL, _T("\n按任意键返回对话框:<返回>"), szTmp);
GlobalFunc::HideDialog(this, FALSE);
}
//vector 排序函数
extern bool CompareHeight(double dLen1, double dLen2);
// zxl 2011.11.15 add 计算井的跌落高度
CString CWellCalcSettingDlg::GetWellDropHeight(CString &sName)
{
std::vector<double> vecEle;
CString sTemp = _T("");
for (m_grid.MoveToFirst(); !m_grid.IsOut(); m_grid.MoveToNext())
{
WDGridRow *pRow = m_grid.CurRow();
CString csName1 = (LPCTSTR)(*pRow)[0].GetText();
CString csName2 = (LPCTSTR)(*pRow)[1].GetText();
// cet 2013.3.1 modify 将显示给用户的池子真实名称转换为HC
// if (csName1.Compare(_T("HC进")) == 0 || csName1.Compare(_T("HC出")) == 0)
// {
// csName1 = _T("HC");
// }
// else if (csName2.Compare(_T("HC进")) == 0 || csName2.Compare(_T("HC出")) == 0)
// {
// csName2 = _T("HC");
// }
int nIndex1 = -1, nIndex2 = -1;
nIndex1 = csName1.Find(_T("进"));
nIndex2 = csName1.Find(_T("出"));
if (nIndex1 > -1 || nIndex2 > -1)
{
csName1 = _T("HC");
}
nIndex1 = csName2.Find(_T("进"));
nIndex2 = csName2.Find(_T("出"));
if (nIndex1 > -1 || nIndex2 > -1)
{
csName2 = _T("HC");
}
if (sName.Compare(csName1) == 0)
{
vecEle.push_back((*pRow)[8].GetText());
}
else if (sName.Compare(csName2) == 0)
{
vecEle.push_back((*pRow)[9].GetText());
}
}
if (vecEle.size() > 1)
{
std::sort(vecEle.begin(), vecEle.end(), CompareHeight);
double dEleS = vecEle.front();
double dEleE = vecEle.back();
double dEle = fabs(dEleE - dEleS);
sTemp.Format(_T("%0.3f"), dEle);
if (fabs(dEle - 0.0) < 0.001)
{
sTemp = _T("");
}
}
return sTemp;
}
void CWellCalcSettingDlg::OnButtonModifyele()
{
CTemporaryResourceOverride vTemp;
CWellCalcModifyEleDlg dlg(0);
for (int i = 0; i < m_lstWellSys.Length(); i++) {
TWellData *pList = new TWellData();
pList->m_bIsWell = m_lstWellSys[i]->m_bIsWell;
pList->m_nGroundEle = m_lstWellSys[i]->m_nGroundEle;
pList->m_bIsDropWell = m_lstWellSys[i]->m_bIsDropWell;;
pList->m_csName = m_lstWellSys[i]->m_csName;
// cet 2013.3.1 add 将池名改为真实名
CString sName = pList->m_csName;
if (sName.Compare(_T("HC")) == 0)
{
pList->m_csName = GetPoolName(m_lstWellSys[i]->m_ID);
}
pList->m_nUpEle = m_lstWellSys[i]->m_nUpEle;
pList->m_nDownEle = m_lstWellSys[i]->m_nDownEle;
pList->m_nWellRadius = m_lstWellSys[i]->m_nWellRadius;
pList->m_nSpare = m_lstWellSys[i]->m_nSpare;
pList->m_dRealLength = m_lstWellSys[i]->m_dRealLength;
CString csDropEle;
if (m_map.Lookup(pList->m_csName, csDropEle))
pList->m_nFrondDownEle = _tstof(csDropEle); //临时记录一下支路的底标高
else
pList->m_nFrondDownEle = -9999;
// zxl 2011.11.16 add 设置跌落高度
pList->m_csSpare = GetWellDropHeight(m_lstWellSys[i]->m_csName);
dlg.m_lstWellSys.Append(pList);
}
if (dlg.DoModal() == IDOK) {
for (int i = 0; i < m_lstWellSys.Length(); i++) {
m_lstWellSys[i]->m_nUpEle = dlg.m_lstWellSys[i]->m_nUpEle;
m_lstWellSys[i]->m_nDownEle = dlg.m_lstWellSys[i]->m_nDownEle;
m_lstWellSys[i]->m_bIsDropWell = dlg.m_lstWellSys[i]->m_bIsDropWell;
m_lstWellSys[i]->m_nWellRadius = dlg.m_lstWellSys[i]->m_nWellRadius;
m_lstWellSys[i]->m_nGroundEle = dlg.m_lstWellSys[i]->m_nGroundEle;
m_lstWellSys[i]->m_nSpare = dlg.m_lstWellSys[i]->m_nSpare;
m_lstWellOld[i]->m_nDownEle = m_lstWellSys[i]->m_nDownEle;
m_lstWellOld[i]->m_bIsDropWell = m_lstWellSys[i]->m_bIsDropWell;
}
}
OnButtonCalc();
//UpdateGrid();
}
void CWellCalcSettingDlg::OnBtnLengthType()
{
CWnd *pWnd = GetDlgItem(IDC_BTN_MENU);
if (pWnd == NULL)
{
return;
}
CRect rc;
pWnd->GetWindowRect(rc);
if (m_pMenuLength == NULL)
{
m_pMenuLength = new CMenu;
m_pMenuLength->CreatePopupMenu();
}
else
{
m_pMenuLength->DestroyMenu();
m_pMenuLength->CreatePopupMenu();
}
m_pMenuLength->AppendMenu((m_iLengthType == 0) ? MF_CHECKED : MF_UNCHECKED, nMenuTypeId + 1, _T("表格中管长按实际显示"));
m_pMenuLength->AppendMenu((m_iLengthType == 1) ? MF_CHECKED : MF_UNCHECKED, nMenuTypeId + 2, _T("表格中管长0.5米模数显示"));
m_pMenuLength->AppendMenu((m_iLengthType == 2) ? MF_CHECKED : MF_UNCHECKED, nMenuTypeId + 3, _T("表格中管长1.0米模数显示"));
m_pMenuLength->TrackPopupMenu(TPM_LEFTALIGN | TPM_LEFTBUTTON | TPM_VERTICAL,
rc.left, rc.bottom, this, &rc);
}
void CWellCalcSettingDlg::OnButtonShow()
{
CWnd *pWnd = GetDlgItem(IDC_BUTTON_SHOW);
if (pWnd == NULL)
{
return;
}
CRect rc;
pWnd->GetWindowRect(rc);
if (m_pMenu == NULL)
{
m_pMenu = new CMenu;
m_pMenu->CreatePopupMenu();
}
else
{
m_pMenu->DestroyMenu();
m_pMenu->CreatePopupMenu();
}
m_pMenu->AppendMenu(m_mapCheck[nMenuId + 1] ? MF_CHECKED : MF_UNCHECKED, nMenuId + 1, _T("给水管"));
m_pMenu->AppendMenu(m_mapCheck[nMenuId + 2] ? MF_CHECKED : MF_UNCHECKED, nMenuId + 2, _T("污水管"));
m_pMenu->AppendMenu(m_mapCheck[nMenuId + 3] ? MF_CHECKED : MF_UNCHECKED, nMenuId + 3, _T("废水管"));
m_pMenu->AppendMenu(m_mapCheck[nMenuId + 4] ? MF_CHECKED : MF_UNCHECKED, nMenuId + 4, _T("雨水管"));
m_pMenu->AppendMenu(m_mapCheck[nMenuId + 5] ? MF_CHECKED : MF_UNCHECKED, nMenuId + 5, _T("中水管"));
m_pMenu->AppendMenu(m_mapCheck[nMenuId + 6] ? MF_CHECKED : MF_UNCHECKED, nMenuId + 6, _T("消防管"));
m_pMenu->AppendMenu(m_mapCheck[nMenuId + 7] ? MF_CHECKED : MF_UNCHECKED, nMenuId + 7, _T("其他管"));
m_pMenu->TrackPopupMenu(TPM_LEFTALIGN | TPM_LEFTBUTTON | TPM_VERTICAL,
rc.left, rc.bottom, this, &rc);
}
BOOL CWellCalcSettingDlg::OnCommand(WPARAM wParam, LPARAM lParam)
{
UINT nID = LOWORD(wParam);
if ((nID > nMenuId + 7 || nID < nMenuId + 1) && (nID > nMenuTypeId + 3 || nID < nMenuTypeId + 1))
{
return CDialog::OnCommand(wParam, lParam);
}
if (m_pMenu != NULL && (nID < nMenuId + 8 && nID > nMenuId))
{
m_mapCheck[nID] = !m_mapCheck[nID];
}
if (m_pMenuLength != NULL && (nID < nMenuTypeId + 4 && nID > nMenuTypeId))
{
m_iLengthType = nID - nMenuTypeId - 1;
}
return CDialog::OnCommand(wParam, lParam);
}
void CWellCalcSettingDlg::InitMapData()
{
m_mapCheck.insert(std::make_pair(nMenuId + 1, true));
m_mapCheck.insert(std::make_pair(nMenuId + 2, true));
m_mapCheck.insert(std::make_pair(nMenuId + 3, true));
m_mapCheck.insert(std::make_pair(nMenuId + 4, true));
m_mapCheck.insert(std::make_pair(nMenuId + 5, true));
m_mapCheck.insert(std::make_pair(nMenuId + 6, true));
m_mapCheck.insert(std::make_pair(nMenuId + 7, true));
}
void CWellCalcSettingDlg::GetShowPipeData(std::map<TPipeSys::SysType, bool> &data)
{
data.clear();
data[TPipeSys::kFeedWater] = m_mapCheck[nMenuId + 1];
data[TPipeSys::kDirtWater] = m_mapCheck[nMenuId + 2];
data[TPipeSys::kUselessWater] = m_mapCheck[nMenuId + 3];
data[TPipeSys::kRainWater] = m_mapCheck[nMenuId + 4];
data[TPipeSys::kUsedWater] = m_mapCheck[nMenuId + 5];
data[TPipeSys::kFireFighting] = m_mapCheck[nMenuId + 6];
data[TPipeSys::kOther] = m_mapCheck[nMenuId + 7];
}
void CWellCalcSettingDlg::SetShowPipeData(std::map<TPipeSys::SysType, bool> &data)
{
m_mapCheck[nMenuId + 1] = data[TPipeSys::kFeedWater];
m_mapCheck[nMenuId + 2] = data[TPipeSys::kDirtWater];
m_mapCheck[nMenuId + 3] = data[TPipeSys::kUselessWater];
m_mapCheck[nMenuId + 4] = data[TPipeSys::kRainWater];
m_mapCheck[nMenuId + 5] = data[TPipeSys::kUsedWater];
m_mapCheck[nMenuId + 6] = data[TPipeSys::kFireFighting];
m_mapCheck[nMenuId + 7] = data[TPipeSys::kOther];
}
void CWellCalcSettingDlg::ReadWriteScaleFromRegedit(BOOL bRead)
{
CString sXScale, sYScale;
if (GlobalFunc::DocGetMeterUnitDraw())
{
sXScale = _T("XScaleM");
sYScale = _T("YScaleM");
}
else
{
sXScale = _T("XScaleMM");
sYScale = _T("YScaleMM");
}
//CRegProperty regProp(GetRegLocation(), _T("VerticalSection"));
//regProp.SetTopRootKey(HKEY_CURRENT_USER);
//if (bRead)
//{
// if (!regProp.GetValue(sXScale, m_iX))
// {
// m_iX = static_cast<int>(GlobalFunc::DocGetPScale());
// if (GlobalFunc::DocGetMeterUnitDraw())
// {
// m_iX *= 1000;
// }
// }
// if (!regProp.GetValue(sYScale, m_iY))
// {
// m_iY = 50;
// }
//}
//else
//{
// regProp.SetValue(sXScale, m_iX);
// regProp.SetValue(sYScale, m_iY);
//}
}
void CWellCalcSettingDlg::EditVerticalSection(BOOL bEdit)
{
m_bEdit = bEdit;
}
void CWellCalcSettingDlg::SetListAll(SSearchPipeList *pList)
{
m_pListAll = pList;
}
Reference in new issue Copy Permalink