设置画笔对齐方式
#Include <GDIPlus.au3>
_GDIPlus_PenSetAlignment($hPen[, $iAlignment = 0])
$hPen | 画笔对象句柄 |
$iAlignment | [可选参数]画笔对齐方式. 可以是下列值之一: 0 - 绘制线中心对齐 1 - 当绘制一个多边形时,对齐多边形的内边缘 |
成功: | 返回 True |
失败: | 返回 False |
在MSDN中搜索
#include <GUIConstantsEx.au3>
#include <GDIPlus.au3>
_Main()
Func _Main()
Local $hGUI, $hGraphic, $hPen
; 创建 GUI
$hGUI = GUICreate("GDI+", 400, 300)
GUISetState()
; 创建资源
_GDIPlus_Startup()
$hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)
$hPen = _GDIPlus_PenCreate(0xFF000000, 4)
_GDIPlus_PenSetEndCap($hPen, $GDIP_LINECAPARROWANCHOR)
_GDIPlus_PenSetAlignment($hPen, 1)
; 显示画笔对齐方式
MsgBox(4096, "信息", "Pen alignment: " & _GDIPlus_PenGetAlignment($hPen))
; 描绘箭头
_GDIPlus_GraphicsDrawLine($hGraphic, 10, 130, 390, 130, $hPen)
_GDIPlus_PenSetWidth($hPen, 6)
_GDIPlus_GraphicsDrawLine($hGraphic, 10, 150, 390, 150, $hPen)
_GDIPlus_PenSetWidth($hPen, 8)
_GDIPlus_GraphicsDrawLine($hGraphic, 10, 170, 390, 170, $hPen)
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
; 清理资源
_GDIPlus_PenDispose($hPen)
_GDIPlus_GraphicsDispose($hGraphic)
_GDIPlus_Shutdown()
EndFunc ;==>_Main