Re 8#:
只能说“说au3不能实现此功能”的人们太小看au3了。#include <WinAPI.au3>
#include <GUIConstants.au3>
$hGUI = GUICreate("Test", 300, 200)
GUICtrlCreateTab(5, 5, 290, 180)
$hTab = GUICtrlGetHandle(-1)
GUICtrlCreateTabItem("Sheet 1")
GUICtrlCreateButton("Button1", 40, 40, 80, 20)
GUICtrlCreateTabItem("Sheet 2")
GUICtrlSetState(-1, $GUI_SHOW)
GUICtrlCreateButton("Button2", 60, 70, 90, 20)
GUICtrlCreateTabItem("")
$hC = DllCallbackRegister("_TabProc", "int", "hWnd;uint;wparam;lparam")
$pC = DllCallbackGetPtr($hC)
$hTabProc = _WinAPI_SetWindowLong($hTab, -4, $pC)
GUISetState()
Do
Until guiGetMsg() = -3
Func _TabProc($hWnd, $iMsg, $wparam, $lparam)
if $iMsg = 0x130b then return 1
Return _WinAPI_CallWindowProc($hTabProc, $hWnd, $iMsg, $wparam, $lparam)
EndFunc
|