更改 GDI 笔颜色

【问题标题】：Change GDI pen colour更改 GDI 笔颜色
【发布时间】：2010-08-09 20:09:50
【问题描述】：

是否可以在使用此调用创建自定义笔颜色属性后更改它？

HPEN hPen = CreatePen(PS_SOLID, 1, RGB(0, 0, 0)); //Create a solid pen.

或者我应该如何创建一支可以改变颜色的笔。

【问题讨论】：

标签： gdi

【解决方案1】：

恐怕使用任何非深奥的方法都无法做到这一点。

不过，我认为您可以使用 DC_PEN 股票对象和 SetDCPenColor 函数，如下所示：

SelectObject(dc, GetStockObject(DC_PEN));
SetDCPenColor(dc, clGreen);
Rectangle(dc, 10, 10, 200, 200);
SetDCPenColor(dc, clRed);
Rectangle(dc, 300, 300, 500, 500);

在 Delphi 语法中。

【讨论】：