创建输入框(Input)控件.
GUICtrlCreateInput ( "文本", 左距, 顶距 [, 宽度 [, 高度
[, 样式 [, 扩展样式]]]] )
文本 | 控件显示的文本. |
左距 | 控件左侧的位置. 若此值为 -1, 则根据 GUICoordMode 的设置计算左侧位置. |
顶距 | 控件上方的位置. 若此值为 -1, 则根据 GUICoordMode 的设置计算顶部位置. |
宽度 | [可选参数] 控件的宽度(默认使用先前的宽度). |
高度 | [可选参数] 控件的高度(默认使用先前的高度). |
样式 | [可选参数] 控件的样式. 查看附录 GUI
控件样式表. 默认样式 ( -1) : $ES_LEFT, $ES_AUTOHSCROLL 强制样式s : $WS_TABSTOP only if no $ES_READONLY. $ES_MULTILINE is always reset. |
扩展样式 | [可选参数] 控件的扩展样式. 查看附录 扩展样式表. |
成功: | 返回控件标识符(控件ID). |
失败: | 返回 0. |
#include <GUIConstantsEx.au3>
Example()
Func Example()
Local
$file, $btn, $msg
GUICreate("我的输入框 GUI", 320, 120, @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, -1,
0x00000018); 接受拖动文件 WS_EX_ACCEPTFILES
$file
= GUICtrlCreateInput("", 10, 5, 300, 20)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
GUICtrlCreateInput("", 10, 35, 300, 20) ;
不接受拖动文件
$btn
= GUICtrlCreateButton("确定",
40, 75, 60, 20)
GUISetState()
$msg
= 0
While
$msg <>
$GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Select
Case $msg
= $btn
ExitLoop
EndSelect
WEnd
MsgBox(4096, 0, "拖放文件:
" & GUICtrlRead($file))
EndFunc ;==>Example
provider with jb51.net (unicode) |