本帖最后由 happytc 于 2011-11-6 13:24 编辑
回复 1# w55554
你要啥圆角效果呢?
$hGui = GUICreate("GUIRoundCorner", 500, 300, -1, -1, 0x80000000)
_GUIRoundCorners($hGUI, 0, 0, 20, 20)
GUISetState()
Do
Until GUIGetMsg() == -3
Func _GUIRoundCorners($h_win, $i_x1, $i_y1, $i_x3, $i_y3)
Local $XS_pos, $XS_ret, $XS_ret2
$XS_pos = WinGetPos($h_win)
$XS_ret = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long", $i_x1, "long", $i_y1, "long", $XS_pos[2], "long", $XS_pos[3], "long", $i_x3, "long", $i_y3)
If $XS_ret[0] Then
$XS_ret2 = DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $XS_ret[0], "int", 1)
EndIf
EndFunc
|