ShortcutDelete.ahk

ShortcutDelete()
{
	; deletes the shortcut for a script
	; MsgBox params: %params%


	; declare local, global, static variables
	Global ShortcutName


	Try
	{
		; set default return value
		ReturnValue := 0 ; success


		; validate parameters


		; initialise variables


		; delete the shortcut
		fnStartTime := A_TickCount
		fnElapsedTime := A_TickCount - fnStartTime ; measure elapsed time
		While (ShortcutExists() = 1 && fnElapsedTime < 10000) ; try for up to 10 secs, while the file does not exist
		{
			FileDelete, %ShortcutName% ; delete it
			fnElapsedTime := A_TickCount - fnStartTime ; measure elapsed time
		}

	}
	Catch, ThrownValue
	{
		ReturnValue := !ReturnValue
		CatchHandler(A_ThisFunc,ThrownValue.Message,ThrownValue.What,ThrownValue.Extra,ThrownValue.File,ThrownValue.Line,0,0,0)
	}
	Finally
	{
	}

	; return
	Return ReturnValue
}


/* ; testing
params := xxx
ReturnValue := ShortcutDelete(params)
MsgBox, ShortcutDelete`n`nReturnValue: %ReturnValue%
*/