关于对话框的例子,带超链接 [基础知识]

kakinkgb · 发表于 2008-6-9 20:29:52

从官方找的,我稍微改了改,要不运行不了,因为太老了
给新手学习,大师们飘过吧

#include <WindowsConstants.au3>
#include <GUIConstantsex.au3>
#include <GuiButton.au3>


Opt("GUICloseOnESC",1)
Opt("GUIOnEventMode",1)


$about = GuiCreate("About",215,150,-1,-1,$WS_CAPTION + $WS_SYSMENU)
GUISetOnEvent ($GUI_EVENT_CLOSE, "AboutOK" )
GUICtrlCreateIcon (@AutoItExe,-1,11,11)
GUICtrlCreateLabel ("App name 1.0",59,11,135,20)
GUICtrlSetFont (-1,10, 800, 0, "Arial") ; bold
GUICtrlCreateLabel ("(c) 2005" & @CRLF & @CRLF & "Zedna",59,30,135,40)
$email = GUICtrlCreateLabel ("author@somewhere.com",59,70,135,15)
GuiCtrlSetFont($email, 8.5, -1, 4) ; underlined
GuiCtrlSetColor($email,0x0000ff)
GuiCtrlSetCursor($email,0)
GUICtrlSetOnEvent(-1, "OnEmail")
$www = GUICtrlCreateLabel ("www.autoitscript.com/forum/",59,85,140,15)
GuiCtrlSetFont($www, 8.5, -1, 4) ; underlined
GuiCtrlSetColor($www,0x0000ff)
GuiCtrlSetCursor($www,0)
GUICtrlSetOnEvent(-1, "OnWWW")
GUICtrlCreateButton ("OK",65,115,75,23,$GUI_SS_DEFAULT_BUTTON + $BS_DEFPUSHBUTTON)
GUICtrlSetState (-1, $GUI_FOCUS)
GUICtrlSetOnEvent(-1, "AboutOK")
GUISetState()

While 1 
        Sleep(100)
WEnd

Func OnEmail()
        Run(@ComSpec & " /c " & 'start mailto:author@somewhere.com?subject=Something', "", @SW_HIDE)
EndFunc

Func OnWWW()
        Run(@ComSpec & " /c " & 'start http://www.autoitscript.com/forum/', "", @SW_HIDE)
EndFunc

Func AboutOK()
        Exit
EndFunc

[ 本帖最后由 kakinkgb 于 2008-6-11 23:45 编辑 ]

daxinnet · 发表于 2008-6-10 13:58:44

先谢谢了，下载看看。。。

garuda · 发表于 2008-6-11 22:10:17

不错！支持一下～

harecn · 发表于 2008-6-14 14:15:48

收藏了。。学习用。。。谢谢lz

botanycc · 发表于 2008-6-14 14:54:13

收藏，谢谢

catcher · 发表于 2008-7-1 23:16:09

好东西

edielei · 发表于 2008-7-5 15:18:16

好东西呀。。。。正是想要的。

难得糊涂 · 发表于 2008-7-5 20:54:49

不错，要好好学习。。。

shangpan · 发表于 2008-7-6 09:45:17

有用的代码，收藏了。

smisong · 发表于 2008-7-10 13:02:37

保存学习。感谢楼主。

stardust · 发表于 2008-8-31 19:54:17

不错，谢谢分享！

ollydbg · 发表于 2008-12-2 13:12:39

效果不错，学习了。

cg226 · 发表于 2008-12-3 01:06:33

学习了~谢谢~`

boyhong · 发表于 2008-12-4 12:41:14

菜鸟进阶的好东西~~~

bachelor66 · 发表于 2009-5-27 15:31:15

很不错的例子，有用的

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

[转贴] 关于对话框的例子,带超链接 [基础知识]

本帖子中包含更多资源