FileToDelete is string
ResDeletion is boolean
FileToDelete = fSelect("", "", "Select the file to delete", ...
"All files (*.*)" + TAB + "*.*", "", fselOpen + fselExist)
ResDeletion = fDelete(FileToDelete)
IF ResDelete = False THEN
Error(ErrorInfo(errMessage))
ELSE
Info("The file was deleted.")
END