GUI控件拖放例子
作者:轮回 日期:2008-09-23
复制内容到剪贴板
程序代码
程序代码#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
Opt('MustDeclareVars', 1)
Example()
Func Example()
Local $hGui,$Edit
;$parent1 = GUICreate("Parent1")
$hGui= GUICreate("Parent1", 300, 200, -1, -1, -1, $WS_EX_ACCEPTFILES)
$Edit = GUICtrlCreateEdit("", 1, 1, 200, 100, $ES_AUTOVSCROLL + $WS_VSCROLL+$ES_READONLY)
;edit框平铺样式
;$Edit = GUICtrlCreateEdit("", 1, 1, 300, 200, $ES_READONLY+$ES_WANTRETURN,0)
GUICtrlSetState(-1, $GUI_DropACCEPTED)
GUISetState(@SW_SHOW)
While GUIGetMsg() <> -3
WEnd
EndFunc
评论: 1 | 引用: 0 | 查看次数: 688
回复
]问题延伸,拖放的防呆措施,防止多次重复拖放。譬如:拖放到Input中,第1次拖放后获得文件路径和文件名,如果光标在INPUT中并未全选中文本(光标仅在某一位置上)再进行第2次拖放时,内容可就错乱了,从www.autoitx.com/thread-15160-1-2.html案例中找到了单个INPUT时的解决方法。但是,当有多个INPUT都有拖放功能时,譬如:有第2个Input、第3个Input……时,该方法无效了。请教解决方法。谢谢!
发表评论
上一篇
下一篇

文章来自:
Tags:
相关日志:





