vc mapgis6.7 源码系列_变换图形_做连剖的时候很有用哦

cn456cn

旋转示例.rar (106.09 KB, 下载次数: 213)

2010-12-20 09:34 上传

点击文件名下载附件
程序及使用说明 实现功能
旋转后    
具体代码如下

1.     short lin = _PRJGetCurLinAi(this->GetDocument()->m_Prj) ;
   
2.     short pnt = _PRJGetCurPntAi(this->GetDocument()->m_Prj) ;
   
3.     short reg = _PRJGetCurRegAi(this->GetDocument()->m_Prj) ;
   
4.     CString m_slin ,m_spnt ,m_sreg ;
   
5.     m_slin = _GetAreaFileName(lin) ;
   
6.     m_spnt = _GetAreaFileName(pnt) ;
   
7.     m_sreg = _GetAreaFileName(reg) ;
   
8.     D_RECT frc_lin ;
   
9.     D_RECT frc_pnt ;
   
10.     D_RECT frc_reg ;
    
11.     D_RECT rc ;
    
12.     _GetFileRange(m_slin.GetBuffer(m_slin.GetLength()),&frc_lin) ;
    
13.     _GetFileRange(m_spnt.GetBuffer(m_spnt.GetLength()),&frc_pnt) ;
    
14.     _GetFileRange(m_sreg.GetBuffer(m_sreg.GetLength()),&frc_reg) ;
    
15.     _PRJGetRange(this->GetDocument()->m_Prj,&rc) ;     
    
16.     long logN,n ;
    
17.     long logNpnt,npnt ;
    
18.     long logNreg,nreg ;
    
19.     _GetLinNum(lin,&logN,&n) ;
    
20.     _GetPntNum(pnt,&logNpnt,&npnt) ;
    
21.     _GetLinNum(reg,&logNreg,&nreg) ;   
    
22.     D_DOT *dat=NULL ;
    
23.     D_DOT d_pnt ;
    
24.     D_DOT *datreg = NULL ;
    
25.     long len ;
    
26.     LIN_INFO inf_lin ;
    
27.     D_DOT m_dchange ;
    
28.     double  lindisx,lindisy ;
    
29.     double  angle = PI/4 ;
    
30.     long i,j ;
    
31.     char *datpnt = NULL ;
    
32.     short lenpnt ;
    
33.     PNT_INFO inf_pnt ;
    
34.     long *rdat = NULL ;
    
35.     try
    
36.     {
    
37.         for (i = 1; i <n; i++)
    
38.         {
    
39.             if (1 != _GetLin(lin,i,&dat,&len,&inf_lin))
    
40.             continue ;
    
41.             for (j=0; j<len; j++)
    
42.             {
    
43.                 lindisx = dat[j].x - rc.xmin ;
    
44.                 lindisy = dat[j].y - rc.ymin ;
    
45.                 m_dchange.x = dat[j].x - sin(angle)*sin(angle)*lindisx ;
    
46.                 m_dchange.y = dat[j].y + sin(angle)*cos(angle)*lindisx ;
    
47.                 dat[j].x = m_dchange.x ;
    
48.                 dat[j].y = m_dchange.y ;
    
49.             }     
    
50.             if (1 != _UpdateLin(lin,i,dat,len,&inf_lin))
    
51.             {
    
52.                 AfxMessageBox("更新失败！") ;
    
53.             }
    
54.         }
    
55.         for (i=1; i<npnt; i++)
    
56.         {
    
57.             if (1 != _GetPnt(pnt,i,&d_pnt,&datpnt,&lenpnt,&inf_pnt))
    
58.             continue ;
    
59. 
    
60.                 lindisx = d_pnt.x - rc.xmin ;
    
61.                 lindisy = d_pnt.y - rc.ymin ;
    
62.                 m_dchange.x = d_pnt.x - sin(angle)*sin(angle)*lindisx ;
    
63.                 m_dchange.y = d_pnt.y + sin(angle)*cos(angle)*lindisx ;
    
64.                 d_pnt.x = m_dchange.x ;
    
65.                 d_pnt.y = m_dchange.y ;     
    
66. 
    
67.             if (1 != _UpdatePnt(pnt,i,&d_pnt,datpnt,lenpnt,&inf_pnt))
    
68.             {
    
69.                 AfxMessageBox("更新失败——点") ;
    
70.                 return ;
    
71.             }
    
72.         }
    
73.         LIN_INFO inf_reg ;
    
74.         D_DOT *datreg = NULL ;
    
75.         long lenreg ;         
    
76.         for (i = 1; i<nreg; i++)
    
77.         {
    
78.             if(1 != _GetLin(reg,i,&datreg,&lenreg,&inf_reg))
    
79.                 continue ;
    
80. 
    
81.             for (j=0; j<lenreg; j++)
    
82.             {
    
83.                 lindisx = datreg[j].x - rc.xmin ;
    
84.                 lindisy = datreg[j].y - rc.ymin ;
    
85.                 m_dchange.x = datreg[j].x - sin(angle)*sin(angle)*lindisx ;
    
86.                 m_dchange.y = datreg[j].y + sin(angle)*cos(angle)*lindisx ;
    
87.                 datreg[j].x = m_dchange.x ;
    
88.                 datreg[j].y = m_dchange.y ;
    
89.             }     
    
90.             if (1 != _UpdateLin(reg,i,datreg,lenreg,&inf_reg))
    
91.             {
    
92.                 AfxMessageBox("更新失败！--组成区的弧段") ;
    
93.             }
    
94.         }
    
95.     }
    
96.     catch (...)
    
97.     {
    
98.         CString temp ;
    
99.         temp.Format("当前线号 %ld , 线点号 %d, 此线共 %d个点 ",i,j,len) ;
    
100.         AfxMessageBox(temp) ;     
     
101.         return ;
     
102.     }
     
103.     _UpdateWindow() ;

复制代码

cn456cn

应该不要付费使用吧。
代码系我原创，如有雷同，不好意思，我们都被同一个问题所困扰，庆幸的是，会编程.....

lan518qiang

感谢提供！

yxy_dx

谢谢提供，学习了哈

mj510103

谢谢  提供

ice1198

感谢楼主提供！请教如何操作，谢谢！

ice1198

请问楼主怎么联系？

cn456cn

cnclcn@yahoo.com.cn
请问是程序开发如何操作还是程序如何使用

ice1198

谢谢楼主，是如何使用

cn456cn

谢谢大家的回帖，我将程序以及使用说明 发至附件。
若有收费或不能下载的情况  请给我emil : cnclcn@yahoo.com.cn
或者留下email 我发给大家。（一般两天内）