如何将两个inputbox放在一个界面啊？

fanxiang_1984 · 发表于 2012-10-31 09:37:31

我想将两个inputbox 内容放在一个界面里面，但是在GUI中找不到相关函数能实现啊？哪位高手给我指点下啊？
比如
Dim $gname
Dim $rname

$gnames = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion","RegisteredOrganization")

$rnames = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion","RegisteredOwner")

$gname = InputBox("修改","公司名，可以留空,当前是:"&$gnames,"公司")

$rname = InputBox("修改","用户名，不可留空,当前是:"&$rnames,"用户")

Select

Case $rname = ""

MsgBox(0,"修改","用户不能为空")

EndSelect

RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion","RegisteredOrganization","REG_SZ",$gname)

RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion","RegisteredOwner","REG_SZ",$rname)

MsgBox(0,"修改","修改成功")

如何将以上两个窗口合并成一个呢

fanxiang_1984 · 发表于 2012-10-31 10:38:30

帖子发了两次，请版主帮我删掉一个。谢谢

meteor0330 · 发表于 2012-10-31 10:48:01

没弄清你想表达的意思

netegg · 发表于 2012-10-31 11:12:34

本帖最后由 netegg 于 2012-10-31 13:04 编辑

inputbox本身就只有一个输入控件，自己建个gui，或者用其他的对话框api来模拟，不过这样做的结果是什么样就不知道了，再就是自己重建编辑框结构
对了，还有一种方式，间接可以实现，仍然是两个gui，一个无边框的子gui固定到主gui上，不过这样必须hook到inputbox的句柄才行

最简单的做两个edit不是就完了，何必非要input，有什么区别吗？

fanxiang_1984 · 发表于 2012-10-31 15:01:37

我的目的是给出一个GUI对话框，我事先填写好我的信息，然后GUI上面点击确定，然后我输入的信息在自动导入到我的脚本里面。。。这个是我最后想实现的结果。
但是似乎第一步我就没做通。netegg专家说的方法我一会试下。

annybaby · 发表于 2012-10-31 15:49:42

回复 6# fanxiang_1984

不会是这样吧??

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 233, 47, 192, 124)
$Input1 = GUICtrlCreateInput("", 0, 0, 169, 21)
GUICtrlSetTip(-1,'input something,please!')
$Input2 = GUICtrlCreateInput("", 0, 24, 169, 21)
GUICtrlSetTip(-1,'input something,please!')
$Button1 = GUICtrlCreateButton("确定", 176, 8, 49, 33,1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        MsgBox(0,'输入的信息:',GUICtrlRead($Input1)&@CRLF&GUICtrlRead($Input2))
        EndSwitch
WEnd

fanxiang_1984 · 发表于 2012-10-31 17:12:02

嗯，效果达到了，这里实现了两行，我试下多行看是否可行。
非常感谢。

fanxiang_1984 · 发表于 2012-10-31 17:16:31

不行啊，两行这种我在论坛找到办法了。但是三行以上我就不行了，我想弄到三行以上的数据啊。。

annybaby · 发表于 2012-10-31 17:59:21

回复 9# fanxiang_1984

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 233, 410, 192, 124)
For $i=0 To 19
        GUICtrlCreateInput('', 0, $i*20, 169, 21)
Next

$Button1 = GUICtrlCreateButton("确定", 176, 8, 49, 33,1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Local $str=''
While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        $str=''
                        For $i=1 To 20
                                $str&='第'&$i&'个输入框的信息是:'&GUICtrlRead($i+2)&@CRLF
                        Next
                        
                        MsgBox(0,'输入的信息:',$str)
        EndSwitch
WEnd

netegg · 发表于 2012-10-31 18:00:34

气死我了，lz就是想要一个gui上多个输入控件呀？那和inputbox有什么关系？

fanxiang_1984 · 发表于 2012-10-31 18:07:54

回复 11# netegg

我最终想要的就是在GUI中多个类似与inputbox的框格，可以向框格里面填写VALUE,然后这个VALUE值会自动赋予到另外个一个脚本中。开始以为inputbox 可以做成多个，发现似乎不可行，就在寻找GUI方式了。但是一直没有找到啊。

可能是我没说清楚。。。。sorry.

annybaby · 发表于 2012-10-31 18:20:09

回复 11# netegg

很多人都是需要别人去猜他的问题,看完后还需要再回去学习小学语文~~

呵呵~~

fanxiang_1984 · 发表于 2012-10-31 19:22:18

知识太薄弱，要做东西，还没人指导

happytc · 发表于 2012-10-31 19:29:51

回复 11# netegg

蛋兄，要淡定！

		自动登录	找回密码
密码			加入

[GUI管理] 如何将两个inputbox放在一个界面啊？

相关帖子