找回密码
 加入
搜索
楼主: xyold1

[GUI管理] 关于文本控件获取焦点即全选中的BUG【已解决】

  [复制链接]
 楼主| 发表于 2011-2-4 20:55:56 | 显示全部楼层
回复 15# menfan1

谢谢,不只是少了endif
当鼠标在输入框控件上时,只能输入一个字符,愁啊
 楼主| 发表于 2011-2-4 21:01:34 | 显示全部楼层
修改了一下
窗体中如果有组合框的话,要过滤一下

Opt('GUIOnEventMode', 1)
#AutoIt3Wrapper_Run_Debug_Mode=Y
GUICreate('窗口')
GUISetOnEvent(-3, '_Exit')
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <GuiStatusBar.au3>
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
 
$Input1 = GUICtrlCreateEdit('这个点击即全选', 50, 50, 200, 20,BitOR($ES_WANTRETURN, $WS_VSCROLL))
$hInput1 = GUICtrlGetHandle(-1)
$Input2 = GUICtrlCreateInput('这个点击即全选', 50, 110, 200, 20)
$hInput2 = GUICtrlGetHandle(-1)
GUICtrlCreateInput('这个不会全选,点哪是哪', 50, 80, 200, 20)
 
GUISetState()
GUIRegisterMsg(0x0111, 'WM_COMMAND')
;~ GUISetOnEvent($GUI_EVENT_PRIMARYUP, "SpecialEvents")
 
While 1
        Sleep(100)
WEnd
Func SpecialEvents()
 $a = GUIGetCursorInfo()
 If Not @error And $a<>0 Then
GUICtrlSetState($a[4], 256)
EndIf
 
EndFunc
 
Func _Exit()
        Exit
EndFunc   ;==>_Exit
 
Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
        $a = GUIGetCursorInfo()
 If Not @error And $a<>0 Then
 If $a[2] Then
GUICtrlSetState($a[4], 256)
  EndIf
      EndIf

EndFunc   ;==>WM_COMMAND
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-6-13 00:12 , Processed in 0.067775 second(s), 13 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表