_FileRun UDF

[MrCreatoR]

Hi!

This function is going to replace a standard FileRun window, that can be found from “Start -> Run...”.

This function have a $hWnd_Parent parameter, that allow to “attach” the window to another parent window (by WinGetHandle())....

The function is allmoust like the original window, but there is just few excludes - the help button do nothing (if someone can show me how can i make it do something, it will be great) now it does , and this is a custom window that can be used with your apps .

In this example the window is “attached” to currently active window:

#NoTrayIcon
#include <FileRun_Incl.au3>
;

Global $RunList = "";"http://www.autoitscript.com/autoit3/|notepad"

;We read the current FileRun list
For $i = 97 To 122
    $RegCurrentVal = RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU", Chr($i))
    If StringRegExp(StringRight($RegCurrentVal, 2), "\\[0-9]") Then $RegCurrentVal = StringTrimRight($RegCurrentVal, 2)
    $RunList &= $RegCurrentVal & "|"
Next

If StringRight($RunList, 1) = "|" Then StringTrimRight($RunList, 1)

$RegReadRunList = RegRead("HKEY_CURRENT_USER\Software\_FileRunApp", "")
If $RegReadRunList <> "" And StringInStr($RegReadRunList, "|") Then $RunList = $RegReadRunList

;Now we show the dialog
$Current_hWnd = WinGetHandle(WinGetTitle(""))
$RunList = _FileRun_Dialog($RunList, "FileRun program App", -1, $Current_hWnd)

If Not @error And $RunList <> $RegReadRunList Then RegWrite("HKEY_CURRENT_USER\Software\_FileRunApp", "", "REG_SZ", $RunList)

EDIT (22.03.2009):

; The UDF is rewrited for latest AutoIt version (3.3.0.0)

EDIT (11.04.2007):

; Changed example.

; Now there is no need for #include <GuiConstants.au3> and Opt's funcs, all this is local now.

; If as $hWnd param passed a title, then it converted to a Hwnd.

; Changed the font name - now it's Georgia.

; Now more effective the process of executing app/file, if you type only spaces, then button "Run" will be disabled. And any spaces at end/start of typed/inserted filename will be stripped.

; When you Browse to choose file, the initial dir is the last used (opened), not the @SystemDir.

; If you press Cancel button, then @error set to 1, and returned empty string ("").

EDIT (02.11.2007):

Totaly rewrited;

* The main UDF is now in seperated Include file.

* Help button from the title bar now work as it should .

* If was called a "file selection window" ('Browse' button), now when we close the FileRun Dialog parent window not minimized as before.

* No more hotkeys set, instead of this i used $BS_DEFPUSHBUTTON style.

* Now when execute program, the working dir is set to program's dir.

* Shortcats now executed properly.

* And more fixes.

_FileRun.au3 - See the next attached zip file, it include example and the UDF.

_FileRun.zip

_FileRun.zip - Compatible with 3.3.0.0.

Edited March 22, 2009 by MrCreatoR

[James]

Hmm clever. I like how it attaches itself

[MrCreatoR]

Edit the first post, the function is modified "badly" - see attached file at the first post to get full function (with example).

[MrCreatoR]

EDIT (02.11.2007):

Totaly rewrited;

* The main UDF is now in seperated Include file .

* Help button from the title bar now work as it should.

* If was called a "file selection window" ('Browse' button), now when we close the FileRun Dialog parent window not minimized as before.

* No more hotkeys set, instead of this i used $BS_DEFPUSHBUTTON style.

* Now when execute program, the working dir is set to program's dir.

* Shortcats now executed properly.

* And more fixes.

See the first post

[colafrysen]

Hi, i know it's been like 2 years since you last posted anything on this UDF, but i am having some errors.

So first, the Include GuiCombo.au3, where do I get it?

And second, all the RunErrorsFatal Errors? what are the and why are they?

I assume that the last error (ERROR: _GUICtrlComboAutoComplete(): undefined function) Is because of the missing Include

CODE

C:\Documents and Settings\%username%\Desktop\FileRun_Incl.au3(2,10) : ERROR: can't open include file <GuiCombo.au3>

#include <GuiCombo.au3>

~~~~~~~~~^

C:\Documents and Settings\%username%\Desktop\FileRun_Incl.au3(33,49) : ERROR: Opt() called with illegal argument 1: "RunErrorsFatal"

Local $OldOptErrFatal = Opt("RunErrorsFatal", 0)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\%username%\Desktop\FileRun_Incl.au3(129,39) : ERROR: Opt() called with illegal argument 1: "RunErrorsFatal"

Opt("RunErrorsFatal", $OldOptErrFatal)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\%username%\Desktop\FileRun_Incl.au3(138,42) : ERROR: Opt() called with illegal argument 1: "RunErrorsFatal"

Local $Old_REF = Opt("RunErrorsFatal", 0)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\%username%\Desktop\FileRun_Incl.au3(141,32) : ERROR: Opt() called with illegal argument 1: "RunErrorsFatal"

Opt("RunErrorsFatal", $Old_REF)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\%username%\Desktop\FileRun_Incl.au3(125,48) : ERROR: _GUICtrlComboAutoComplete(): undefined function.

_GUICtrlComboAutoComplete($ComboBox, $LastRun)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\%username%\Desktop\_FileRun_Example.au3 - 6 error(s), 0 warning(s)

Thanks in advance!

Edited March 22, 2009 by colafrysen

[MrCreatoR]

  Quote

i am having some errors

You can read about the changes between AutoIt versions here, i sure you are using the latest one .

P.S

Uploaded a fixed version (check the first post), for AutoIt 3.3.0.0.

[colafrysen]

Thanks! Awesome UDF, appreciate all your work

[BinaryBrother]

And just to think, I get paranoid over bumping a thread that's over a couple months old...

Sorry, had to mention that... lol

Anyway, I can actually use this... I hadn't seen it around before, so I appreciate the bump!