打印程序的怪问题

truezhang

各位大侠能帮看下上面这段打印程序是问题，当 ThisDrawing.ActiveLayout.PlotRotation = ac0degrees时，我从左上角开始往右下角框选，无论框选范围多大，最终打印出来都是全空白，但当我从左下角往右上角框选就，打印内容就能正常显示。图纸旋转方向怎么还和框选方向有关？或者程序本身哪里不完善？

你有种再说一遍

因为纸张只有上下左右,而不是有序点集,
所以你问这个问题的本身就意识到了,
赶紧去排序吧,
现在还觉得和旋转有啥关系吗?没关系.

truezhang

啊，能不能提醒多点？该怎么个排序？

你有种再说一遍

truezhang 发表于 2024-12-22 18:27
啊，能不能提醒多点？该怎么个排序？

你没有点论坛帖子下面的"回复",我是不会接收到信息的.

像记录缓存一样获取边界就好了,密码mjtd:
https://www.cnblogs.com/JJBox/p/18617954

如果看不懂的话,那我也没有办法了.

菜小马哥

truezhang 发表于 2024-12-22 18:27
啊，能不能提醒多点？该怎么个排序？

应该和旋转方向没关系把，会不会是你选用的函数，对点的接收顺序做了限制，加一个算法，无论如何框选让它换算到正确的左下-右上不就好了

truezhang

谢谢指点，基础差还要多学

wuyunpeng888

自己转一个坐标，判断处理一下就随便选了

wuyunpeng888

pt1 = ThisDrawing.Utility.GetPoint(, "选择第一角点")
    pt2 = ThisDrawing.Utility.GetCorner(pt1, "选择第二角点")
    If pt1(0) < pt2(0) Then
        LBP(0) = pt1(0)
        RTP(0) = pt2(0)
    Else
        LBP(0) = pt2(0)
        RTP(0) = pt1(0)
    End If
    If pt1(1) < pt2(1) Then
        LBP(1) = pt1(1)
        RTP(1) = pt2(1)
    Else
        LBP(1) = pt2(1)
        RTP(1) = pt1(1)
    End If

    .SetWindowToPlot LBP, RTP '设置打印窗口位置

truezhang

wuyunpeng888 发表于 2024-12-28 23:35
pt1 = ThisDrawing.Utility.GetPoint(, "选择第一角点")
    pt2 = ThisDrawing.Utility.GetCorner(pt1, " ...

感谢告知！！！！！！！！！！！

chixun99

也有可能是框选的正选、反选有区别，可能图框图形刚好超过你选的范围了，导致未选择任何的边界图型