OpenFileRequester()

Syntaxe

NomFichier$ = OpenFileRequester(Titre$, FichierParDefaut$, Filtre$, FiltrePosition [, Options])

Ouvre une boîte de dialogue standard pour choisir 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 boîte 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().

'Options' est un paramètre facultatif et peut être une combinaison des valeurs suivantes:

  #PB_Requester_MultiSelection: Active la multi-sélection. (voir NextSelectedFileName())

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$ = OpenFileRequester("Choisissez un fichier à charger", FichierParDefaut$, Filtre$, Filtre)
  If Fichier$
    MessageRequester("Information", "Vous avez choisi le fichier suivant :"+Chr(10)+Fichier$, 0)
  Else
    MessageRequester("Information", "La sélection a été annulée.", 0)
  EndIf 

OS Supportés

Tous