PANORAMIC : UTILISER UN OPEN_DIALOG

PAGE PRINCIPALE /PAGE TUTORIELS

Ce qu'il faut savoir faire pour utiliser l'objet système OPEN_DIALOG.

 

Choix d'un fichier

L'objet système OPEN_DIALOG est un objet invisible, dont le rôle est de choisir un fichier donné dans l'arborescence des fichiers et des répertoires des supports disponibles (disque dur, disquette, clé USB, ...)

Cet objet ne devient visible et utilisable que lors de l'exécution de la commande FILE_NAME$(N) qui retourne le nom du fichier choisi ou bien le caractère souligné, N étant le numéro de l' OPEN_DIALOG utilisé.

  • La commande FILE_NAME$(N) retourne le nom du fichier choisi si l'utilisateur a cliqué sur OUVRIR.
  • La commande FILE_NAME$(N) retourne le caractère souligné si l'utilisateur a cliqué sur ANNULER.

L'usage de la commande FILE_NAME$(N) est donc en principe associée à un test du résultat avec le caractère souligné "_" :

dim a$ : rem on définit une variable string

 

open_dialog 1 : rem création de l'objet système numéro 1

a$=file_name$(1) : rem utilisation de l'open_dialog 1 pour choisir un fichier

 

if a$<> "_" then - - - : rem un fichier a été choisi

if a$= "_" then - - - : rem aucun fichier n'a été choisi

Filtrage des noms de fichier

Au lieu de visualiser tous les fichiers avec un OPEN_DIALOG, on peut se limiter à un certain type, défini par l'extension du fichier.

La commande FILTER permet de ne visualiser dans un OPEN_DIALOG que les fichiers ayant une certaine extension. Elle permet en outre d'afficher un commentaire qui est visible dans la partie "Type" de l' OPEN_DIALOG

Exemple : on ne recherche que les fichiers texte (dont l'extension est TXT) :

 

dim a$ : rem on définit une variable string

 

open_dialog 1 : rem création de l'objet système numéro 1

filter 1,"fichiers texte|*.txt": rem on se limite aux fichiers se terminant par "txt"

a$=file_name$(1) : rem utilisation de l'open_dialog 1 pour choisir un fichier TEXTE (.txt)

 

if a$<> "_" then - - - : rem un fichier a été choisi

if a$= "_" then - - - : rem aucun fichier n'a été choisi

 

Utilisation d'un fichier choisi par un OPEN_DIALOG

Un OPEN_DIALOG sert à choisir un nom de fichier.

Avec le nom du fichier choisi, on peut par exemple remplir un objet système par la commande FILE_LOAD(nom de fichier).

Exemple : on remplit un MEMO avec un fichier texte qui est choisi par un OPEN_DIALOG :

dim a$ : rem on définit une variable string

 

open_dialog 1 : rem création de l'objet système numéro 1

filter 1,"fichiers texte|*.txt": rem on se limite aux fichiers se terminant par "txt"

memo 2 : rem création de l'objet système numéro 2

a$=file_name$(1) : rem utilisation de l'open_dialog 1 pour choisir un fichier TEXTE

if a$<> "_" then file_load(a$) : rem on remplit le memo avec le fichier TEXTE choisi

Mise à jour : 5 Juin 2008