Adlib does not work in my script

[jefhal]

In order to insure that my font file is fully copied before running a dll on it, I have a message box pop up and then am trying to use an adlib function to close the message box. Seems plausible, but does not work as written. Any ideas?:

#Include <File.au3>
#Include <Array.au3>

AdlibEnable("_CloseFileCopyConfirmationMsgBox",250)
$SourcePath = "\\Parktaz\c\windows\fonts"
$FileList = _FileListToArray($SourcePath)
$TargetPath = @WindowsDir & "\JunkFolder\"
If (Not IsArray($FileList)) Then
     Exit
EndIf
For $i = 1 to $FileList[0]
    $sFileName = $FileList[$i]
    If FileCopy($SourcePath & "\" & $sFileName, $TargetPath ,1) Then
        $sFileName = $TargetPath & StringTrimLeft($sFileName, StringInStr($sFileName, '\', 0, -1))
        DllCall('gdi32', 'long', "AddFontResourceA", 'String', $sFileName)
    EndIf
Next
Exit

Func _CloseFileCopyConfirmationMsgBox()
    If WinActive("New file name is:") Then ControlClick("New file name is:","","Button1")
EndFunc

It was well buried in the forum threads, but I found this previous comment from Valik:

GuiMsg() blocks like MessageBox or InputBox so it's not possible to use hotkeys or AdLib while it's running.

Maybe this should go into the next manual rev? Edited September 17, 2005 by jefhal