delphi在image1中画直线, image1.Canvas.MoveTo(10,10);image1.Canvas.LineTo(20,100);画的直线看起来不直

见附图.如何处理才能看起来像条直线.
2025-03-03 07:54:40
推荐回答(3个)
回答1:

要画很直的直线(看起来是)必须两个点的横坐标或纵坐标相等才成,除非加粗直线,否则没有办法处理。
另外,在实际编程中,在ImageEN画布上画直线对象也要好很多,不知道它是不是进行特殊处理了(没有仔细研究过它的源代码)

回答2:

在Canvas上划斜线,是这样的,这是分辨率造成的,打印出来的效果要好些.因为打印机的像素要比它高.

回答3:

。。。。。。。Image控件的左上角的坐标是(0,0),向右,向下分别增加,你要画条竖直的线至少X轴要一样吧?把20改成10