窗口缩放 实现 Zoom W 功能

guohq

[pcode=vbnet,true] ''' <summary>
    ''' 窗口缩放
    ''' </summary>
    ''' <param name="Pt1"></param>
    ''' <param name="Pt2"></param>
    ''' <param name="dScale">放大倍数  大于 0 </param>
    ''' <param name="OffestCenterX">中心偏移量X</param>
    ''' <param name="OffestCenterY">中心偏移量Y</param>
    ''' <remarks></remarks>
    Public Sub ZoomW(ByVal Pt1 As Point3d, ByVal Pt2 As Point3d, Optional ByVal dScale As Double = 1.0, Optional ByVal OffestCenterX As Double = 0, Optional ByVal OffestCenterY As Double = 0)
        '状态：20130417-2333测试通过
        Dim MinX As Double = Math.Min(Pt1.X, Pt2.X)
        Dim MinY As Double = Math.Min(Pt1.Y, Pt2.Y)
        Dim MaxX As Double = Math.Max(Pt1.X, Pt2.X)
        Dim MaxY As Double = Math.Max(Pt1.Y, Pt2.Y)
        If MaxX > MinX AndAlso MaxY > MinY Then
            Dim ViewR As ViewTableRecord = New ViewTableRecord()
            Dim OldView As ViewTableRecord = Doc.Editor.GetCurrentView
            If dScale <= 0 Then
                dScale = 1
            End If
            Dim newWidth As Double = (MaxX - MinX) / dScale
            Dim newHeight As Double = (MaxY - MinY) / dScale

            If (newHeight / OldView.Height) > (newWidth / OldView.Width) Then
                ViewR.Height = newHeight
            Else
                ViewR.Width = newWidth
            End If
            ViewR.CenterPoint = New Point2d((MaxX + MinX) / 2 + OffestCenterX, (MaxY + MinY) / 2 + OffestCenterY)
            Doc.Editor.SetCurrentView(ViewR)
            Doc.Editor.UpdateScreen()
        End If
    End Sub[/pcode]

weichuanbin

这段代码怎么用？:)

ScmTools

转成C#的写法便于大家学习

1. 
   
2. /// <summary>
   
3. /// 窗口缩放
   
4. /// </summary>
   
5. /// <param name="Pt1"></param>
   
6. /// <param name="Pt2"></param>
   
7. /// <param name="dScale">放大倍数  大于 0 </param>
   
8. /// <param name="OffestCenterX">中心偏移量X</param>
   
9. /// <param name="OffestCenterY">中心偏移量Y</param>
   
10. /// <remarks></remarks>
    
11. public void ZoomW(Point3d Pt1, Point3d Pt2, double dScale = 1.0, double OffestCenterX = 0, double OffestCenterY = 0)
    
12. {  
    
13. double MinX = Math.Min(Pt1.X, Pt2.X);
    
14. double MinY = Math.Min(Pt1.Y, Pt2.Y);
    
15. double MaxX = Math.Max(Pt1.X, Pt2.X);
    
16. double MaxY = Math.Max(Pt1.Y, Pt2.Y);
    
17. if (MaxX > MinX && MaxY > MinY)
    
18. {  
    
19. ViewTableRecord ViewR = new ViewTableRecord();  
    
20. ViewTableRecord OldView = Doc.Editor.GetCurrentView;  
    
21. if (dScale <= 0)
    
22. {   
    
23. dScale = 1;  
    
24. }  
    
25. double newWidth = (MaxX - MinX) / dScale;  
    
26. double newHeight = (MaxY - MinY) / dScale;  
    
27. if ((newHeight / OldView.Height) > (newWidth / OldView.Width))
    
28. {   
    
29. ViewR.Height = newHeight;  
    
30. }
    
31. else
    
32. {   
    
33. ViewR.Width = newWidth;  
    
34. }  
    
35. ViewR.CenterPoint = new Point2d((MaxX + MinX) / 2 + OffestCenterX, (MaxY + MinY) / 2 + OffestCenterY);  Doc.Editor.SetCurrentView(ViewR);  
    
36. Doc.Editor.UpdateScreen();
    
37. }
    
38. }
    

<br /> /// <summary><br /> /// 窗口缩放<br /> /// </summary><br /> /// <param name="Pt1"></param><br /> /// <param name="Pt2"></param><br /> /// <param name="dScale">放大倍数  大于 0 </param><br /> /// <param name="OffestCenterX">中心偏移量X</param><br /> /// <param name="OffestCenterY">中心偏移量Y</param><br /> /// <remarks></remarks><br /> public void ZoomW(Point3d Pt1, Point3d Pt2, double dScale = 1.0, double OffestCenterX = 0, double OffestCenterY = 0)<br /> {  <br /> double MinX = Math.Min(Pt1.X, Pt2.X); <br /> double MinY = Math.Min(Pt1.Y, Pt2.Y); <br /> double MaxX = Math.Max(Pt1.X, Pt2.X); <br /> double MaxY = Math.Max(Pt1.Y, Pt2.Y); <br /> if (MaxX > MinX && MaxY > MinY) <br /> {  <br /> ViewTableRecord ViewR = new ViewTableRecord();  <br /> ViewTableRecord OldView = Doc.Editor.GetCurrentView;  <br /> if (dScale <= 0) <br /> {   <br /> dScale = 1;  <br /> }  <br /> double newWidth = (MaxX - MinX) / dScale;  <br /> double newHeight = (MaxY - MinY) / dScale;  <br /> if ((newHeight / OldView.Height) > (newWidth / OldView.Width)) <br /> {   <br /> ViewR.Height = newHeight;  <br /> } <br /> else <br /> {   <br /> ViewR.Width = newWidth;  <br /> }  <br /> ViewR.CenterPoint = new Point2d((MaxX + MinX) / 2 + OffestCenterX, (MaxY + MinY) / 2 + OffestCenterY);  Doc.Editor.SetCurrentView(ViewR);  <br /> Doc.Editor.UpdateScreen(); <br /> }<br /> }<br />