本帖最后由 happytc 于 2011-1-7 06:16 编辑
其实上面给的已经是完整代码了呀,又如下面的吧:实现监控点写字板的字号时,自动设为“18”号字大小
这时你双击写字板的标题栏,不能实现写字板窗口最大化/还原了,也就鼠标双击失灵了。我的目的就是怎么样才能既可以自动设置字号为18,但双击写字板标题栏又不失灵!$Time = 10
AdlibRegister("DoubleHit", $Time)
RunWait("c:\Program Files\Windows NT\Accessories\wordpad") ;<==居然直接写"wordpad"不启动,但在“开始”-“运行”里直接输“wordpad”回车后可以启动
While 1
Sleep(100)
WEnd
Func DoubleHit()
$ctrlFocus = ControlGetFocus("[CLASS:WordPadClass]")
If $ctrlFocus = "Edit2" Then
ControlSend("[CLASS:WordPadClass]", "", "Edit2", "18" & @CR)
EndIf
EndFunc
|