AlmarM Posted October 20, 2007 Share Posted October 20, 2007 (edited) I was bored and made this little thingy Source:#include <GUIConstants.au3> HotKeySet("{HOME}", "_Quit") $GUI = GUICreate("Press HOME for STOP", 150, 100, -1, -1) GUISetState(@SW_SHOW) $URL = GUICtrlCreateInput("", 10, 70, 130, 20) GUICtrlCreateLabel("Typ the URL and press GO", 10, 10) $GO = GUICtrlCreateButton("GO", 10, 35, 130, 25) GUISetState() While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE Exit Case $msg = $GO $Read = GUICtrlRead($URL) Run("cmd /c start " & $read, "", @SW_HIDE) EndSelect WEnd Func _Quit() Sleep(100) Exit EndFunc ;==> For EmergencyI know its easy but I just want to show HOW easy it can be Edited October 20, 2007 by AlmarM Minesweeper A minesweeper game created in autoit, source available. _Mouse_UDF An UDF for registering functions to mouse events, made in pure autoit. 2D Hitbox Editor A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes. Link to comment Share on other sites More sharing options...
jvanegmond Posted October 20, 2007 Share Posted October 20, 2007 If you replace _IECreate($Read) by Run("cmd /c start " & $read, "", @SW_HIDE) it also works if the user has its browser set to Firefox or something else by default. Plus, you don't need the IE library. github.com/jvanegmond Link to comment Share on other sites More sharing options...
JustinReno Posted October 20, 2007 Share Posted October 20, 2007 You could add off Simple Web Brower Mini, its only 9 lines of code, without useing any udfs. Opt("GUIResizeMode", 1) $Form1_1 = GUICreate("Simple Web Browser Mini", 660, 482, -1, -1, 0x00CF0000, 0x00010000) $Obj1 = ObjCreate("Shell.Explorer.2") $Obj1_ctrl = GUICtrlCreateObj($Obj1, 0, 0, 658, 452) $Button1 = GUICtrlCreateButton("URL", 8, 456, 643, 25, 0) GUISetState(@SW_SHOW) While GUIGetMsg() <> -3 If GUIGetMsg() = $Button1 Then $Obj1.Navigate(InputBox("Simple Web Browser Mini", "What is the URL you want to visit?")) WEnd Link to comment Share on other sites More sharing options...
AlmarM Posted October 21, 2007 Author Share Posted October 21, 2007 Yeah i know but.. its a Tool not a webbrowser Minesweeper A minesweeper game created in autoit, source available. _Mouse_UDF An UDF for registering functions to mouse events, made in pure autoit. 2D Hitbox Editor A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes. Link to comment Share on other sites More sharing options...
jvanegmond Posted October 21, 2007 Share Posted October 21, 2007 Here it is proper: #include <GUIConstants.au3> $GUI = GUICreate("Click X to stop", 150, 100, -1, -1) $URL = GUICtrlCreateInput("", 10, 70, 130, 20) GUICtrlCreateLabel("Type the URL and press GO", 10, 10) $GO = GUICtrlCreateButton("GO", 10, 35, 130, 25) GUISetState() While 1 Switch GUIGetMsg() Case - 3 Exit Case $GO Run("cmd /c start " & GUICtrlRead($URL), "", @SW_HIDE) EndSwitch WEnd and it still sucks. github.com/jvanegmond Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now