#include "stdafx.h"
#include "AcDbObjectPtr.h"
#include "globalFunc.h"
#include "DbEquipment.h"
#include "msword8.h"
#include "xtext.h"
#include "DbWell.h"
#include "Dbpipe.h"
#include "CalcDirtWellDlg.h"
#include "layerdef.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

extern void CalcWellNum(SSearchPipeList *pListAll);
extern BOOL SetWellName(SSearchPipeList *pListAll);
extern void DimRainCalcResult(SSearchPipeList *pListAll);
extern SSearchPipeList *GetWellNode(SSearchPipeList *pListAll, Entity entLongWell, SSearchPipeList *pNode);


//《给水排水管网系统》PAGE 53
//通过差值法计算充满度 h/D  输入参数q/q0 非满流管道流量比
// double GlobalFunc::GetFullByPercentQ(double nPercentQ)
// {
//     //差值法查表 2003规范 P107页
//     double nAc(0);
//     if(nPercentQ <= 0.005)
//         nAc = GlobalFunc::GetValBetween2(0, 0.05, 0, 0.005, nPercentQ);
//     else if(nPercentQ > 0.005 && nPercentQ <= 0.021)
//         nAc = GlobalFunc::GetValBetween2(0.05, 0.1, 0.005, 0.021, nPercentQ);
//     else if(nPercentQ > 0.021 && nPercentQ <= 0.049)
//         nAc = GlobalFunc::GetValBetween2(0.1, 0.15, 0.021, 0.049, nPercentQ);
//     else if(nPercentQ > 0.049 && nPercentQ <= 0.088)
//         nAc = GlobalFunc::GetValBetween2(0.15, 0.2, 0.049, 0.088, nPercentQ);
//     else if(nPercentQ > 0.088 && nPercentQ <= 0.137)
//         nAc = GlobalFunc::GetValBetween2(0.2, 0.25, 0.088, 0.137, nPercentQ);
//     else if(nPercentQ > 0.137 && nPercentQ <= 0.196)
//         nAc = GlobalFunc::GetValBetween2(0.25, 0.3, 0.137, 0.196, nPercentQ);
//     else if(nPercentQ > 0.196 && nPercentQ <= 0.263)
//         nAc = GlobalFunc::GetValBetween2(0.3, 0.35, 0.196, 0.263, nPercentQ);
//     else if(nPercentQ > 0.263 && nPercentQ <= 0.337)
//         nAc = GlobalFunc::GetValBetween2(0.35, 0.4, 0.263, 0.337, nPercentQ);
//     else if(nPercentQ > 0.337 && nPercentQ <= 0.417)
//         nAc = GlobalFunc::GetValBetween2(0.4, 0.45, 0.337, 0.417, nPercentQ);
//     else if(nPercentQ > 0.417 && nPercentQ <= 0.5)
//         nAc = GlobalFunc::GetValBetween2(0.45, 0.5, 0.417, 0.5, nPercentQ);
//     else if(nPercentQ > 0.5 && nPercentQ <= 0.586)
//         nAc = GlobalFunc::GetValBetween2(0.5, 0.55, 0.5, 0.586, nPercentQ);
//     else if(nPercentQ > 0.586 && nPercentQ <= 0.672)
//         nAc = GlobalFunc::GetValBetween2(0.55, 0.6, 0.586, 0.672, nPercentQ);
//     else if(nPercentQ > 0.672 && nPercentQ <= 0.756)
//         nAc = GlobalFunc::GetValBetween2(0.6, 0.65, 0.672, 0.756, nPercentQ);
//     else if(nPercentQ > 0.756 && nPercentQ <= 0.837)
//         nAc = GlobalFunc::GetValBetween2(0.65, 0.7, 0.756, 0.837, nPercentQ);
//     else if(nPercentQ > 0.837 && nPercentQ <= 0.912)
//         nAc = GlobalFunc::GetValBetween2(0.7, 0.75, 0.837, 0.912, nPercentQ);
//     else if(nPercentQ > 0.912 && nPercentQ <= 0.977)
//         nAc = GlobalFunc::GetValBetween2(0.75, 0.8, 0.912, 0.977, nPercentQ);
//     else if(nPercentQ > 0.977 && nPercentQ <= 1.03)
//         nAc = GlobalFunc::GetValBetween2(0.8, 0.85, 0.977, 1.03, nPercentQ);
//     else if(nPercentQ > 1.03 && nPercentQ <= 1.066)
//         nAc = GlobalFunc::GetValBetween2(0.85, 0.9, 1.03, 1.066, nPercentQ);
//     else if(nPercentQ > 1.066 && nPercentQ <= 1.075)
//         nAc = GlobalFunc::GetValBetween2(0.9, 0.95, 1.066, 1.075, nPercentQ);
//     else if(nPercentQ > 1.075)
//         nAc = GlobalFunc::GetValBetween2(0.95, 1, 1.075, 2.0, nPercentQ);
//     else if(fabs(nPercentQ -1) < 0.001)
//         nAc = 1;
// 
//     return nAc;
// }

//《给水排水管网系统》PAGE 53
//通过差值法计算 非满流管道过水断面面积比 A/A0   输入参数 ：充满度 h/D
double GetPercentAreaByFull(double nFull)
{
	//差值法查表 2003规范 P107页
	double nAc(0);
	if (nFull <= 0.05)
		nAc = GlobalFunc::GetValBetween2(0, 0.019, 0, 0.05, nFull);
	else if (nFull > 0.05 && nFull <= 0.1)
		nAc = GlobalFunc::GetValBetween2(0.019, 0.052, 0.05, 0.1, nFull);
	else if (nFull > 0.1 && nFull <= 0.15)
		nAc = GlobalFunc::GetValBetween2(0.052, 0.094, 0.1, 0.15, nFull);
	else if (nFull > 0.15 && nFull <= 0.2)
		nAc = GlobalFunc::GetValBetween2(0.094, 0.142, 0.15, 0.2, nFull);
	else if (nFull > 0.2 && nFull <= 0.25)
		nAc = GlobalFunc::GetValBetween2(0.142, 0.196, 0.2, 0.25, nFull);
	else if (nFull > 0.25 && nFull <= 0.3)
		nAc = GlobalFunc::GetValBetween2(0.196, 0.252, 0.25, 0.3, nFull);
	else if (nFull > 0.3 && nFull <= 0.35)
		nAc = GlobalFunc::GetValBetween2(0.252, 0.312, 0.3, 0.35, nFull);
	else if (nFull > 0.35 && nFull <= 0.4)
		nAc = GlobalFunc::GetValBetween2(0.312, 0.374, 0.35, 0.4, nFull);
	else if (nFull > 0.4 && nFull <= 0.45)
		nAc = GlobalFunc::GetValBetween2(0.374, 0.436, 0.4, 0.45, nFull);
	else if (nFull > 0.45 && nFull <= 0.5)
		nAc = GlobalFunc::GetValBetween2(0.436, 0.5, 0.45, 0.5, nFull);
	else if (nFull > 0.5 && nFull <= 0.55)
		nAc = GlobalFunc::GetValBetween2(0.5, 0.564, 0.5, 0.55, nFull);
	else if (nFull > 0.55 && nFull <= 0.6)
		nAc = GlobalFunc::GetValBetween2(0.564, 0.626, 0.55, 0.6, nFull);
	else if (nFull > 0.6 && nFull <= 0.65)
		nAc = GlobalFunc::GetValBetween2(0.626, 0.688, 0.6, 0.65, nFull);
	else if (nFull > 0.65 && nFull <= 0.7)
		nAc = GlobalFunc::GetValBetween2(0.688, 0.748, 0.65, 0.7, nFull);
	else if (nFull > 0.7 && nFull <= 0.75)
		nAc = GlobalFunc::GetValBetween2(0.748, 0.804, 0.7, 0.75, nFull);
	else if (nFull > 0.75 && nFull <= 0.8)
		nAc = GlobalFunc::GetValBetween2(0.804, 0.858, 0.75, 0.8, nFull);
	else if (nFull > 0.8 && nFull <= 0.85)
		nAc = GlobalFunc::GetValBetween2(0.858, 0.906, 0.8, 0.85, nFull);
	else if (nFull > 0.85 && nFull <= 0.9)
		nAc = GlobalFunc::GetValBetween2(0.906, 0.948, 0.85, 0.9, nFull);
	else if (nFull > 0.9 && nFull <= 0.95)
		nAc = GlobalFunc::GetValBetween2(0.948, 0.981, 0.9, 0.95, nFull);
	else if (nFull > 0.95 && nFull <= 1)
		nAc = GlobalFunc::GetValBetween2(0.981, 1, 0.95, 1, nFull);
	else if (nFull > 1)
		nAc = 1;
	return nAc;
}

int PlusDirtDn(int dn, BOOL bPlus)
{
	int ret(0);
	if (bPlus) { //增大一级管径
		if (dn == 200)
			ret = 250;
		else if (dn == 250)
			ret = 300;
		else if (dn == 300)
			ret = 350;
		else if (dn == 350)
			ret = 400;
		else if (dn == 400)
			ret = 450;
		else if (dn == 450)
			ret = 500;
		else if (dn == 500)
			ret = 600;
		else if (dn == 600)
			ret = 700;
		else if (dn == 700)
			ret = 800;
		else if (dn == 800)
			ret = 900;
		else if (dn == 900)
			ret = 1000;
		else if (dn == 1000)
			ret = 1100;
		else if (dn == 1100)
			ret = 1200;
		else if (dn == 1200)
			ret = 1350;
		else if (dn == 1350)
			ret = 1500;
		else if (dn == 1500)
			ret = 1650;
		else if (dn == 1650)
			ret = 1800;
		else if (dn == 1800)
			ret = 2000;
		else if (dn == 2000)
			ret = 2100;
		else if (dn == 2100)
			ret = 2200;
		else if (dn == 2200)
			ret = 2300;
		else if (dn == 2300)
			ret = 2400;
		else if (dn == 2400)
			ret = 2500;
		else if (dn == 2500)
			ret = 2600;
		else if (dn == 2600)
			ret = 2700;
		else if (dn == 2700)
			ret = 2800;
		else if (dn == 2800)
			ret = 2900;
		else if (dn == 2900)
			ret = 3000;
		else
			ret = 3000;
	}
	else {
		if (dn == 200)
			ret = 200;
		else if (dn == 250)
			ret = 200;
		else if (dn == 300)
			ret = 250;
		else if (dn == 350)
			ret = 300;
		else if (dn == 400)
			ret = 350;
		else if (dn == 450)
			ret = 400;
		else if (dn == 500)
			ret = 450;
		else if (dn == 600)
			ret = 500;
		else if (dn == 700)
			ret = 600;
		else if (dn == 800)
			ret = 700;
		else if (dn == 900)
			ret = 800;
		else if (dn == 1000)
			ret = 900;
		else if (dn == 1100)
			ret = 1000;
		else if (dn == 1200)
			ret = 1100;
		else if (dn == 1350)
			ret = 1200;
		else if (dn == 1500)
			ret = 1350;
		else if (dn == 1650)
			ret = 1500;
		else if (dn == 1800)
			ret = 1650;
		else if (dn == 2000)
			ret = 1800;
		else if (dn == 2100)
			ret = 2000;
		else if (dn == 2200)
			ret = 2100;
		else if (dn == 2300)
			ret = 2200;
		else if (dn == 2400)
			ret = 2300;
		else if (dn == 2500)
			ret = 2400;
		else if (dn == 2600)
			ret = 2500;
		else if (dn == 2700)
			ret = 2600;
		else if (dn == 2800)
			ret = 2700;
		else if (dn == 2900)
			ret = 2800;
		else if (dn == 3000)
			ret = 2900;
	}

	return ret;
}

int GetFirstDirtPipeDnByQ2(double nQ, double nN, double nI, double &nV, double &nFull)
{
	if (nI < 0.000001)
		return 0;
	BOOL bMetal = FALSE;
	if (fabs(nN - 0.012) < 0.001 || fabs(nN - 0.013) < 0.001 || fabs(nN - 0.014) < 0.001)
		bMetal = TRUE;
	//以下数字出自：《给水排水管网系统》P217 主要针对于污水管
	int dn = 200;//小区道路最小是300
	if (nQ < 9.19)
		dn = 200;
	else if (nQ < 16.6)
		dn = 250;
	else if (nQ < 23.9)
		dn = 300;
	else if (nQ < 39.72)
		dn = 350;
	else if (nQ < 51.88)
		dn = 400;
	else if (nQ < 65.66)
		dn = 450;
	else if (nQ < 88.08)
		dn = 500;
	else if (nQ < 126.84)
		dn = 600;
	else if (nQ < 172.65)
		dn = 700;
	else if (nQ < 222.5)
		dn = 800;
	else if (nQ < 285.39)
		dn = 900;
	else if (nQ < 379.11)
		dn = 1000;
	else if (nQ < 458.72)
		dn = 1100;
	else if (nQ < 545.92)
		dn = 1200;
	else if (nQ < 690.93)
		dn = 1350;
	else if (nQ < 853)
		dn = 1500;
	else if (nQ < 1032.13)
		dn = 1650;
	else
		dn = 1800;

	double nSlowV = 0.6;
	nQ = nQ / 1000;// 把L/S 转化为 M3/S
	int iOldDn(0);
	while (1)
	{

		int iOldDn2(0);
		double nRadius = (double)dn / 1000;
		double nFullest = 0.55;
		if (dn > 350 && dn < 500)
			nFullest = 0.65;
		else if (dn > 450 && dn < 1000)
			nFullest = 0.7;
		else if (dn >= 1000)
			nFullest = 0.75;

		double nTmp = nI / (10.29 / pow(nRadius, 5.333));
		double nTmpQ = (nN * nQ) / sqrt(nTmp);
		nFull = GlobalFunc::GetFullByPercentQ(nTmpQ);
		double nTmpA = GetPercentAreaByFull(nFull);
		nV = 1.27 / (nRadius * nRadius) * nQ / nTmpA;

		//计算充满度和流速《给水排水管网系统》 利用差值法查表
		while (nV < nSlowV || (nV > 10 && bMetal) || (nV > 5 && !bMetal) || nFull > nFullest) {
			if (nV < nSlowV) {
				if (dn == 200)
					break;
				iOldDn2 = dn;
				dn = PlusDirtDn(dn, FALSE);
			}
			else {
				dn = PlusDirtDn(dn, TRUE);
				if (dn == iOldDn2)
					break;
			}
			nRadius = (double)dn / 1000;
			nTmp = nI / (10.29 / pow(nRadius, 5.333));
			nTmpQ = (nN * nQ) / sqrt(nTmp);
			nFull = GlobalFunc::GetFullByPercentQ(nTmpQ);
			double nTmpA = GetPercentAreaByFull(nFull);
			nV = 1.27 / (nRadius * nRadius) * nQ / nTmpA;
		}
		double nTempQ = (0.25 * nRadius * nRadius * PI) * nV * nFull;
		if (nTempQ < nQ && dn < 3000 && fabs(nTempQ - nQ) > 0.01) {
			dn = PlusDirtDn(dn, TRUE);   //设计流量不够，管径加大一号
			if (dn == iOldDn)
				break;
			continue;
		}
		if (dn == 200)
			break;

		if (nFull < (nFullest - 0.1) && nI > 0.002) {
			if (dn == iOldDn)
				break;
			iOldDn = dn;
			dn = PlusDirtDn(dn, FALSE);  //充满度太小
			continue;
		}

		int iTempDn = PlusDirtDn(dn, FALSE);
		iTempDn = PlusDirtDn(iTempDn, FALSE);
		double nTempDn = (double)iTempDn / 1000;
		nTempQ = (0.25 * nTempDn * nTempDn * PI) * nV * nFull;
		if (nTempQ > nQ) {
			if (dn == iOldDn)
				break;
			iOldDn = dn;
			dn = PlusDirtDn(dn, FALSE);  //设计流量过了，管径减小一号
			continue;
		}
		else
			break;
	}
	return dn;
}

int GetFirstDirtPipeDnByQ(double nQ, double nN, double &nI, double &nV, double &nFull, BOOL bIsCivil)
{
	BOOL bMetal = FALSE;
	if (fabs(nN - 0.012) < 0.001 || fabs(nN - 0.013) < 0.001 || fabs(nN - 0.014) < 0.001)
		bMetal = TRUE;
	double nTempI = 0.003;
	//以下数字出自：《给水排水管网系统》P217 主要针对于污水管
	int dn = 200; //小区道路最小是200
	if (bIsCivil)
		dn = 300; //市政最小是300
	if (nQ < 9.19 && !bIsCivil) {
		dn = 200;
		nTempI = 0.004;
	}
	else if (nQ < 16.6 && !bIsCivil) {
		dn = 250;
		nTempI = 0.0035;
	}
	else if (nQ < 23.9) {
		dn = 300;
		nTempI = 0.003;
	}
	else if (nQ < 39.72) {
		dn = 350;
		nTempI = 0.003;
	}
	else if (nQ < 51.88) {
		dn = 400;
		nTempI = 0.0025;
	}
	else if (nQ < 65.66) {
		dn = 450;
		nTempI = 0.002;
	}
	else if (nQ < 88.08) {
		dn = 500;
		nTempI = 0.0015;
	}
	else if (nQ < 126.84) {
		dn = 600;
		nTempI = 0.0015;
	}
	else if (nQ < 172.65) {
		dn = 700;
		nTempI = 0.001;
	}
	else if (nQ < 222.5) {
		dn = 800;
		nTempI = 0.001;
	}
	else if (nQ < 285.39) {
		dn = 900;
		nTempI = 0.001;
	}
	else if (nQ < 379.11) {
		dn = 1000;
		nTempI = 0.001;
	}
	else if (nQ < 458.72) {
		dn = 1100;
		nTempI = 0.001;
	}
	else if (nQ < 545.92) {
		dn = 1200;
		nTempI = 0.0005;
	}
	else if (nQ < 690.93) {
		dn = 1350;
		nTempI = 0.0005;
	}
	else if (nQ < 853) {
		dn = 1500;
		nTempI = 0.0005;
	}
	else if (nQ < 1032.13) {
		dn = 1650;
		nTempI = 0.0005;
	}
	else {
		dn = 1800;
		nTempI = 0.0005;
	}

	double nSlowV = 0.6;
	nQ = nQ / 1000;// 把L/S 转化为 M3/S
	while (1)
	{
		nI = nTempI - 0.0005;
		double nRadius = (double)dn / 1000;
		double nFullest = 0.55;
		if (dn > 350 && dn < 500)
			nFullest = 0.65;
		else if (dn > 450 && dn < 1000)
			nFullest = 0.7;
		else if (dn >= 1000)
			nFullest = 0.75;

		double nTmp = nI / (10.29 / pow(nRadius, 5.333));
		double nTmpQ = (nN * nQ) / sqrt(nTmp);
		nFull = GlobalFunc::GetFullByPercentQ(nTmpQ);
		double nTmpA = GetPercentAreaByFull(nFull);
		if (nTmpA < 0.001)
			break;
		nV = 1.27 / (nRadius * nRadius) * nQ / nTmpA;


		//计算充满度和流速《给水排水管网系统》 利用差值法查表
		while (nV < nSlowV || (nV > 10 && bMetal) || (nV > 5 && !bMetal) || nFull > nFullest) {
			nI += 0.0005;
			double nTmp = nI / (10.29 / pow(nRadius, 5.333));
			double nTmpQ = (nN * nQ) / sqrt(nTmp);
			nFull = GlobalFunc::GetFullByPercentQ(nTmpQ);
			if (nFull < 0.001)
				break;
			double nTmpA = GetPercentAreaByFull(nFull);
			nV = 1.27 / (nRadius * nRadius) * nQ / nTmpA;
		}
		double nTempQ = (0.25 * nRadius * nRadius * PI) * nV * nFull;

		if (nTempQ < nQ && dn < 3000 && fabs(nTempQ - nQ) > 0.01) {
			dn = PlusDirtDn(dn, TRUE);   //设计流量不够，管径加大一号
			continue;
		}
		if (dn == 200)
			break;
		int iTempDn = PlusDirtDn(dn, FALSE);
		iTempDn = PlusDirtDn(iTempDn, FALSE);
		double nTempDn = (double)iTempDn / 1000;
		nTempQ = (0.25 * nTempDn * nTempDn * PI) * nV * nFull;
		if (nTempQ > nQ) {
			dn = PlusDirtDn(dn, FALSE);  //设计流量过了，管径减小一号
			continue;
		}
		else
			break;
	}
	return dn;
}



//***************************************************************************************************
//                                        污井流量
//***************************************************************************************************
//void SetDirtWellQ()
//{
//    double nQ(0);
//    CString csQ;
//    RBList rbMask(RTDXF0, _T("AEC_ZT_WELL"), 8, LAY_WELL_DIRT, NULL);
//    PickSet ss(SS_FREE);
//    PickSet ssAll(SS_FREE), ssDel(SS_FREE);
//    ssAll.Get(_T("X"), NULL, NULL, rbMask);
//    for(long j=0;j<ssAll.Length();j++){
//        Entity ent = ssAll[j];
//        csQ = GlobalFunc::ReadXdata(ent, _T("TG-DIRTWELLQ"));
//        if(csQ != _T("")){
//            XPoint ptLoc;
//            double nScale(0);
//            OPENOBJ_BEGIN(ent, AcDb::kForRead, TDbEquipment, pEquip);
//            if(pEquip){
//                ptLoc = pEquip->GetLocation();
//                nScale = pEquip->GetScale();
//            }     
//            OPENOBJ_END();  
//            XText text(XString(_T("Q=%s(L/S)"), csQ), ptLoc, g_nTwtDimHeight * GlobalFunc::DocGetPScale(), g_nDimScale, g_csTwtDimStyle, LAY_CALC_TEXT);
//            text.Draw();
//            Entity entCir2;
//            entCir2.GetLast();
//            ssDel += entCir2;
//        }
//    }
//    
//	if(SelectEntities(_T("\n请选择污水井:<退出>"), ss, rbMask) != RTNORM){
//        ssDel.Erase();
//        return;
//    }
//    ssDel.Erase();
//    long len = ss.Length();
// 
//	if(ads_getreal(_T("\n请给出流入污水井的流量(L/S)(注意不包括转输流量)<退出>:"), &nQ) != RTNORM)
//        return;
// 
//    csQ.Format(_T("%.2f"), nQ);
//    for(long i=0;i<len;i++){
//        Entity ent = ss[i];
//        WriteXdata(ent, _T("TG-DIRTWELLQ"), csQ);
//    }    
//}


//***************************************************************************************************
//                                        小区污水
//***************************************************************************************************

//输出计算书函数
void ImportDirtWellCalcWord(DList<SDirtCalcData> &lstNode)
{
	int len = lstNode.Length();
	if (len < 1)
		return;

	//初始化
	COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR), vtTrue((short)TRUE), vtFalse((short)FALSE);
	_Application	wordApplication;
	Documents		wordDocuments;
	_Document       activeDocument;
	Paragraphs		wordParagraphs;
	Selection		wordSelection;

	if (!wordApplication.CreateDispatch(_T("Word.Application")))
	{
		AfxMessageBox(_T("不能执行Microsoft Word 8.0!"));
		return;
	}
	wordApplication.SetVisible(TRUE);
	wordDocuments = wordApplication.GetDocuments();
	activeDocument = wordDocuments.Add(vtOptional, vtOptional);


	//写一行字
	wordSelection = wordApplication.GetSelection();
	wordParagraphs = wordSelection.GetParagraphs();
	wordParagraphs.SetAlignment(0);  // 0: 居左  1：居中  2：居右

	wordSelection.TypeText(_T("计算原理参照《全国民用建筑工程设计技术措施2009》\n"));
	wordSelection.TypeText(_T("计算结果：\n"));
	Selection wSelection2 = wordApplication.GetSelection();
	wSelection2.TypeParagraph();

	//画表格
	int rows(len + 1), columns(8);

	Selection wSelection = wordApplication.GetSelection();
	Range	oRange = wSelection.GetRange();
	Tables	oTables = activeDocument.GetTables();
	_Table	oTable = oTables.Add(oRange, rows, columns);
	// cet 2010.3.25 add 
	Borders oBorders = oTable.GetBorders();
	oBorders.SetInsideLineStyle(1); // 设置表格线型
	oBorders.SetOutsideLineStyle(1);

	Columns		oColumns;
	Column		oColumn;
	oColumns = oTable.GetColumns();
	oColumn = oColumns.Item(1);
	oColumn.SetWidth(60, 0);   // 0 = wdAdjustNone
	oColumn = oColumns.Item(2);
	oColumn.SetWidth(50, 0);
	oColumn = oColumns.Item(3);
	oColumn.SetWidth(60, 0);
	oColumn = oColumns.Item(4);
	oColumn.SetWidth(55, 0);
	oColumn = oColumns.Item(5);
	oColumn.SetWidth(60, 0);
	oColumn = oColumns.Item(6);
	oColumn.SetWidth(60, 0);
	oColumn = oColumns.Item(7);
	oColumn.SetWidth(55, 0);
	oColumn = oColumns.Item(8);
	oColumn.SetWidth(75, 0);





	Cell		oCell;
	oCell = oTable.Cell(1, 1);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("管段名称"));


	oCell = oTable.Cell(1, 2);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("流量L/s"));

	oCell = oTable.Cell(1, 3);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("管长m"));

	oCell = oTable.Cell(1, 4);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("公称直径"));

	oCell = oTable.Cell(1, 5);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("坡度‰"));

	oCell = oTable.Cell(1, 6);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("流速m/s"));


	oCell = oTable.Cell(1, 7);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("充满度%"));

	oCell = oTable.Cell(1, 8);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("管材"));



	for (int i = 0; i < len; i++) {
		CString csTmp;
		oCell = oTable.Cell(i + 2, 1);  //管段名称
		oRange = oCell.GetRange();
		oRange.InsertAfter(lstNode[i]->m_csName);


		csTmp.Format(_T("%.2f"), lstNode[i]->m_nPipeQ);
		oCell = oTable.Cell(i + 2, 2);  //管道流量L/s
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%.2f"), lstNode[i]->m_nLength);
		oCell = oTable.Cell(i + 2, 3);  //管长m
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%d"), lstNode[i]->m_iDn);
		oCell = oTable.Cell(i + 2, 4);  //管径mm
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%.2f"), lstNode[i]->m_nI);
		oCell = oTable.Cell(i + 2, 5);  //水力坡降mH2O/m
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%.2f"), lstNode[i]->m_nV);
		oCell = oTable.Cell(i + 2, 6);  //流速m/s
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%.2f"), lstNode[i]->m_nFull * 100);
		oCell = oTable.Cell(i + 2, 7);  //充满度
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);


		int iMat(0);
		OPENOBJ_BEGIN(lstNode[i]->m_ID, AcDb::kForRead, CDbPipe, pPipe);
		if (pPipe) {
			iMat = pPipe->GetMaterial();
		}
		OPENOBJ_END();

		CString csMat = GlobalFunc::GetPipeMaterialByIdx(iMat);
		oCell = oTable.Cell(i + 2, 8);  //管材
		oRange = oCell.GetRange();
		oRange.InsertAfter(csMat);

	}

	COleVariant vtOptional2((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
	wordSelection = wordApplication.GetSelection();
	wordSelection.GoTo(COleVariant((short)3),       // 3 = wdGoToLine
		COleVariant((short)-1), vtOptional2, vtOptional2);  // -1 = wdGoToLast

	wSelection = wordApplication.GetSelection();
	wSelection.TypeParagraph();

}

//计算每段管的设计流量
//nQA=比流量  
//pListAll->m_nV =  Qd 平均日污水流量
//每段流量＝nQa*本段服务面积＋集中流量
//Kz 总变化系数
// 《给排水管线系统》 P205
void DoCalcDesignQ(SSearchPipeList *pListAll, double nQa)
{
	if (pListAll->m_iType == 0) {
		if (pListAll->m_iSpare == 0) { // 居民生活污水
			double nDesignQ = nQa * (pListAll->m_nStartPress / 10000);
			pListAll->m_nSpare = nDesignQ;
		}
	}
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		DoCalcDesignQ(pList, nQa);
		pListAll->m_nSpare += pList->m_nSpare;
	}
	if (pListAll->m_iType == 0) {
		double nDesignQ = pListAll->m_nSpare;
		double nKz(0);
		if (nDesignQ < 5)
			nKz = 2.3;
		else if (nDesignQ > 1000)
			nKz = 1.3;
		else
			nKz = 2.7 / pow(nDesignQ, 0.11);
		nDesignQ = nDesignQ * nKz;
		if (nDesignQ < 0.001)
			nDesignQ = 0;
		pListAll->m_nPipeQ = nDesignQ;
	}
}

void GetFocusQ(SSearchPipeList *pListAll, double &nRet)
{
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		if (pList->m_iType != 0) {
			double nFocusQ = pList->m_bNeedCale;
			nFocusQ = nFocusQ / 1000;
			nRet += nFocusQ;
		}
		GetFocusQ(pList, nRet);
	}
}

void GetIndustryQ(SSearchPipeList *pListAll, double &nRet)
{
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		if (pList->m_iType != 0) {
			if (pList->m_iSpare == 1) {
				double dDirtCoef = (double)pList->m_iNum / 100.0; //污水折减系数
				double dWaterRation = pList->m_nDang;             //给水指标
				double dArea = pListAll->m_nStartPress / 10000;   //公顷
				double dQ = dArea * 0.01 * dDirtCoef * dWaterRation;    //单位：万立方米每天
				dQ = (dQ * 10000 * 1000) / (24 * 3600);           //L/S
				nRet += dQ;
			}

		}
		GetIndustryQ(pList, nRet);
	}
}

void AddFocusQ(SSearchPipeList *pListAll)
{
	double nRet(0), nRet2(0);
	GetFocusQ(pListAll, nRet);
	GetIndustryQ(pListAll, nRet2);
	pListAll->m_nPipeQ += nRet;
	pListAll->m_nPipeQ += nRet2;
	//	if(pListAll->m_iType == 3){
	//		ads_name ent;
	//		acdbGetAdsName(ent, pListAll->m_ID);
	//		WriteXdata(ent, _T("TG-DIRTWELLQ"), XString(_T("%.2f"), pListAll->m_nPipeQ));
	//	}
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		AddFocusQ(pList);
	}
}



BOOL CheckWellSys(SSearchPipeList *pListAll, BOOL bChcekPool = FALSE)
{
	BOOL bRet = TRUE;
	if (pListAll->m_iType == 1) {
		AcDbObjectId id = NULL;
		id = pListAll->m_ID;
		OPENOBJ_BEGIN(id, AcDb::kForRead, CDbPipeNode, pNode);
		if (pNode) {
			if (pNode->GetInterfaceNum() > 1) {
				g_Option::instance().adsout << _T("\n2管线相交之处缺少井!");
				double nDist = GlobalFunc::DocGetPScale() * 20;
				XPoint pt = pNode->GetLocation();
				XPoint p1, p2, p3, p4;
				ads_polar(pt, 0, nDist, p1);
				ads_polar(p1, PI / 2, nDist, p1);
				ads_polar(pt, PI, nDist, p2);
				ads_polar(p2, PI / 2, -nDist, p2);
				ads_grdraw(p1, p2, 2, 0);
				ads_polar(pt, PI / 2, nDist, p3);
				ads_polar(p3, PI, nDist, p3);
				ads_polar(pt, PI / 2, -nDist, p4);
				ads_polar(p4, 0, nDist, p4);
				ads_grdraw(p3, p4, 2, 0);
				bRet = FALSE;
				return FALSE;
			}
		}
		OPENOBJ_END();
	}
	else if (pListAll->m_iType == 4)
	{
		if (bChcekPool)
		{
			g_Option::instance().adsout << _T("系统不能有化粪池！");
			bRet = FALSE;
			return FALSE;
		}
	}

	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		if (!CheckWellSys(pList, bChcekPool))
			bRet = FALSE;
	}
	return bRet;
}

//读取市政污水井信息
BOOL SetDirtWellInfo(SSearchPipeList *pListAll, double &nAllArea, BOOL &bInput)
{
	BOOL ret = TRUE;
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	if (GlobalFunc::IsWell(id))
		pListAll->m_iType = 3;
	ads_name ent;
	double nCurPipeLength(0);
	acdbGetAdsName(ent, id);
	if (pListAll->m_iType == 3) {
		CString csWellName = GlobalFunc::GetWellName(ent);
		CString csArea = GlobalFunc::ReadXdata(ent, _T("TG-WELLAREA"));
		CString csRation = GlobalFunc::ReadXdata(ent, _T("TG-DIRTRATION"));
		CString csPeople = GlobalFunc::ReadXdata(ent, _T("TG-DIRTPEOPLE"));
		CString csQ = GlobalFunc::ReadXdata(ent, _T("TG-DIRTFOCUSQ"));
		CString csWaterRation = GlobalFunc::ReadXdata(ent, _T("TG-WATERRATION"));	// 给水指标
		CString csDirtCoef = GlobalFunc::ReadXdata(ent, _T("TG-DIRTCOEF"));			// 污水折减系数


		if (csQ != _T("") || csArea != _T("") || csRation != _T("") || csPeople != _T("") || csWaterRation != _T("") || csDirtCoef != _T(""))
			bInput = TRUE;
		if (csWaterRation != _T("") && csDirtCoef != _T("")) { //工业用水
			pListAll->m_iSpare = 1;
			pListAll->m_iNum = int(_tstof(csDirtCoef) * 100);
			pListAll->m_nDang = _tstof(csWaterRation);
		}
		else {
			pListAll->m_iSpare = 0;
			pListAll->m_iNum = _ttoi(csPeople);
			pListAll->m_nDang = _tstof(csRation);
		}
		pListAll->m_nStartPress = _tstof(csArea);
		pListAll->m_bNeedCale = _ttoi(csQ) * 1000;
		if (pListAll->m_pPrevious != NULL)
			pListAll->m_pPrevious->m_iSpare = pListAll->m_iSpare;
	}
	else if (pListAll->m_iType == 0) {
		OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbPipe, pPipe);
		if (pPipe) {
			nCurPipeLength = pPipe->Length();
			//  if(!DocGetMeterUnitDraw())
			 //     nCurPipeLength = nCurPipeLength/1000;
			pListAll->m_nLength = nCurPipeLength;
		}
		OPENOBJ_END();
		CString csNum1 = pListAll->m_pPrevious->m_csName;
		if (!pListAll->m_pPrevious->m_pPrevious && csNum1 == _T(""))
			csNum1 = _T("出口");
		CString csNum2 = pListAll->m_lstNode[0]->m_csName;
		if (csNum1 != _T("") && csNum2 != _T(""))
			pListAll->m_csName = csNum2 + _T("-") + csNum1;
	}
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		ret = SetDirtWellInfo(pList, nAllArea, bInput);
		if (pListAll->m_iType == 0) {
			pListAll->m_iNum = pList->m_iNum;
			pListAll->m_nDang = pList->m_nDang;
			pListAll->m_nStartPress = pList->m_nStartPress;
			pListAll->m_bNeedCale = pList->m_bNeedCale;
			if (pListAll->m_iSpare == 0) {//计算：生活污水设计流量
				double nTmpQ(0);
				if (pListAll->m_iNum > 0 && pListAll->m_nStartPress > 0 && pListAll->m_nDang > 0)
				{
					nTmpQ = pListAll->m_iNum * pListAll->m_nDang * pListAll->m_nStartPress / 10000;
					nTmpQ = nTmpQ / (24 * 3600);
					pListAll->m_nV = nTmpQ; //计算Qd
				}
			}
		}
		pListAll->m_nV += pList->m_nV;
		if (pListAll->m_iType != 0 && pList->m_iSpare == 0) // 2009-7-13  if(pListAll->m_iType == 3) 
			nAllArea += pList->m_nStartPress; //这里算Qd（居民生活污水平均日流量）必须是生活的，不能带工业面积
	}
	return ret;
}

//计算本节点往后共计管线长度
void CalcDirtWellQ(SSearchPipeList *pListAll, SSearchPipeList *pListFront, BOOL &bHasQ)
{
	BOOL ret = TRUE;
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	ads_name ent;
	double nCurPipeLength(0);
	acdbGetAdsName(ent, id);
	if (pListAll->m_iType == 3) {
		Entity entTmp = ent;
		CString csQ = GlobalFunc::ReadXdata(entTmp, _T("TG-DIRTWELLQ"));
		if (csQ != _T("")) {
			pListAll->m_nPipeQ = _tstof(csQ);
			bHasQ = TRUE;
		}
	}
	else if (pListAll->m_iType == 0) {
		OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbPipe, pPipe);
		if (pPipe) {
			nCurPipeLength = pPipe->Length();
			//            if(!DocGetMeterUnitDraw())
					//        nCurPipeLength = nCurPipeLength/1000;
			pListAll->m_nLength = nCurPipeLength;
		}
		OPENOBJ_END();
		CString csNum1 = pListAll->m_pPrevious->m_csName;
		if (!pListAll->m_pPrevious->m_pPrevious && csNum1 == _T(""))
			csNum1 = _T("出口");
		CString csNum2 = pListAll->m_lstNode[0]->m_csName;
		if (csNum1 != _T("") && csNum2 != _T(""))
			pListAll->m_csName = csNum2 + _T("-") + csNum1;
	}
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		pList->m_pPrevious = pListAll;
		CalcDirtWellQ(pList, pListAll, bHasQ);
		pListAll->m_nPipeQ += pList->m_nPipeQ;
	}
}

//小区污水主函数
void DirtWellCalc()
{
	Entity entMainPipe, entLongWell;
	RBList rbMaskPipe(RTDXF0, _T("AEC_ZT_PIPE"), 8, LAY_PIPE_DIRT, NULL);
	RBList rbMask(RTDXF0, _T("AEC_ZT_WELL"), NULL);
	if (GlobalFunc::SelectEntity(_T("\n请选择排出干管<退出>"), entMainPipe, rbMaskPipe) != RTNORM) {
		return;
	}

	SSearchPipeList *pListAll = new SSearchPipeList();
	PickSet ssAll(SS_FREE);
	ssAll += entMainPipe;
	if (!GlobalFunc::SearchSprinkPipeSys(entMainPipe, NULL, pListAll, ssAll)) {
		AfxMessageBox(_T("污水系统有回路！"));
		delete pListAll;
		return;
	}
	if (!GlobalFunc::CalcLstPipeLength(pListAll, NULL, ssAll)) {
		AfxMessageBox(_T("污水系统没有标注管径,请先执行命令[管径标注]"));
		delete pListAll;
		return;
	}


	if (pListAll->m_lstNode.Length() == 2) {
		ssAll.Free();
		//计算源头应为节点,而不是管线. 以下计算管线2节点哪个是源头
		CalcWellNum(pListAll);
		SSearchPipeList *p1 = pListAll->m_lstNode[0];
		SSearchPipeList *p2 = pListAll->m_lstNode[1];
		SSearchPipeList *p3 = p1->m_iNum > p2->m_iNum ? p2 : p1;

		ads_name ent;
		acdbGetAdsName(ent, p3->m_ID);
		delete pListAll;
		pListAll = new SSearchPipeList();
		//重新搜索系统
		if (!GlobalFunc::SearchSprinkPipeSys(ent, NULL, pListAll, ssAll)) {
			AfxMessageBox(_T("污水系统有回路！"));
			delete pListAll;
			return;
		}
		GlobalFunc::CalcLstPipeLength(pListAll, NULL, ssAll);
		pListAll->m_iType = GlobalFunc::GetNodeType(ent);
	}


	SSearchPipeList *pNodeLong = GlobalFunc::GetNextDimNode2(pListAll, NULL);
	if (!SetWellName(pListAll)) {
		AfxMessageBox(_T("没有完整输入井编号！"));
		delete pListAll;
		return;
	}

	BOOL bHasQ(FALSE);
	CalcDirtWellQ(pListAll, NULL, bHasQ);
	if (!bHasQ) {
		AfxMessageBox(_T("没有输入井流量！"));
		delete pListAll;
		return;
	}
	CheckWellSys(pListAll);

	ssAll.Redraw(3);
	TCHAR szTmp[256];
	int rett = ads_getstring(NULL, _T("\n需要计算的管网系统已高亮显示:<计算>"), szTmp);
	if (rett == RTCAN) {
		ssAll.Redraw(4);
		delete pListAll;
		return;
	}

	CTemporaryResourceOverride vTemp;
	CCalcDirtWellDlg dlg(0);
	dlg.m_ssAll += ssAll;
	dlg.m_pListAll = pListAll;
	if (dlg.DoModal() != IDOK) {
		ssAll.Redraw(4);
		delete pListAll;
		return;
	}
	ssAll.Redraw(4);
	delete pListAll;
}

//市政污水主函数
void CivilDirtWellCalc()
{
	Entity entMainPipe, entLongWell;
	RBList rbMaskPipe(RTDXF0, _T("AEC_ZT_PIPE"), 8, LAY_PIPE_DIRT, NULL);
	RBList rbMask(RTDXF0, _T("AEC_ZT_WELL"), NULL);
	if (GlobalFunc::SelectEntity(_T("\n请选择排出干管<退出>"), entMainPipe, rbMaskPipe) != RTNORM) {
		return;
	}

	SSearchPipeList *pListAll = new SSearchPipeList();
	PickSet ssAll(SS_FREE);
	ssAll += entMainPipe;
	if (!GlobalFunc::SearchSprinkPipeSys(entMainPipe, NULL, pListAll, ssAll)) {
		AfxMessageBox(_T("污水系统有回路！"));
		delete pListAll;
		return;
	}
	if (!GlobalFunc::CalcLstPipeLength(pListAll, NULL, ssAll)) {
		AfxMessageBox(_T("污水系统没有标注管径,请先执行命令[管径标注]"));
		delete pListAll;
		return;
	}


	if (pListAll->m_lstNode.Length() == 2) {
		ssAll.Free();
		//计算源头应为节点,而不是管线. 以下计算管线2节点哪个是源头
		CalcWellNum(pListAll);
		SSearchPipeList *p1 = pListAll->m_lstNode[0];
		SSearchPipeList *p2 = pListAll->m_lstNode[1];
		SSearchPipeList *p3 = p1->m_iNum > p2->m_iNum ? p2 : p1;

		ads_name ent;
		acdbGetAdsName(ent, p3->m_ID);
		delete pListAll;
		pListAll = new SSearchPipeList();
		//重新搜索系统
		if (!GlobalFunc::SearchSprinkPipeSys(ent, NULL, pListAll, ssAll)) {
			AfxMessageBox(_T("污水系统有回路！"));
			delete pListAll;
			return;
		}
		GlobalFunc::CalcLstPipeLength(pListAll, NULL, ssAll);
		pListAll->m_iType = GlobalFunc::GetNodeType(ent);
	}


	SSearchPipeList *pNodeLong = GlobalFunc::GetNextDimNode2(pListAll, NULL);
	if (!SetWellName(pListAll)) {
		AfxMessageBox(_T("没有完整输入井编号！"));
		delete pListAll;
		return;
	}
	double nAllArea(0);
	BOOL bInput = FALSE;
	// 1.读取各个井的信息，并计算Qd（居民生活污水平均日流量）和总面积
	if (!SetDirtWellInfo(pListAll, nAllArea, bInput) || !bInput) {
		AfxMessageBox(_T("没有完整输入污井信息！"));
		delete pListAll;
		return;
	}
	CheckWellSys(pListAll);
	ssAll.Redraw(3);
	if (GlobalFunc::SelectEntity(_T("\n请选择主干网最远井<系统搜索>:"), entLongWell, rbMask) != RTNORM || !entLongWell.In(&ssAll)) {
		AcDbObjectId id = pNodeLong->m_ID;
		ads_name entTmp;
		acdbGetAdsName(entTmp, id);
		entLongWell = entTmp;
	}
	pNodeLong = GetWellNode(pListAll, entLongWell, NULL);

	// 2.求比流量。Qa = Qd / ∑A  《给排水管网系统》 p211
	double nQa = pListAll->m_nV / (nAllArea / 10000);
	if (pListAll->m_nV < 0.00001)
		nQa = 0;

	// 3.根据比流量和各个管道算占的面积，计算各管道设计流量
	DoCalcDesignQ(pListAll, nQa);
	// 4.加上集中流量
	AddFocusQ(pListAll);

	CTemporaryResourceOverride vTemp;
	CCalcDirtWellDlg dlg(1);
	dlg.m_ssAll += ssAll;
	dlg.m_pListAll = pListAll;
	dlg.m_pNodeLong = pNodeLong;

	if (dlg.DoModal() != IDOK) {
		ssAll.Redraw(4);
		delete pListAll;
		return;
	}
	ssAll.Redraw(4);
	delete pListAll;
}



TGridDirtWell::TGridDirtWell(int iType)
{
	if (iType == 0) {
		AppendCol(_T("编号"), 65);
		AppendCol(_T("管长m"), 65);
		AppendCol(_T("管径mm"), 65);
		AppendCol(_T("坡度‰"), 65);
		AppendCol(_T("流量L/s"), 65);
		AppendCol(_T("流速m/s"), 65);
		AppendCol(_T("充满度%"), 65);
		SetColPosFix();
		SetColFixLength();
		SetNoPaste();
		GetCol(2).SetComboEdit();
		GetCol(3).SetComboEdit();
		COLORREF color = RGB(255, 0, 0);
		GetCol(2).SetTextColor(color);
		GetCol(3).SetTextColor(color);
		COLORREF color2 = RGB(0, 0, 255);;
		GetCol(5).SetTextColor(color2);
		GetCol(6).SetTextColor(color2);
	}
	else {
		AppendCol(_T("编号"), 55);              // 0
		AppendCol(_T("管长m"), 55);             // 1  
		AppendCol(_T("管径mm"), 50);            // 2
		AppendCol(_T("坡度‰"), 55);            // 3
		AppendCol(_T("面积(公顷)"), 62);        // 4
		//AppendCol(_T("人口密度(人/公顷)"), 52); // 5
		//AppendCol(_T("污水定额(L/人天)"), 52);  // 6
		AppendCol(_T("集中流量L/s"), 52);       // 5
		AppendCol(_T("设计流量L/s"), 52);       // 6
		AppendCol(_T("流速m/s"), 55);           // 7
		AppendCol(_T("充满度%"), 55);           // 8
		SetColPosFix();
		SetColFixLength();
		SetNoPaste();
		GetCol(2).SetComboEdit();
		GetCol(3).SetComboEdit();
		COLORREF color = RGB(255, 0, 0);
		GetCol(2).SetTextColor(color);
		GetCol(3).SetTextColor(color);
		COLORREF color2 = RGB(0, 0, 255);;
		GetCol(6).SetTextColor(color2);
		GetCol(7).SetTextColor(color2);
		GetCol(8).SetTextColor(color2);
	}
}

void TGridDirtWell::OnCellComboString(WDGridCell&cell, CComboBox&combo)
{
	if (cell.GetColIndex() == 2) {
		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() == 3) {
		combo.AddString(_T("1"));
		combo.AddString(_T("2"));
		combo.AddString(_T("3"));
		combo.AddString(_T("4"));
		combo.AddString(_T("5"));
		combo.AddString(_T("6"));
	}
}




/////////////////////////////////////////////////////////////////////////////
// CCalcDirtWellDlg dialog


CCalcDirtWellDlg::CCalcDirtWellDlg(int iType, CWnd* pParent /*=NULL*/)
	: CAcUiDialog(CCalcDirtWellDlg::IDD, pParent), m_ssAll(SS_FREE), m_grid(iType)
{
	m_iType = iType;
	m_pNodeLong = NULL;
	m_pListAll = NULL;
	//{{AFX_DATA_INIT(CCalcDirtWellDlg)
	//}}AFX_DATA_INIT
}


void CCalcDirtWellDlg::DoDataExchange(CDataExchange* pDX)
{
	CAcUiDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CCalcDirtWellDlg)
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CCalcDirtWellDlg, CAcUiDialog)
	//{{AFX_MSG_MAP(CCalcDirtWellDlg)
	ON_BN_CLICKED(IDC_BUTTON_CALC, OnButtonCalc)
	ON_BN_CLICKED(IDC_BUTTON_DIM, OnButtonDim)
	ON_BN_CLICKED(IDC_BUTTON_WORD, OnButtonWord)
	ON_BN_CLICKED(IDC_BUTTON_HIDE, OnButtonHide)
	ON_BN_CLICKED(IDC_BUTTON_CALC2, OnButtonCalc2)
	ON_WM_DESTROY()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CCalcDirtWellDlg message handlers
BOOL CCalcDirtWellDlg::OnInitDialog()
{
	CAcUiDialog::OnInitDialog();
	if (m_iType == 1) {
		SetWindowText(_T("市政污水水力计算"));
		CRect rect, rect2;
		this->GetWindowRect(&rect);
		rect.right += 30;
		this->MoveWindow(&rect);
		CWnd *pWnd = GetDlgItem(IDC_LIST_PIPE);
		pWnd->GetWindowRect(&rect2);
		ScreenToClient(rect2);
		rect2.right += 30;
		pWnd->MoveWindow(&rect2);
	}
	m_grid.Clear();
	m_grid.Create(this, IDC_LIST_PIPE);
	m_grid.SetNoAppendButton(TRUE);
	m_grid.SetNoDefaultMenu(true);
	if (m_iType == 1)
		UpdateCivilGrid();
	else
		UpdateGrid();
	m_wndToolTip.Create(this);
	m_wndToolTip.Activate(true);
	m_wndToolTip.SetDelayTime(TTDT_INITIAL, 500);
	CWnd *pWnd1 = GetDlgItem(IDOK);
	CWnd *pWnd2 = GetDlgItem(IDC_BUTTON_CALC);
	CWnd *pWnd3 = GetDlgItem(IDC_BUTTON_CALC2);
	CWnd *pWnd4 = GetDlgItem(IDC_BUTTON_HIDE);
	m_wndToolTip.AddTool(pWnd1, _T("初算，未知管径，未知坡度"));
	m_wndToolTip.AddTool(pWnd2, _T("复算，已知管径，已知坡度"));
	m_wndToolTip.AddTool(pWnd3, _T("复算，已知坡度，计算管径"));
	m_wndToolTip.AddTool(pWnd4, _T("隐藏对话框"));

	return TRUE;  // return TRUE unless you set the focus to a control
				  // EXCEPTION: OCX Property Pages should return FALSE
}

//得到下一个计算支路的起点节点 根据流速是否为0且最远
SSearchPipeList *CCalcDirtWellDlg::GetNextWell(SSearchPipeList *pListAll, SSearchPipeList *pDisadvantage, DList<SDirtCalcData> &lstData)
{
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	BOOL bFind = FALSE;
	for (int j = 0; j < lstData.Length(); j++) {
		if (lstData[j]->m_ID == id) {
			bFind = TRUE;
			break;
		}
	}
	double nCurPipeLength(0);
	if (!bFind && pListAll->m_iType == 3) {
		nCurPipeLength = pListAll->m_nLength;
		if (pDisadvantage) {
			if (nCurPipeLength > pDisadvantage->m_nLength)
				pDisadvantage = pListAll;
		}
		else
			pDisadvantage = pListAll;        //条件3: 临时节点为空
	}
	int len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		pDisadvantage = GetNextWell(pList, pDisadvantage, lstData);
	}
	return pDisadvantage;
}

void CCalcDirtWellDlg::UpdateGrid()
{
	long iCurRow = m_grid.GetCurRowIndex();
	m_grid.Clear();
	DList<SDirtCalcData> lstData;
	DList<SDirtCalcData> lstAll;
	SSearchPipeList *pNodeNext = GetNextWell(m_pListAll, NULL, lstData);

	while (pNodeNext) {
		SSearchPipeList *pNodeLong = pNodeNext;
		while (pNodeLong) {
			BOOL bFind = FALSE;
			for (int j = 0; j < lstAll.Length(); j++) {
				if (lstAll[j]->m_ID == pNodeLong->m_ID) {
					bFind = TRUE;
					break;
				}
			}
			SDirtCalcData *pNodeNew2 = new SDirtCalcData();
			pNodeNew2->m_ID = pNodeLong->m_ID;
			lstAll.Append(pNodeNew2);

			if (pNodeLong->m_iType == 0 && pNodeLong->m_nLength > 0) {
				SDirtCalcData *pNodeNew = new SDirtCalcData();
				pNodeNew->m_iDn = pNodeLong->m_iDn;
				if (pNodeLong->m_iType == 0)
					pNodeNew->m_bIsWell = FALSE;
				else
					pNodeNew->m_bIsWell = TRUE;
				pNodeNew->m_ID = pNodeLong->m_ID;
				pNodeNew->m_csName = pNodeLong->m_csName;
				pNodeNew->m_nLength = pNodeLong->m_nLength;
				pNodeNew->m_nPipeQ = pNodeLong->m_nPipeQ;
				pNodeNew->m_nI = pNodeLong->m_nI;
				pNodeNew->m_nV = pNodeLong->m_nV;
				pNodeNew->m_nFull = pNodeLong->m_nLost;  //充满度
				lstData.Append(pNodeNew);
			}
			if (bFind)
				break;

			if (pNodeLong->m_pPrevious)
				pNodeLong = pNodeLong->m_pPrevious;
			else
				break;
		}
		pNodeNext = GetNextWell(m_pListAll, NULL, lstAll);
	}

	int idx = 0;
	for (int i = 0; i < lstData.Length(); i++) {
		if (!lstData[i]->m_bIsWell) { //管
			m_grid.AppendRow();
			int iDn = lstData[i]->m_iDn;
			CString csDn, csPipeLen, csI, csV, csQ, csFull;
			csDn.Format(_T("%d"), iDn);
			csV.Format(_T("%.2f"), lstData[i]->m_nV);
			csI.Format(_T("%.3f"), lstData[i]->m_nI);
			csPipeLen.Format(_T("%.2f"), lstData[i]->m_nLength);
			csQ.Format(_T("%.2f"), lstData[i]->m_nPipeQ);
			csFull.Format(_T("%.2f"), lstData[i]->m_nFull);
			m_grid.GetCell(idx, 0).SetText(lstData[i]->m_csName);
			m_grid.GetCell(idx, 1).SetText(csPipeLen);
			m_grid.GetCell(idx, 2).SetText(csDn);
			m_grid.GetCell(idx, 3).SetText(csI);
			m_grid.GetCell(idx, 4).SetText(csQ);
			m_grid.GetCell(idx, 5).SetText(csV);
			m_grid.GetCell(idx, 6).SetText(csFull);
			idx++;
		}

	}
	m_grid.SelectRow(iCurRow, TRUE);
}

void CCalcDirtWellDlg::UpdateCivilGrid()
{
	long iCurRow = m_grid.GetCurRowIndex();
	m_grid.Clear();
	DList<SDirtCalcData> lstData;
	DList<SDirtCalcData> lstAll;
	//  SSearchPipeList *pNodeNext = GetNextWell(m_pListAll, NULL, lstData);
	SSearchPipeList *pNodeNext = m_pNodeLong;
	while (pNodeNext) {
		SSearchPipeList *pNodeLong = pNodeNext;
		while (pNodeLong) {
			BOOL bFind = FALSE;
			for (int j = 0; j < lstAll.Length(); j++) {
				if (lstAll[j]->m_ID == pNodeLong->m_ID) {
					bFind = TRUE;
					break;
				}
			}
			SDirtCalcData *pNodeNew2 = new SDirtCalcData();
			pNodeNew2->m_ID = pNodeLong->m_ID;
			lstAll.Append(pNodeNew2);

			if (pNodeLong->m_iType == 0 && pNodeLong->m_nLength > 0) {
				SDirtCalcData *pNodeNew = new SDirtCalcData();
				pNodeNew->m_iDn = pNodeLong->m_iDn;
				if (pNodeLong->m_iType == 0)
					pNodeNew->m_bIsWell = FALSE;
				else
					pNodeNew->m_bIsWell = TRUE;
				pNodeNew->m_ID = pNodeLong->m_ID;
				pNodeNew->m_csName = pNodeLong->m_csName;
				pNodeNew->m_nLength = pNodeLong->m_nLength;
				pNodeNew->m_nPipeQ = pNodeLong->m_nPipeQ;

				pNodeNew->m_nI = pNodeLong->m_nI;
				pNodeNew->m_nV = pNodeLong->m_nV;
				pNodeNew->m_nFull = pNodeLong->m_nLost;
				pNodeNew->m_nArea = pNodeLong->m_nStartPress;
				double nFocusQ = pNodeLong->m_bNeedCale; //临时用他存一下
				nFocusQ = nFocusQ / 1000;
				pNodeNew->m_nFocusQ = nFocusQ;
				pNodeNew->m_iPeople = pNodeLong->m_iNum;
				pNodeNew->m_nRation = pNodeLong->m_nDang;
				pNodeNew->m_nPipeQ = pNodeLong->m_nPipeQ;
				lstData.Append(pNodeNew);
			}
			if (bFind)
				break;

			if (pNodeLong->m_pPrevious)
				pNodeLong = pNodeLong->m_pPrevious;
			else
				break;
		}
		pNodeNext = GetNextWell(m_pListAll, NULL, lstAll);
	}

	int idx = 0;
	for (int i = 0; i < lstData.Length(); i++) {
		if (!lstData[i]->m_bIsWell) { //管
			m_grid.AppendRow();
			int iDn = lstData[i]->m_iDn;
			CString csDn, csPipeLen, csI, csV, csQ, csFull, csPeople, csArea;
			CString csRation, csFocusQ, csDesignQ;
			csDn.Format(_T("%d"), iDn);
			csRation.Format(_T("%.1f"), lstData[i]->m_nRation);
			csFocusQ.Format(_T("%.2f"), lstData[i]->m_nFocusQ);
			csArea.Format(_T("%.2f"), lstData[i]->m_nArea / 10000);
			csPeople.Format(_T("%d"), lstData[i]->m_iPeople);
			csV.Format(_T("%.2f"), lstData[i]->m_nV);
			csI.Format(_T("%.3f"), lstData[i]->m_nI);
			csPipeLen.Format(_T("%.2f"), lstData[i]->m_nLength);
			csQ.Format(_T("%.2f"), lstData[i]->m_nPipeQ);
			csFull.Format(_T("%.2f"), lstData[i]->m_nFull);
			m_grid.GetCell(idx, 0).SetText(lstData[i]->m_csName);
			m_grid.GetCell(idx, 1).SetText(csPipeLen);
			m_grid.GetCell(idx, 2).SetText(csDn);
			m_grid.GetCell(idx, 3).SetText(csI);
			m_grid.GetCell(idx, 4).SetText(csArea);
			//   m_grid.GetCell(idx, 5).SetText(csPeople);
			 //  m_grid.GetCell(idx, 6).SetText(csRation);
			m_grid.GetCell(idx, 5).SetText(csFocusQ);
			m_grid.GetCell(idx, 6).SetText(csQ);
			m_grid.GetCell(idx, 7).SetText(csV);
			m_grid.GetCell(idx, 8).SetText(csFull);

			idx++;
		}

	}
	m_grid.SelectRow(iCurRow, TRUE);
}


//计算主模块
void CCalcDirtWellDlg::DoDirtWellCalc(SSearchPipeList *pListAll, int iMode)
{
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	ads_name ent;
	double nCurPipeLength(0);
	acdbGetAdsName(ent, id);
	if (pListAll->m_iType == 0 && pListAll->m_nLength > 0) { //管线
		int iDn(0);
		double nN(0.009), nI(0), nFull(0), nV(0);//粗糙系数
		BOOL bMetal = FALSE;
		OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbPipe, pPipe);
		if (pPipe) {
			CString csMat = GlobalFunc::GetPipeMaterialByIdx(pPipe->GetMaterial());
			if (csMat.Find(_T("混凝土管")) > -1)
				nN = 0.014;
			else if (csMat.Find(_T("铸铁")) > -1) {
				nN = 0.013;
				bMetal = TRUE;
			}
			else if (csMat.Find(_T("钢")) > -1) {
				nN = 0.012;
				bMetal = TRUE;
			}
			else if (csMat.Find(_T("PVC")) > -1 || csMat.Find(_T("塑料")) > -1)
				nN = 0.009;
		}
		OPENOBJ_END();
		if (pListAll->m_nPipeQ > 0.0001) {
			if (iMode == 0) {//初算
				iDn = GetFirstDirtPipeDnByQ(pListAll->m_nPipeQ, nN, nI, nV, nFull, m_iType);
			}
			else if (iMode == 1) { //复算 已知流量，坡度，管径, 计算流速
				//《给水排水管网系统》PAGE 54   2008-1-9 ywb
				// 步骤1：计算q/q0  公式：q/q0 ＝ (3.208*nN*nQ) / (pow(nRadius, 2.667) * pow(nI, 0.5))
				iDn = pListAll->m_iDn;
				nI = pListAll->m_nI / 1000;
				double nQ = pListAll->m_nPipeQ / 1000;
				double nRadius = (double)iDn / 1000;
				double nTmp = nI / (10.29 / pow(nRadius, 5.333));
				double nTmpQ = (nN * nQ) / sqrt(nTmp);
				// 步骤2：根据q/q0, 查表得充满度 h/D
				nFull = GlobalFunc::GetFullByPercentQ(nTmpQ);
				// 步骤3：根据充满度，查表得A/A0
				double nTmpA = GetPercentAreaByFull(nFull);
				// 步骤4：根据A/A0，计算得出流速V   公式：V = (1.273 * nQ) / (nRadius*nRadius * A/A0)
				nV = 1.273 / (nRadius * nRadius) * nQ / nTmpA;
			}
			else if (iMode == 2) {//复算 已知坡度
				nI = pListAll->m_nI / 1000;
				iDn = GetFirstDirtPipeDnByQ2(pListAll->m_nPipeQ, nN, nI, nV, nFull);
				int iDnBig(iDn);
				SSearchPipeList *pList = pListAll->m_lstNode[0];      //得到后节点
				//检查前管的管径是否大于本管，如果大于则本管也按大的管径
//                if(pList->m_lstNode.Length() > 0){
//                    for(int mm=0;mm< pList->m_lstNode.Length();mm++){
//                        SSearchPipeList *pList4 = pList->m_lstNode[mm]; 
//                        if(pList4->m_iDn > iDnBig)
//                            iDnBig = pList4->m_iDn;
//                    }
//                    if(iDnBig > iDn){
//                        iDn = iDnBig;
//                        double nRadius = (double)iDn / 1000;
//                        double nQ2 = pListAll->m_nPipeQ / 1000;// 把L/S 转化为 M3/S
//                        double nTmp = nI / (10.29 / pow(nRadius, 5.333));
//                        double nTmpQ = (nN * nQ2) / sqrt(nTmp);
//                        nFull = GlobalFunc::GetFullByPercentQ(nTmpQ);
//                        double nTmpA = GetPercentAreaByFull(nFull);
//                        nV = 1.27/(nRadius * nRadius) * nQ2 / nTmpA;
//                    }
//                }

			}
			pListAll->m_nI = nI * 1000;
			pListAll->m_nLost = nFull;
			pListAll->m_iDn = iDn;
			pListAll->m_nV = nV;
		}
	}

	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		DoDirtWellCalc(pList, iMode);
	}
}

//计算本段前面最粗的管径
void CCalcDirtWellDlg::GetBigPipeDn(SSearchPipeList *pList, int &iBigDn)
{
	if (pList->m_iType == 0) {
		int iDn = pList->m_iDn;
		if (iBigDn < iDn)
			iBigDn = iDn;
	}
	long len = pList->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList2 = pList->m_lstNode[i];
		GetBigPipeDn(pList2, iBigDn);
	}
}


//复算模块 看看有没有前面的管线管径比本段还大的
void CCalcDirtWellDlg::DoDirtWellReCalc(SSearchPipeList *pListAll)
{
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	ads_name ent;
	double nCurPipeLength(0);
	acdbGetAdsName(ent, id);
	if (pListAll->m_iType == 0 && pListAll->m_nLength > 0) { //管线
		int iDn(0);
		double nN(0.009), nI(0), nFull(0), nV(0);//粗糙系数
		BOOL bMetal = FALSE;
		OPENOBJ_BEGIN(ent, AcDb::kForRead, CDbPipe, pPipe);
		if (pPipe) {
			CString csMat = GlobalFunc::GetPipeMaterialByIdx(pPipe->GetMaterial());
			if (csMat.Find(_T("混凝土管")) > -1)
				nN = 0.014;
			else if (csMat.Find(_T("铸铁")) > -1) {
				nN = 0.013;
				bMetal = TRUE;
			}
			else if (csMat.Find(_T("钢")) > -1) {
				nN = 0.012;
				bMetal = TRUE;
			}
			else if (csMat.Find(_T("PVC")) > -1 || csMat.Find(_T("塑料")) > -1)
				nN = 0.009;
		}
		OPENOBJ_END();
		if (pListAll->m_nPipeQ > 0.0001) {
			nI = pListAll->m_nI / 1000;
			iDn = GetFirstDirtPipeDnByQ2(pListAll->m_nPipeQ, nN, nI, nV, nFull);
			int iDnBig(0);
			GetBigPipeDn(pListAll, iDnBig);
			if (iDnBig > iDn) {
				iDn = iDnBig;
				double nRadius = (double)iDn / 1000;
				double nQ2 = pListAll->m_nPipeQ / 1000;// 把L/S 转化为 M3/S
				double nTmp = nI / (10.29 / pow(nRadius, 5.333));
				double nTmpQ = (nN * nQ2) / sqrt(nTmp);
				nFull = GlobalFunc::GetFullByPercentQ(nTmpQ);
				double nTmpA = GetPercentAreaByFull(nFull);
				nV = 1.27 / (nRadius * nRadius) * nQ2 / nTmpA;
			}
			pListAll->m_nI = nI * 1000;
			pListAll->m_nLost = nFull;
			pListAll->m_iDn = iDn;
			pListAll->m_nV = nV;
		}
	}

	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		DoDirtWellReCalc(pList);
	}
}


//初算
void CCalcDirtWellDlg::OnOK()
{
	UpdateData(TRUE);
	DoDirtWellCalc(m_pListAll, 0);
	if (m_iType == 1)
		UpdateCivilGrid();
	else
		UpdateGrid();
}

//复算2
void CCalcDirtWellDlg::OnButtonCalc2()
{
	UpdateData(TRUE);
	for (m_grid.MoveToFirst(); !m_grid.IsOut(); m_grid.MoveToNext()) {
		WDGridRow *pRow = m_grid.CurRow();
		CString csName = (LPCTSTR)(*pRow)[0].GetText();
		CString csI = (LPCTSTR)(*pRow)[3].GetText();
		if (csName == _T(""))
			break;
		SSearchPipeList *pList = GlobalFunc::GetPipeNodeByName(m_pListAll, csName, NULL);
		if (pList != NULL) {
			pList->m_nI = _tstof(csI);
		}
	}
	DoDirtWellCalc(m_pListAll, 2);
	DoDirtWellReCalc(m_pListAll);
	if (m_iType == 1)
		UpdateCivilGrid();
	else
		UpdateGrid();
}

void CCalcDirtWellDlg::OnButtonCalc()
{
	UpdateData(TRUE);
	for (m_grid.MoveToFirst(); !m_grid.IsOut(); m_grid.MoveToNext()) {
		WDGridRow *pRow = m_grid.CurRow();
		CString csName = (LPCTSTR)(*pRow)[0].GetText();
		CString csDn = (LPCTSTR)(*pRow)[2].GetText();
		CString csI = (LPCTSTR)(*pRow)[3].GetText();

		if (csName == _T(""))
			break;
		SSearchPipeList *pList = GlobalFunc::GetPipeNodeByName(m_pListAll, csName, NULL);
		if (pList != NULL) {
			pList->m_iDn = _ttoi(csDn);
			pList->m_nI = _tstof(csI);
		}
	}
	DoDirtWellCalc(m_pListAll, 1);
	if (m_iType == 1)
		UpdateCivilGrid();
	else
		UpdateGrid();
}

//extern void UpdateMultDim();
extern bool g_bPipeShow;  // cet 2012.1.10 add 图面赋值控制变量
extern int g_nSelType;	  // cet 2012.1.10 add 图面赋值控制变量
void CCalcDirtWellDlg::OnButtonDim()
{
	UpdateData(TRUE);
	BeginEditorCommand();

	XPoint ptLow, ptUp;
	m_ssAll.GetExtend(ptLow, ptUp);
	GlobalFunc::AssureInCurrentView(ptLow, ptUp);

	// cet 2012.1.10 add
	g_bPipeShow = false;
	g_nSelType = -1;
	TCHAR szTmp[32];
	DimRainCalcResult(m_pListAll);
	acedRedraw(0, 0); // cet 2012.1.10 add 刷新清除显示管线时的X
	GlobalFunc::UpdateMultDim();
	actrTransactionManager->flushGraphics();            //acad 刷新

	ads_getstring(NULL, _T("\n数据已经赋回图面，n按任意键返回对话框:<返回>"), szTmp);

	CompleteEditorCommand();

}

void CCalcDirtWellDlg::OnButtonWord()
{
	DList<SDirtCalcData> lstData;
	DList<SDirtCalcData> lstAll;
	SSearchPipeList *pNodeNext = GetNextWell(m_pListAll, NULL, lstAll);
	if (m_pNodeLong != NULL)
		pNodeNext = m_pNodeLong;

	while (pNodeNext) {
		SSearchPipeList *pNodeLong = pNodeNext;
		while (pNodeLong) {
			BOOL bFind = FALSE;
			for (int j = 0; j < lstAll.Length(); j++) {
				if (lstAll[j]->m_ID == pNodeLong->m_ID) {
					bFind = TRUE;
					break;
				}
			}
			SDirtCalcData *pNodeNew2 = new SDirtCalcData();
			pNodeNew2->m_ID = pNodeLong->m_ID;
			lstAll.Append(pNodeNew2);

			if (pNodeLong->m_iType == 0 && pNodeLong->m_nLength > 0) {
				SDirtCalcData *pNodeNew = new SDirtCalcData();
				pNodeNew->m_iDn = pNodeLong->m_iDn;
				pNodeNew->m_ID = pNodeLong->m_ID;
				pNodeNew->m_csName = pNodeLong->m_csName;
				pNodeNew->m_nLength = pNodeLong->m_nLength;
				pNodeNew->m_nPipeQ = pNodeLong->m_nPipeQ;
				pNodeNew->m_nI = pNodeLong->m_nI;
				pNodeNew->m_nV = pNodeLong->m_nV;
				pNodeNew->m_nFull = pNodeLong->m_nLost;  //充满度
				lstData.Append(pNodeNew);
			}
			if (bFind)
				break;

			if (pNodeLong->m_pPrevious)
				pNodeLong = pNodeLong->m_pPrevious;
			else
				break;
		}
		pNodeNext = GetNextWell(m_pListAll, NULL, lstAll);
	}

	ImportDirtWellCalcWord(lstData);
}



void CCalcDirtWellDlg::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 (csName1.Find(csName) > -1) {
					XPoint ptCen = pEquip->GetLocation();
					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);
					break;
				}
			}
			OPENOBJ_END();
		}
	}
	GlobalFunc::HideDialog(this, TRUE);
	TCHAR szTmp[256];
	ads_getstring(NULL, _T("\n按任意键返回对话框:<返回>"), szTmp);
	GlobalFunc::HideDialog(this, FALSE);
}


BOOL CCalcDirtWellDlg::PreTranslateMessage(MSG* pMsg)
{
	if (pMsg->message >= WM_MOUSEFIRST &&
		pMsg->message <= WM_MOUSELAST)
	{
		MSG msg;
		::CopyMemory(&msg, pMsg, sizeof(MSG));
		HWND hWndParent = ::GetParent(msg.hwnd);
		if (msg.hwnd)
		{
			m_wndToolTip.RelayEvent(&msg);
		}
	}
	return CAcUiDialog::PreTranslateMessage(pMsg);
}

void CCalcDirtWellDlg::OnDestroy()
{
	CAcUiDialog::OnDestroy();
	m_wndToolTip.DestroyWindow();
}