设置Canvas.LineTo的行尾样式

问题描述 投票:5回答:2

是否可以为TCanvas.LineTo方法的行尾设置样式?似乎默认为圆角末端,当Pen.Width设置为较大的值(例如9)时,对于连续几行不同颜色的几行来说,这看起来非常糟糕。

看起来像这样(圆角):

 ********........******
**********........******
**********........******
 ********........******

((其中*是蓝色,而。是黄色)

如果在中间线之后画两条外部线,则更糟:

 ********........******
**********......********
**********......********
 ********........******

我希望它看起来像这样(长度结束):

 ********........******
 ********........******
 ********........******
 ********........******

笔似乎没有为此提供任何设置,并且LineTo方法也没有提供任何设置。我可能会调用Windows API函数吗?

是否可以为TCanvas.LineTo方法的行尾设置样式?它似乎默认为圆角,当Pen ....

delphi winapi gdi tcanvas
2个回答
4
投票

也许ExtCreatePen有帮助。检查PS_ENDCAP_*PS_JOIN_*标志。


1
投票
© www.soinside.com 2019 - 2024. All rights reserved.