;----------------------------------------------------------------------------------------------------------------------
#DefineFunction udfAskFileName (strAFN_Title, strAFN_Folder, strAFN_Filetypes, strAFN_DefaultMask, intAFN_Flag)
Return AskFileName (strAFN_Title, strAFN_Folder, strAFN_Filetypes, strAFN_DefaultMask, intAFN_Flag)
:CANCEL
Return "" ; Return empty string if Dialog has been cancelled resp. closed by escape key.
#EndFunction
;----------------------------------------------------------------------------------------------------------------------

strAFN_Title       = "" ; Title of the file name select box.
strAFN_Folder      = "" ; Initial drive and directory.
strAFN_Filetypes   = "Batch files|*.wbt;*.bat;*.cmd|All files|*.*" ; The "|" separates the descriptive phrase from the mask.
strAFN_Defaultmask = "" ; Default filename or mask.
intAFN_Flag        = 0 ; Save style.
intAFN_Flag        = 1 ; Open style.
intAFN_Flag        = 2 ; Open style, allowing multiple files to be selected.
intAFN_Flag        = 3 ; Save style, with no "replace" confirmation.
strAFN_Result      = udfAskFileName (strAFN_Title, strAFN_Folder, strAFN_Filetypes, strAFN_DefaultMask, intAFN_Flag)
If strAFN_Result == "" Then Goto CANCEL