MapGis67读取点线区

MapGis67读取点线区

#pragma pack(push, 1)#include "Win_area.h"#pragma pack(pop)//读取点文件long CTerrionLableApp::ReadLableInfoFromFile(){CString cstrfilter, strPathName;char cszTextTemp[LEN_LONG_CODE] = "";/*String strLabel;*/char *szLabel = NULL;cstrfilter =_T("MapGis点文件(*.WT)|*.WT");CFileDialog cFDlg(TRUE,_T(".xls"),NULL,OFN_HIDEREADONLY|OFN_OVERWRITEPROMPT,cstrfilter);if (cFDlg.DoModal() == IDOK){strPathName.Format(_T("%s"),cFDlg.GetPathName());}elsereturn 0;AREA_HINST ahInst = NULL;short sPntAi = 0;long i = 0, lLGNum= 0, lPhyNum = 0;short lsize = 0;CATT_STRU     *RAttStru = NULL;char          *czAtt = NULL;CMineLabelStr  mineLabel;D_DOT ddPos;m_vMineLabel.clear();ahInst = _InitWorkArea(NULL);sPntAi = _OpenFileArea(ahInst, strPathName.GetBuffer(0));_GetPntNum(sPntAi, &lLGNum, &lPhyNum); //得到 点的个数PNT_INFO pntInfo;for (i = 0; i < lPhyNum; i++){if (_GetPntExistFlag(sPntAi,i) !=1)continue;_GetPnt(sPntAi,i,&ddPos,&szLabel,&lsize,&pntInfo);mineLabel.m_lNO = i;mineLabel.m_strLabel= szLabel;mineLabel.m_lColorNo = pntInfo.iclr;//mineLabel.m_strType = pntInfo.info.text.ifnt;mineLabel.m_lSize = pntInfo.info.ch.height;_GetPntAtt(sPntAi,i,&RAttStru,&czAtt);_CvtFldToString1(RAttStru, czAtt, "坐标X", cszTextTemp, LEN_LONG_CODE, NULL, NULL);mineLabel.m_dPos.x = atof(cszTextTemp);_CvtFldToString1(RAttStru, czAtt, "坐标Y", cszTextTemp, LEN_LONG_CODE, NULL, NULL);        mineLabel.m_dPos.y = atof(cszTextTemp);_CvtFldToString1(RAttStru, czAtt, "坐标Z", cszTextTemp, LEN_LONG_CODE, NULL, NULL);        mineLabel.m_dPos.z = atof(cszTextTemp);m_vMineLabel.push_back(mineLabel);}_CloseArea(sPntAi);_FreeWorkArea(ahInst);return 1;}//读取线文件long CCKQModelCls::GetRcdsFromLineWL(char *szLineFileName,CMineProfile *pMineProfile){CATT_STRU*stru = NULL;char*att = NULL;longnum = 0, lLgcNum = 0, lPhyNum = 0;charszFldValue[LEN_LONG_CODE];inti = 0, j = 0,lRes = 0;;shortai = 0;charCrdID[LEN_LONG_CODE];AREA_HINST ahist = _InitWorkArea(NULL);ai = _OpenFileArea(ahist, szLineFileName);if (ai == 0){lRes = 0;goto EndPro;}if (_GetLinNum(ai, &lLgcNum, &lPhyNum) == 1){for (i = 0; i < lPhyNum; i++){if (_GetLinExistFlag(ai, i) != 1){continue;}_GetLinAtt(ai, i, &stru, &att);if(_CvtFldToString1(stru,att,"储量边界类型",szFldValue,LEN_LONG_CODE,NULL,NULL) <= 0)continue;if (0 == strcmp(szFldValue,m_strType.GetBuffer(0)))//储量边界类型为1{D_DOT*pDots = NULL;D_3DOT   d3Dots;longlDotNum = 0, lType = 0, lFlag = 0;_GetLin(ai, i, &pDots, &lDotNum, NULL, NULL);m_pMineDataMng->ReadCoalPmType(pMineProfile->m_szKTXCode, &lType);if (lDotNum < 3)continue;v3Dots.clear();for (j = 0; j < lDotNum; j++){_GetOriPoint1(pMineProfile->m_d3StartPos,pMineProfile->m_d3EndPos,pDots[j],d3Dots,lType);v3Dots.push_back(d3Dots);}//判断是否封闭if (fabs(v3Dots[0].x - v3Dots[lDotNum-1].x) > 0.0001 || fabs(v3Dots[0].y - v3Dots[lDotNum-1].y) > 0.0001|| fabs(v3Dots[0].z - v3Dots[lDotNum-1].z) > 0.0001){//不封闭,添加最后一点为最初点v3Dots.push_back(d3Dots);}if(_CvtFldToString1(stru,att,"ID",szFldValue,LEN_LONG_CODE,NULL,NULL) <= 0)continue;strcpy(CrdID, pMineProfile->m_szKTXCode);strcat(CrdID, "--");strcat(CrdID, szFldValue);SaveRcdsToCkqCoord(CrdID,pMineProfile->m_szKTXCode);//m_v3DotList.push_back(v3Dots);//存储所有点到内存if(-1 == DrawCkqLineArea(String(CrdID),pMineProfile->m_szKTXCode))//这里最好是一个不重复的字符，wl文件中获取{lRes = 0;goto EndPro;}}}}lRes = 1;EndPro:_CloseArea(ai);_FreeWorkArea(ahist);return lRes;}////////////////移动点//////////////////////long CPrjViewTool::MoveOreReservesTablePnt(short sPntAi, char * cszBlockCode,double dMoveHeight, double dMoveWeight){D_DOT          dDotPos;CATT_STRU     *RAttStru = NULL;char          *czAtt = NULL;long           lLGNum = 0, lPhyNum = 0, i = 0;char           cszTextTemp[LEN_LONG_CODE] = "";_GetPntNum(sPntAi, &lLGNum, &lPhyNum); //得到 区的个数for (i = 0; i <lPhyNum; i++){if (_GetPntExistFlag(sPntAi,i) !=1)continue;_GetPntAtt(sPntAi,i,&RAttStru,&czAtt);_CvtFldToString1(RAttStru, czAtt, "块段编号", cszTextTemp, LEN_LONG_CODE, NULL, NULL);if (strcmp(cszBlockCode, cszTextTemp) == 0){_GetPntPos(sPntAi,i,&dDotPos);dDotPos.x += dMoveWeight;dDotPos.y += dMoveHeight;_UpdatePntPos(sPntAi,i,&dDotPos);}}    return 1;}////////////////移动线/////////////////////////////long CPrjViewTool::MoveOreReservesTableLine(short sLineAi, char * cszBlockCode,double dMoveHeight, double dMoveWeight){CATT_STRU     *RAttStru = NULL;char          *czAtt = NULL;long           lLGNum = 0, lPhyNum = 0, i = 0, k = 0;char           cszTextTemp[LEN_LONG_CODE] = "";D_DOT      *pLineDot;long           lLineNum;_GetLinNum(sLineAi, &lLGNum, &lPhyNum); //得到 线的个数for (i = 0; i <lPhyNum; i++){if (_GetLinExistFlag(sLineAi,i) !=1)continue;_GetLinAtt(sLineAi,i,&RAttStru,&czAtt);_CvtFldToString1(RAttStru, czAtt, "块段编号", cszTextTemp, LEN_LONG_CODE, NULL, NULL);if (strcmp(cszBlockCode, cszTextTemp) == 0){_GetLin(sLineAi,i,&pLineDot, &lLineNum, NULL);for (k = 0; k < lLineNum; k++){pLineDot[k].x += dMoveWeight;                pLineDot[k].y += dMoveHeight;}_UpdateLin(sLineAi,i,pLineDot, lLineNum, NULL);}}return 1;}//////////////////移动区////////////////////long CPrjViewTool::MoveOreReservesTableReg(short sRegAi, char * cszBlockCode,double dMoveHeight, double dMoveWeight){CATT_STRU     *RAttStru = NULL;char          *czAtt = NULL;long           lLGNum = 0, lPhyNum = 0, i = 0, k = 0;char           cszTextTemp[LEN_LONG_CODE] = "";long          * rdat = NULL;long            len = 0;D_DOT         * pRegDot = NULL;long            lRegDotNum = 0;_GetRegNum(sRegAi, &lLGNum, &lPhyNum); //得到 区的个数for (i = 0; i < lPhyNum; i ++){if (_GetRegExistFlag(sRegAi,i) !=1)continue;        _GetRegAtt(sRegAi,i,&RAttStru,&czAtt);_CvtFldToString1(RAttStru, czAtt, "块段编号", cszTextTemp, LEN_LONG_CODE, NULL, NULL);    if (strcmp(cszBlockCode, cszTextTemp) == 0){_GetReg(sRegAi, i, &rdat, &len, NULL);_GetLin(sRegAi,rdat[1], &pRegDot,&lRegDotNum, NULL);    for (k = 0; k<lRegDotNum; k++)    {pRegDot[k].x += dMoveWeight;                pRegDot[k].y += dMoveHeight;    }_UpdateLin(sRegAi,rdat[1],pRegDot, lRegDotNum, NULL);_UpdateReg(sRegAi, i, rdat, len, NULL);}}    return 1;}long CPrjViewTool::DelPntLineReg(){//删除已经存在的旧的点线区short  sPntAi = 0;short  sLineAi = 0;short  sRegAi = 0;long lpti = 0, lLni = 0, lRegi;long lLgNum = 0,lPyNum = 0;CATT_STRU* CatStru;char* szAtt;long  *rdat = NULL;long    len = 0;sPntAi = GetPrjAi(m_PrjInfo.m_OrePrj, BLOCK_TABLE_WT, CUREDT);sLineAi = GetPrjAi(m_PrjInfo.m_OrePrj, BLOCK_TABLE_WL, CUREDT);sRegAi =  GetPrjAi(m_PrjInfo.m_OrePrj, BLOCK_TABLE_WP, CUREDT);//删点_GetPntNum(sPntAi,&lLgNum,&lPyNum);for (lpti = 0; lpti < lPyNum; lpti++){if (_GetPntExistFlag(sPntAi,lpti) == 1){_GetPntAtt(sPntAi,lpti,&CatStru,&szAtt);_DelPnt(sPntAi,lpti);}}//删线lLgNum = 0,lPyNum = 0;_GetLinNum(sLineAi,&lLgNum,&lPyNum);for (lLni = 0; lLni < lPyNum; lLni++){if (_GetLinExistFlag(sLineAi,lLni) == 1){_GetLinAtt(sLineAi,lLni,&CatStru,&szAtt);_DelLin(sLineAi,lLni);}}//删区    lLgNum = 0,lPyNum = 0;_GetRegNum(sRegAi, &lLgNum, &lPyNum);for (lRegi = 0; lRegi < lPyNum; lRegi ++){if (_GetRegExistFlag(sRegAi, lRegi) == 1){_GetReg(sRegAi, lRegi, &rdat, &len, NULL);_DelLin(sRegAi, rdat[1]);_DelReg(sRegAi, lRegi);}}return 1;}//////////////////////////////写点属性///////////////////////////long CPrjViewTool::WritePntAtt(short sPntAi, long * spti, char * cBlockCode, char * cNoteType){CATT_STRU     *RAttStru = NULL;char          *czAtt = NULL;long           i = 0;//ExtendPntAtt(sPntAi);_GetPntAtt(sPntAi,* spti,&RAttStru,&czAtt);_SetFldFromStr(czAtt,RAttStru,"块段编号",cBlockCode);    _SetFldFromStr(czAtt,RAttStru,"注记类型",cNoteType);_WritePntAtt(sPntAi,* spti,RAttStru,czAtt);//_SaveFile(sPntAi);    return 1;}long CPrjViewTool::ExtendPntAtt(short sPntAi){long        lNum = 0, i = 0;CATT_STRU  *RAttStru = NULL;short       sFlg = FALSE;CFIELD_HEAD FldEntry;//坐标_GetPntAttStru(sPntAi, &RAttStru);lNum = RAttStru->hd.numbfield;if(lNum > 2)return TRUE;FldEntry.fieldtype   = STR_TYPE;FldEntry.fieldlength = LEN_LONG_CODE;FldEntry.msk_leng    = MAX_PATH;FldEntry.edit_enable = FLDEDT_YES;strcpy(FldEntry.fieldname,"块段编号");_AppendPntStruFld(sPntAi, 1, &FldEntry);strcpy(FldEntry.fieldname,"注记类型");_AppendPntStruFld(sPntAi, 1, &FldEntry);return 1;}/////////////////////////写线属性/////////////////////////////////long CPrjViewTool::WriteLineAtt(short sLineAi, long sLni, char * cBlockCode, char * cNoteType){CATT_STRU     *RAttStru = NULL;char          *czAtt = NULL;//ExtendLineAtt(sLineAi);_GetLinAtt(sLineAi,sLni,&RAttStru,&czAtt);_SetFldFromStr(czAtt,RAttStru,"块段编号",cBlockCode);    _SetFldFromStr(czAtt,RAttStru,"注记类型",cNoteType);_WriteLinAtt(sLineAi,sLni,RAttStru,czAtt);//_SaveFile(sLineAi);    return 1;}long CPrjViewTool::ExtendLineAtt(short sLineAi){long        lNum = 0, i = 0;CATT_STRU  *RAttStru = NULL;short       sFlg = FALSE;CFIELD_HEAD FldEntry;//坐标_GetLinAttStru(sLineAi, &RAttStru);lNum = RAttStru->hd.numbfield;if(lNum > 2)return TRUE;FldEntry.fieldtype   = STR_TYPE;FldEntry.fieldlength = LEN_LONG_CODE;FldEntry.msk_leng    = MAX_PATH;FldEntry.edit_enable = FLDEDT_YES;strcpy(FldEntry.fieldname,"块段编号");_AppendLinStruFld(sLineAi, 1, &FldEntry);strcpy(FldEntry.fieldname,"注记类型");_AppendLinStruFld(sLineAi, 1, &FldEntry);return 1;}//////////////////写区属性////////////////////////////////long CPrjViewTool::WriteRegAtt(short sRegAi, long sRgi, char * cBlockCode, char * cNoteType){CATT_STRU     *RAttStru = NULL;char          *czAtt = NULL;//ExtendRegAtt(sRegAi);_GetRegAtt(sRegAi,sRgi,&RAttStru,&czAtt);_SetFldFromStr(czAtt,RAttStru,"块段编号",cBlockCode);    _SetFldFromStr(czAtt,RAttStru,"注记类型",cNoteType);_WriteRegAtt(sRegAi,sRgi,RAttStru,czAtt);//_SaveFile(sRegAi);    return 1;}long CPrjViewTool::ExtendRegAtt(short sRegAi){long        lNum = 0, i = 0;CATT_STRU  *RAttStru = NULL;short       sFlg = FALSE;CFIELD_HEAD FldEntry;//坐标_GetRegAttStru(sRegAi, &RAttStru);lNum = RAttStru->hd.numbfield;if(lNum > 2)return TRUE;FldEntry.fieldtype   = STR_TYPE;FldEntry.fieldlength = LEN_LONG_CODE;FldEntry.msk_leng    = MAX_PATH;FldEntry.edit_enable = FLDEDT_YES;strcpy(FldEntry.fieldname,"块段编号");_AppendRegStruFld(sRegAi, 1, &FldEntry);strcpy(FldEntry.fieldname,"注记类型");_AppendRegStruFld(sRegAi, 1, &FldEntry);return 1;}

---the---end---