gjm/envi-code
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
2b0c2055ff5a79cf794926fd5946f8f2a69d1a9b
envi-code/SourceCode/Code2026/Dimension/StakeDlg.cpp
T

863 lines
21 KiB
C++
Raw Normal View History

初始化提交
2026-09-28 15:28:50 +08:00
#include "stdafx.h"
#include "AcDbObjectPtr.h"
#include "globalFunc.h"
#include "StakeDlg.h"
#include "DbStake.h"
#include "RBGroups.h"
#include "TBlockEdJig.h"
#include "DbEquipment.h"
#include "XText.h"
#include <vector>
#include <map>
#include "PickEntSet.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
extern AcDbObjectId InitLayer(const TCHAR *szLayer, BOOL bApplyChange = TRUE);
extern AcDbObjectId InitTextStyle(TTextStyle ts, AcDbDatabase *pDb = NULL);
extern AcDbObjectId InitTextStyle(const TCHAR *pszStyle, AcDbDatabase *pDb = NULL);
static CString s_sBetweenDis = _T("");
static BOOL s_bImprove = TRUE;
static BOOL s_bRightDirection = TRUE;
#define LAY_STAKE _T("TWT_STAKE")
#define STAKE_FILE _T("stake.his")
//沿线布置桩
void InsStakeAlongLine()
{
CTemporaryResourceOverride vTemp;
CStakeDlg dlg;
dlg.Create(IDD_STAKE,acedGetAcadFrame());
dlg.SetWindowText(_T("沿线布桩"));
//初始化图层
InitLayer(LAY_STAKE);
RBList rbMask = ads_buildlist( -4, _T("<or"),
-4, _T("<and"), RTDXF0, _T("LINE"), -4, _T("and>"),
-4, _T("<and"), RTDXF0, _T("LWPOLYLINE"), -4, _T("and>"),
-4, _T("<and"), RTDXF0, _T("ARC"), -4, _T("and>"),
-4, _T("or>"), NULL);
RBList rbMaskEquip(RTDXF0, _T("AEC_ZT_STAKE"), NULL);
dlg.ShowWindow(SW_SHOW);
//用户不退出则一直布置
XPoint ptBefore,ptNext;
XPoint ptPick;
Entity ent;
double dBeforeNum = 0.0; //前一点的桩号
double dStakeBetween = 0.0;
while(1)
{
if (fabs(ptNext.x) < 0.001)
{
BOOL bStake = FALSE;//判断是否选择了桩
int ret = GlobalFunc::SelectEntity1(0.3, _T("\n请拾取布置桩的第一点<退出>"), ent, ptPick, rbMask);
if(ret != RTNORM)
break;
ptPick = GlobalFunc::Ucs2Wcs(ptPick);
ptBefore = ptPick;
//判断是否点在桩上
Entity entStake;
PickSet ssSel(SS_FREE);
XPoint ptUsc = GlobalFunc::Wcs2Ucs(ptPick);
GlobalFunc::GetPointPickSet(ptPick,ssSel,rbMaskEquip,(int)GlobalFunc::DocGetPScale());
long index = 0;
int len = ssSel.Length();
for (index = 0; index < len; index++)
{
entStake = ssSel[index];
if (entStake.Is(_T("AEC_ZT_STAKE")))
{
bStake = TRUE;
OPENOBJ_BEGIN(entStake, AcDb::kForRead, CDbStake, pEquip);
if(pEquip)
{
ptBefore = pEquip->GetLocation();
}
OPENOBJ_END();
break;
}
}
//得到当前桩的值
if (bStake)
{
CString sTextValue;
OPENOBJ_BEGIN(entStake, AcDb::kForRead, CDbStake, pEquip);
if (pEquip != NULL)
{
sTextValue.Format(_T("%.2f"),pEquip->GetStakeValue());
}
OPENOBJ_END();
if (_tstof(sTextValue) > 0.01)
{
dlg.m_sStartDis = sTextValue;
dlg.UpdateData(FALSE);
}
}
if (!GlobalFunc::DocGetMeterUnitDraw())
dBeforeNum = _tstof(dlg.m_sStartDis)*1000;
else
dBeforeNum = _tstof(dlg.m_sStartDis);
dlg.UpdateData(TRUE);
s_bRightDirection = TRUE;
if (!bStake) //选中桩了就不需要再重复插入桩
dlg.InsStakeOnPoint(ent,ptBefore,dBeforeNum,ptPick, dlg.m_sLineDis,dlg.m_sLineLen,dlg.m_sStakePrefix,dlg.m_sStartDis,dlg.m_nLablePlace);
}
Entity entNext; //下一个实体
RBList rbMask(RTDXF0, _T("LINE,LWPOLYLINE,ARC"), NULL);
int ret = GlobalFunc::SelectEntity1(0.3, _T("\n请拾取布置桩的下一点<退出>"), entNext, ptNext, rbMask);
if(ret != RTNORM)
break;
dlg.UpdateData(TRUE);
ptNext = GlobalFunc::Ucs2Wcs(ptNext);
if (!GlobalFunc::DocGetMeterUnitDraw())
dStakeBetween = _tstof(dlg.m_sStakeBetween)*1000;
else
dStakeBetween = _tstof(dlg.m_sStakeBetween);
if (!dlg.InsStakeByLine(ent,entNext,dBeforeNum,ptBefore,ptNext,dlg.m_sLineDis,dlg.m_sLineLen,dlg.m_sStakePrefix,dlg.m_sStartDis,dlg.m_nLablePlace,dStakeBetween))
break;
}
dlg.DestroyWindow();
}
//任意布置桩
void InsStakeRandom()
{
CTemporaryResourceOverride vTemp;
CStakeDlg dlg;
dlg.Create(IDD_STAKE,acedGetAcadFrame());
dlg.SetWindowText(_T("任意布桩"));
//初始化图层
InitLayer(LAY_STAKE);
RBList rbMaskStake(RTDXF0, _T("AEC_ZT_STAKE"), NULL);
RBList rbMask = ads_buildlist( -4, _T("<or"),
-4, _T("<and"), RTDXF0, _T("LINE"), -4, _T("and>"),
-4, _T("<and"), RTDXF0, _T("LWPOLYLINE"), -4, _T("and>"),
-4, _T("<and"), RTDXF0, _T("ARC"), -4, _T("and>"),
-4, _T("or>"), NULL);
dlg.ShowWindow(SW_SHOW);
dlg.GetDlgItem(IDC_EDITSTAKEBETWEEN)->EnableWindow(FALSE);
//用户不退出则一直布置
XPoint ptBefore,ptNext;
XPoint ptPick;
Entity ent,ent2,entStake;
double dBeforeNum = 0.0; //前一点的桩号
double dStakeBetween = 0.0;
BOOL bFirst = TRUE;
while(1)
{
if (bFirst)
{
XPoint ptT;
int ret = GlobalFunc::SelectEntity1( _T("\n请拾取前一个桩<退出>"), entStake,ptT, rbMaskStake);
if(ret != RTNORM)
break;
//判断是否点在桩上
//通过桩的位置得到另外的实体
CString sTextValue;
OPENOBJ_BEGIN(entStake, AcDb::kForRead, CDbStake, pEquip);
if (pEquip != NULL)
{
ptBefore = pEquip->GetLocation();
sTextValue.Format(_T("%.2f"),pEquip->GetStakeValue());
}
else
continue;
OPENOBJ_END();
if (_tstof(sTextValue) > 0.01)
{
dlg.m_sStartDis = sTextValue;
dlg.UpdateData(FALSE);
}
if (!GlobalFunc::DocGetMeterUnitDraw())
dBeforeNum = _tstof(dlg.m_sStartDis)*1000;
else
dBeforeNum = _tstof(dlg.m_sStartDis);
dlg.UpdateData(TRUE);
ptBefore = GlobalFunc::Ucs2Wcs(ptBefore);
PickSet ssAll(SS_FREE);
GlobalFunc::GetPointPickSet(ptBefore,ssAll,rbMask,(int)GlobalFunc::DocGetPScale());
if (ssAll.Length() < 1)
return;
long lIndex = 0;
ent = ssAll[lIndex];
bFirst = FALSE;
}
int ret = GlobalFunc::SelectEntity1(0.3, _T("\n请选择需要布置桩的位置<退出>"), ent2, ptPick, rbMask);
if(ret != RTNORM)
break;
ptPick = GlobalFunc::Ucs2Wcs(ptPick);
PickSet ss(SS_FREE);
//得到实体上所有的桩
dlg.GetCurvePickSet(ent2,ss,rbMaskStake);
Entity entTempStake;
XPoint ptLocation,ptNearMin,ptNearMax;
long lIndex = 0;
CString sXData;
int nLen = ss.Length();
if (nLen > 1)
{
dlg.GetNewPtAddDis(ent2,ss,ptBefore,ptPick,dBeforeNum);
}
else if (nLen == 1)
{
TCHAR szValue[100] = {0};
acedGetString(0,_T("\n请判断桩号增加还是递减(Y增加,N递减)"),szValue);
if(_tcsicmp(szValue, _T("N")) == 0 || _tcsicmp(szValue, _T("n")) == 0)
{
s_bImprove = FALSE;
}
}
else
{
CString sStakeNum;
TCHAR szValue[100] = {0};
acedGetString(1,_T("\n请输入桩号(m):"),szValue);
sStakeNum = szValue;
ptBefore = ptPick;
if (!GlobalFunc::DocGetMeterUnitDraw())
dBeforeNum = _tstof(sStakeNum) * 1000;
else
dBeforeNum = _tstof(sStakeNum);
}
//插入桩
dlg.UpdateData();
dlg.InsStakeOnPoint(ent2,ptBefore,dBeforeNum,ptPick, dlg.m_sLineDis,dlg.m_sLineLen,dlg.m_sStakePrefix,dlg.m_sStartDis,dlg.m_nLablePlace);
ptBefore = ptPick;
}
dlg.DestroyWindow();
}
//选择点布置
void CStakeDlg::InsStakeOnPoint(Entity ent,XPoint ptBefore,double &dBeforeNum,XPoint ptPick,
CString &sLineDis,CString &sLineLen,CString &sStakePrefix,
CString &sStartDis,int nLablePlace)
{
XCurveSegment seg;
if (ent.Is(_T("LINE")) || ent.Is(_T("ARC")))
{
seg = XCurveSegment(ent);
}
else if(ent.Is(_T("LWPOLYLINE")))
{
double dAngle;
seg = GlobalFunc::GetSegByPt(XPoly2D(ent), ptPick, dAngle);
}
AcGePoint3d ptStart,ptEnd,ptTextPosition;
AcGeVector3d vecTemp1,vecTemp2,vecTemp3; //左侧，右侧，中间标注方向的三个向量
double dTextRotate = 0.0;
CString sText;
g_Option::instance().g_nInsBlkRotate = GlobalFunc::GetInsRotate(ptPick, seg);
AcGeVector3d vecTempDir,vecTmpY(0,1,0);
OPENOBJ_BEGIN(ent, AcDb::kForRead, AcDbCurve, pCurveTemp);
if(pCurveTemp)
{
pCurveTemp->getFirstDeriv(ptPick,vecTempDir);
vecTempDir = vecTempDir.perpVector();
vecTempDir.normalize();
m_vtFirst = vecTempDir;
if (!s_bRightDirection)
vecTempDir.negate();
}
OPENOBJ_END();
//计算文字
double dBeforeDis,dPickDis;
OPENOBJ_BEGIN(ent, AcDb::kForRead, AcDbCurve, pCurve);
if (pCurve != NULL)
{
pCurve->getDistAtPoint((AcGePoint3d)ptBefore,dBeforeDis);
pCurve->getDistAtPoint((AcGePoint3d)ptPick,dPickDis);
}
OPENOBJ_END();
if (s_bImprove)
dBeforeNum = dBeforeNum + fabs(dPickDis-dBeforeDis);
else
dBeforeNum = dBeforeNum - fabs(dPickDis-dBeforeDis);
s_bImprove = TRUE;
double dTextValue = 0.0;
if (!GlobalFunc::DocGetMeterUnitDraw())
dTextValue = dBeforeNum/1000;
else
dTextValue = dBeforeNum;
double dTextN = dTextValue/1000;
CString 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);
}
CDbStake *pStake = new CDbStake;
pStake->SetPositon(ptPick);
pStake->SetStakeDir(vecTempDir);
pStake->SetStakeLablePlace(nLablePlace);
int nType = m_comboStakeStyle.GetCurSel();
if (nType == -1)
nType = 0;
pStake->SetStakeType(nType);
pStake->SetTextDecimal(_ttoi(m_sDecimalNum));
if (m_nTextAngType == 0)
pStake->SetTextAng(0.0);
else if (m_nTextAngType == 1)
pStake->SetTextAng(PI/2);
else
pStake->SetTextAng(PI);
pStake->SetText(sStakePrefix,dTextValue);
pStake->SetTextHeight(_tstof(m_sTextHeight));
pStake->SetDerviDis(_tstof(sLineDis)*GlobalFunc::DocGetPScale());
pStake->SetDerviLineLen(_tstof(sLineLen)*GlobalFunc::DocGetPScale());
pStake->SetTextLayerId(InitLayer(LAY_STAKE));
pStake->SetTextStyleId(InitTextStyle(g_Option::instance().g_csTwtDimStyle));
pStake->setLayer(LAY_STAKE);
AcDbObjectId idStake = GlobalFunc::AddToCurrentSpace(pStake,Adesk::kTrue);
}
//沿线布置
BOOL CStakeDlg::InsStakeByLine(Entity &ent,Entity ent2, double &dBeforeNum, XPoint &ptBefore,XPoint &ptEnd,CString &sLineDis,CString &sLineLen,CString &sStakePrefix,CString &sStartDis,int nLablePlace,double dStakeBetween)
{
AcGeVector3d vtDeriv1,vtDeriv2;
AcDbPolyline *pCurve = NULL;
OPENOBJ_BEGIN(ent,AcDb::kForRead,AcDbCurve,pTempCurve);
if (pTempCurve != NULL)
{
AcGePoint3d ptTempEnd,ptTempStart;
pTempCurve->getEndPoint(ptTempEnd);
pTempCurve->getStartPoint(ptTempStart);
pTempCurve->getFirstDeriv(ptBefore,vtDeriv1);
}
OPENOBJ_END();
pCurve = GlobalFunc::GetNextPloyLine(ent,ent2,ptBefore,ptEnd);
if (pCurve == NULL)
return TRUE;
double dBeforeDis = 0.0, dPickDis = 0.0,dNextDis = 0.0;
pCurve->getDistAtPoint((AcGePoint3d)ptBefore,dBeforeDis);
pCurve->getDistAtPoint((AcGePoint3d)ptEnd,dPickDis);
pCurve->getFirstDeriv(ptBefore,vtDeriv2);
if (vtDeriv1.angleTo(vtDeriv2) > 1e-3)
s_bRightDirection = FALSE;
//判断选取的方向和选取线的方向是否一致
if (dBeforeDis >= dPickDis)
{
double dT = dBeforeDis;
dBeforeDis = dPickDis;
dPickDis = dT;
XPoly2D poly;
GlobalFunc::PolyConvert(*pCurve, poly);
poly.Reverse();
GlobalFunc::PolyConvert(poly,*pCurve);
s_bRightDirection = FALSE;
}
AcDbObjectId idPoly = GlobalFunc::AddToCurrentSpace(pCurve,Adesk::kTrue);
ads_name nameCurve;
acdbGetAdsName(nameCurve,idPoly);
Entity entPoly(nameCurve);
if (pCurve != NULL)
{
/*
double dBeforeDis = 0.0, dPickDis = 0.0,dNextDis = 0.0;
es = pCurve->getDistAtPoint((AcGePoint3d)ptBefore,dBeforeDis);
es = pCurve->getDistAtPoint((AcGePoint3d)ptEnd,dPickDis);
//判断选取的方向和选取线的方向是否一致
if (dBeforeDis >= dPickDis)
{
// entPoly.Erase();
// return FALSE;
double dT = dBeforeDis;
dBeforeDis = dPickDis;
dPickDis = dT;
}
*/
AcGePoint3d ptNext;
if (pCurve->getPointAtDist(dStakeBetween+dBeforeDis,ptNext) != Acad::eOk)
{
AfxMessageBox(_T("桩间距太大!"));
{
entPoly.Erase();
return TRUE;
}
}
if (pCurve->getDistAtPoint((AcGePoint3d)ptNext,dNextDis) != Acad::eOk)
{
entPoly.Erase();
return TRUE;
}
//循环布置下一点
while (dNextDis < dPickDis)
{
InsStakeOnPoint(entPoly,ptBefore,dBeforeNum,ptNext,sLineDis,sLineLen,sStakePrefix,sStartDis,nLablePlace);
dBeforeDis += dStakeBetween;
ptBefore = ptNext;
if (pCurve->getPointAtDist(dStakeBetween+dBeforeDis,ptNext) != Acad::eOk)
break;
if (pCurve->getDistAtPoint((AcGePoint3d)ptNext,dNextDis) != Acad::eOk)
break;
}
}
else
{
entPoly.Erase();
return FALSE;
}
ent = ent2;
entPoly.Erase();
return TRUE;
}
//得到新的前一点和距离
void CStakeDlg::GetNewPtAddDis(Entity ent,PickSet &ss,XPoint &ptBefore,XPoint ptPick, double &dBeforeNum)
{
Entity entTempStake;
XPoint ptLocation,ptNearMin,ptNearMax;
long lIndex = 0;
CString sXData;
int nLen = ss.Length();
//找到最近和最远两个桩
double dMin = 0.0,dMax = 0.0;
for (lIndex = 0; lIndex < nLen; ++lIndex)
{
entTempStake = ss[lIndex];
OPENOBJ_BEGIN(entTempStake, AcDb::kForRead, CDbStake, pEquip);
if (pEquip != NULL)
{
ptLocation = pEquip->GetLocation();
sXData.Format(_T("%.2f"),pEquip->GetStakeValue());
if (lIndex == 0)
{
dMin = _tstof(sXData);
dMax = _tstof(sXData);
ptNearMin = ptLocation;
ptNearMax = ptLocation;
}
else
{
if (dMin > _tstof(sXData))
{
dMin = _tstof(sXData);
ptNearMin = ptLocation;
}
if (dMax < _tstof(sXData))
{
dMax = _tstof(sXData);
ptNearMax = ptLocation;
}
}
}
OPENOBJ_END();
}
//判断应该是加上距离还是减去距离
double dMid = 0.0,dNearMin = 0.0,dNearMax = 0.0;
OPENOBJ_BEGIN(ent, AcDb::kForRead, AcDbCurve, pCurve);
if (pCurve != NULL)
{
pCurve->getParamAtPoint(ptPick,dMid);
pCurve->getParamAtPoint(ptNearMin,dNearMin);
pCurve->getParamAtPoint(ptNearMax,dNearMax);
ptBefore = ptNearMin;
if (!GlobalFunc::DocGetMeterUnitDraw())
dBeforeNum = dMin * 1000;
else
dBeforeNum = dMin;
if ((dNearMin - dMid)*(dNearMax - dMid) > 0)
{
if (fabs(dNearMin - dMid) < fabs(dNearMax - dMid))
{
s_bImprove = FALSE;
}
}
}
OPENOBJ_END();
}
//得到实体上的选择集
void CStakeDlg::GetCurvePickSet(Entity ent,PickSet &ss,RBList &rbMask)
{
if(ent.Is(_T("LINE")))
{
XLine line(ent);
line.TransUCS(RBGroups(0),RBGroups(1)); // 把 UCS 转为 WCS
RBList rbPoint = ads_buildlist(RT3DPOINT, &line.StartPoint(), RT3DPOINT,
&line.EndPoint(), NULL);
GlobalFunc::AssureInCurrentView(line.StartPoint(), line.EndPoint());
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];
// xPline.TransUCS(RBGroups(0),RBGroups(1)); // 把 UCS 转为 WCS
RBList rbPoint = xPline.Polygon();
GlobalFunc::AssureInCurrentView(pt1, pt2);
ss.Get(_T("F"), rbPoint, NULL, rbMask);
}
else
{
XPoly2D xPline(ent);
XPoint pt1, pt2;
pt1 = *xPline[0];
xPline.Length();
pt2 = *xPline[xPline.Length()-1];
// xPline.TransUCS(RBGroups(0),RBGroups(1)); // 把 UCS 转为 WCS
RBList rbPoint = xPline.Polygon();
GlobalFunc::AssureInCurrentView(pt1, pt2);
ss.Get(_T("F"), rbPoint, NULL, rbMask);
}
}
CStakeDlg::CStakeDlg(CWnd* pParent /*=NULL*/)
: CDialog(CStakeDlg::IDD, pParent)
{
//{{AFX_DATA_INIT(CStakeDlg)
m_sStartDis = _T("0");
m_sLineDis = _T("0");
m_sLineLen = _T("5");
m_nLablePlace = 0;
m_sStakeBetween = _T("20");
m_sStakePrefix = _T("K");
m_sTextHeight = _T("3");
m_sDecimalNum = _T("0");
m_nTextAngType = 0;
//}}AFX_DATA_INIT
}
void CStakeDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
//{{AFX_DATA_MAP(CStakeDlg)
DDX_Control(pDX, IDC_COMBOSTAKESTYLE, m_comboStakeStyle);
DDX_Text(pDX, IDC_EDITSTARTDIS, m_sStartDis);
DDX_Text(pDX, IDC_EDITLINEDIS, m_sLineDis);
DDX_Text(pDX, IDC_EDITLINELEN, m_sLineLen);
DDX_CBIndex(pDX, IDC_COMBOPOSITION, m_nLablePlace);
DDX_Text(pDX, IDC_EDITSTAKEBETWEEN, m_sStakeBetween);
DDX_CBString(pDX, IDC_CMBSTAKEPREFIX, m_sStakePrefix);
DDX_CBString(pDX, IDC_CMBTEXTHEIGHT, m_sTextHeight);
DDX_CBString(pDX, IDC_CMB_DECIMAL_NUM, m_sDecimalNum);
DDX_CBIndex(pDX, IDC_CMBTEXTANG, m_nTextAngType);
//}}AFX_DATA_MAP
}
BEGIN_MESSAGE_MAP(CStakeDlg, CDialog)
//{{AFX_MSG_MAP(CStakeDlg)
ON_WM_CLOSE()
ON_EN_CHANGE(IDC_EDITSTAKEBETWEEN, OnChangeEditstakebetween)
ON_EN_CHANGE(IDC_EDITSTARTDIS, OnChangeEditstartdis)
ON_CBN_EDITCHANGE(IDC_CMBSTAKEPREFIX, OnEditchangeCmbstakeprefix)
ON_CBN_EDITCHANGE(IDC_COMBOPOSITION, OnEditchangeComboposition)
ON_WM_DESTROY()
ON_EN_KILLFOCUS(IDC_EDITSTAKEBETWEEN, OnKillfocusEditstakebetween)
//}}AFX_MSG_MAP
ON_MESSAGE(WM_ACAD_KEEPFOCUS, onAcadKeepFocus)
END_MESSAGE_MAP()
LONG_PTR CStakeDlg::onAcadKeepFocus(UINT_PTR, LONG_PTR)
{
CPoint pt;
GetCursorPos(&pt);
CRect rc;
GetWindowRect(&rc);
return (rc.PtInRect(pt) ? TRUE : FALSE);
}
BOOL CStakeDlg::OnInitDialog()
{
CDialog::OnInitDialog();
m_comboStakeStyle.SetCurSel(0);
if (_tstof(s_sBetweenDis) > 0.01)
m_sStakeBetween = s_sBetweenDis;
TCHAR strTmpPath[100] = _T("");
GetTempPath(100, strTmpPath);
_tcscat(strTmpPath, STAKE_FILE);
GetFileFrom(strTmpPath);
UpdateData(FALSE);
return TRUE;
}
void CStakeDlg::OnClose()
{
TCHAR strTmpPath[256] = _T("");
GetTempPath(255, strTmpPath);
_tcscat(strTmpPath, STAKE_FILE);
SaveFileTo(strTmpPath);
CDialog::OnClose();
acedPostCommand(_T("\33\33"));
}
void CStakeDlg::OnChangeEditstakebetween()
{
UpdateData(TRUE);
s_sBetweenDis = m_sStakeBetween;
}
void CStakeDlg::OnChangeEditstartdis()
{
UpdateData(TRUE);
}
void CStakeDlg::OnEditchangeCmbstakeprefix()
{
UpdateData(TRUE);
}
void CStakeDlg::OnEditchangeComboposition()
{
UpdateData(TRUE);
}
void CStakeDlg::SaveFileTo(LPCTSTR lpFilePath)
{
if (lpFilePath == NULL)
return;
FILE *fp = fopen(_AS(lpFilePath), "w");
if(!fp)
return;
CString csTmp1, csTmp2,csTmp3, csTmp4,csTmp5, csTmp6,csTmp7, csTmp8,csTmp9,csTmp10,csTmp11;
csTmp1 = m_sStartDis;
csTmp2.Format(_T("%d"),m_nLablePlace);
csTmp3 = m_sTextHeight;
csTmp4.Format(_T("%d"),m_comboStakeStyle.GetCurSel());
csTmp5 = m_sLineDis;
csTmp6 = m_sLineLen;
csTmp7 = m_sStakePrefix;
csTmp8 = m_sStakeBetween;
csTmp9 = m_sDecimalNum;
csTmp10.Format(_T("%d"),m_nTextAngType);
csTmp11 = csTmp1 + _T("－") + csTmp2 + _T("－") + csTmp3 + _T("－") + csTmp4 + _T("－") + csTmp5 + _T("－") + csTmp6 + _T("－") + csTmp7 + _T("－") + csTmp8 + _T("－") + csTmp9 + _T("－") + csTmp10 + _T("－");
fputs(_AS(csTmp11), fp);
fclose(fp);
}
void CStakeDlg::GetFileFrom(LPCTSTR lpFilePath)
{
if (lpFilePath == NULL)
return;
XStringList lstHis;
FILE *fp=fopen(_AS(lpFilePath), "r");
if(!fp)
return;
CString csTmp;
while(!feof(fp))
{
char sBuf[256]="";
fgets(sBuf, 255, fp);
csTmp = sBuf;
csTmp.TrimRight();
if(csTmp != _T(""))
lstHis.Append(tstrnew(csTmp));
}
fclose(fp);
int len = lstHis.Length();
if(len < 1)
return;
int idx = -1,iCharLen = 0;
CString sTempName;
int nCharLen = (int)_tcslen(_T("－"));;
for(int i=0;i<len;i++)
{
csTmp = lstHis[i];
idx = csTmp.Find(_T("－"));
sTempName = csTmp.Left(idx);
m_sStartDis = sTempName;
csTmp = csTmp.Mid(idx + nCharLen);
idx = csTmp.Find(_T("－"));
m_nLablePlace = _ttoi(csTmp.Left(idx));
csTmp = csTmp.Mid(idx + nCharLen);
idx = csTmp.Find(_T("－"));
if (idx != -1)
{
m_sTextHeight = csTmp.Left(idx);
}
csTmp = csTmp.Mid(idx + nCharLen);
idx = csTmp.Find(_T("－"));
if (idx != -1)
{
sTempName = csTmp.Left(idx);
m_comboStakeStyle.SetCurSel(_ttoi(sTempName));
}
csTmp = csTmp.Mid(idx + nCharLen);
idx = csTmp.Find(_T("－"));
if (idx != -1)
{
m_sLineDis = csTmp.Left(idx);
}
csTmp = csTmp.Mid(idx + nCharLen);
idx = csTmp.Find(_T("－"));
if (idx != -1)
{
m_sLineLen = csTmp.Left(idx);
}
csTmp = csTmp.Mid(idx + nCharLen);
idx = csTmp.Find(_T("－"));
if (idx != -1)
{
m_sStakePrefix = csTmp.Left(idx);
}
csTmp = csTmp.Mid(idx + nCharLen);
idx = csTmp.Find(_T("－"));
if (idx != -1)
{
m_sStakeBetween = csTmp.Left(idx);
}
csTmp = csTmp.Mid(idx + nCharLen);
idx = csTmp.Find(_T("－"));
if (idx != -1)
{
m_sDecimalNum = csTmp.Left(idx);
}
csTmp = csTmp.Mid(idx + nCharLen);
idx = csTmp.Find(_T("－"));
if (idx != -1)
{
m_nTextAngType = _ttoi(csTmp.Left(idx));
}
}
}
void CStakeDlg::OnDestroy()
{
TCHAR strTmpPath[256] = _T("");
GetTempPath(255, strTmpPath);
_tcscat(strTmpPath, STAKE_FILE);
UpdateData();
SaveFileTo(strTmpPath);
CDialog::OnDestroy();
}
// cet 2010.8.31 add 限制桩间距值的大小
void CStakeDlg::OnKillfocusEditstakebetween()
{
UpdateData(TRUE);
double dVal = _tstof(m_sStakeBetween);
if (dVal < 1e-9)
{
AfxMessageBox(_T("桩间距应大于0m！"));
m_sStakeBetween = _T("20");
UpdateData(FALSE);
}
}
Reference in new issue Copy Permalink