SaveFileRequester()

Syntaxe

NomFichier$ = SaveFileRequester(Titre$, FichierParDefaut$, Filtre$, FiltrePosition)
Description
Ouvre une boîte de dialogue standard pour enregistrer un fichier. Titre$ remplace le titre de la boîte par défaut. FichierParDefaut$ permet d'initialiser la boîte avec un répertoire et un fichier choisis.

Filtre$ permet de n'afficher que les fichiers dont le nom et/ou l'extension de fin correspond au filtre. Il doit avoir la forme des exemples suivants : '*.txt' pour des fichiers texte, '*.mus;*.mod' pour des fichiers musique ayant l'extension '.mus' ou '.mod'. Chaque filtre est en fait une paire composée du label qui sera visible dans le requester et du filtre proprement dit. Le séparateur est le caractère '|' (Pipe).

Exemple:

  "Fichiers Textes|*.txt"            ; Un seul filtre avec comme label 'Fichiers Textes'
  "Fichiers Textes|*.txt;*.doc"      ; Un seul filtre avec *.txt et *.doc accepté
  "Musiques|*.mp3|Video|*.avi;*.asf" ; 2 filtres (Musique et video)
Enfin, FiltrePosition précise quel filtre est celui par défaut, depuis 0 jusqu'au nombre total de filtres. Une fois la fenêtre fermée, SelectedFilePattern() permet de récupérer la position du filtre choisi.

Le 'NomFichier$' renvoyé peut être découpé facilement en chemin, nom ou extension à l'aide des commandes suivantes: GetFilePart(), GetPathPart() et GetExtensionPart().

Exemple:

  FichierParDefaut$ = "C:\autoexec.bat"   ; Répertoire et fichier par défaut qui seront affichés
  ;  Avec la chaîne suivante nous allons définir les filtres ("|" comme séparateur) pour l'affichage de fichier :
  ;  1er  : "Texte (*.txt)" comme nom, ".txt" et ".bat" comme extension autorisée
  ;  2ème : "PureBasic (*.pb)" comme nom, ".pb" comme extension autorisée
  ;  3ème : "Tous les fichiers (*.*)" comme nom, "*.*" comme extension autorisée, valide pour tous les fichiers
  Filtre$ = "Texte (*.txt)|*.txt;*.bat|PureBasic (*.pb)|*.pb|Tous les fichiers (*.*)|*.*"
  Filtre = 0    ; utiliser  par défaut le premier des trois filtres possibles
  Fichier$ = SaveFileRequester("Choisissez un fichier à sauvegarder", FichierParDefaut$, Filtre$, Filtre)
  If Fichier$
    MessageRequester("Information", "Vous avez choisi ce fichier :"+Chr(10)+Fichier$, 0)
  Else
    MessageRequester("Information", "La sélection a été annulée.", 0)
  EndIf

OS Supportés

Tous

<- PathRequester() - Requester Index - SelectedFilePattern() ->