ashfinal
发表于 2009-8-18 21:57:08
阅读权限不够,哭...:face (3):
asxinyu
发表于 2009-8-19 16:18:17
学习。。。。有用
redapple2008
发表于 2009-8-24 00:45:42
很有用处,下载下来看看哈
xz00311
发表于 2009-9-18 23:18:22
看看我行不行能不能下载
nuoyan
发表于 2009-9-19 14:21:51
权限不够。失败、
zxh1220
发表于 2009-9-20 08:21:08
不是看不懂这些,再逛逛
298311657
发表于 2009-9-23 00:41:10
试试这个看,应该符合LZ的要求了#include <GUIConstantsEx.au3>
Opt('MustDeclareVars', 1)
Local $input, $btn, $msg, $dat, $len, $ctrlhandle
GUICreate("input", 130, 80)
$input = GUICtrlCreateInput("", 10, 5, 110, 20)
GUICtrlSetLimit(-1, 17)
$btn = GUICtrlCreateButton("Ok", 35, 45, 60, 20)
GUISetState()
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Switch $msg
Case $btn
MsgBox(4096, "", GUICtrlRead($input))
EndSwitch
reinput($input)
WEnd
Func reinput($ctrlhandle)
$dat = GUICtrlRead($ctrlhandle)
$len = StringLen($dat)
If $len = 2 Or $len = 5 Or $len = 8 Or $len = 11 Or $len = 14 Then
GUICtrlSetData($ctrlhandle, $dat & "-")
EndIf
EndFunc ;==>reinput
superflq
发表于 2009-9-25 13:37:39
试试这个看,应该符合LZ的要求了#include
Opt('MustDeclareVars', 1)
Local $input, $btn, $msg, $dat, $len, $ctrlhandle
GUICreate("input", 130, 80)
$input = GUICtrlCreateInput("", 10, 5, 110, 20)
...
298311657 发表于 2009-9-23 00:41 http://www.autoitx.com/images/common/back.gif
这个解决方法到时很简单,
yigao
发表于 2009-9-26 10:35:28
阅读权限什么时候可以到
FBWOLF
发表于 2009-9-29 17:14:33
真的是不错!
gdck
发表于 2009-10-24 02:10:33
:face (29)::face (29):慢慢研究
cxm23
发表于 2010-11-25 10:55:13
学习了,37楼的方法很好
yi834033
发表于 2011-1-24 14:42:00
我现在想做的是 input默认值是一个path的,不知道如何实现
子非鱼
发表于 2011-3-15 05:14:21
回复 1# superflq
好东西啊 ~~~留个脚印
子非鱼
发表于 2011-3-15 05:14:57
回复 44# 子非鱼
好东西啊 ~~~留个脚印