我知道 GDI 的限制。GDI 只能绘制宽度至少为 1 像素的线。但我仍然想在打印机中画一条看起来比 1 像素细的线。
你的意思是我可以这样做:
with cLogBrush do
begin
lbStyle := BS_Solid;
lbColor := ACanvas.Pen.Color;
lbHatch := 0;
end;
dwStyle := PS_COSMETIC or PS_ALTERNATE;
ACanvas.Pen.Handle := ExtCreatePen(dwStyle, 1, cLogBrush, 0, nil);
ACanvas.MoveTo(X1, Y1);
ACanvas.LineTo(X2, Y2);