WIDGETS GAMBAS
LOGICIELS GAMBAS 3
TUTORIELS
VISITES

   visiteurs

   visiteurs en ligne

Où ça, qui ça?
Utiliser les fichiers - Boite de dialogue ouvrir
selectionner un fichier png

Nous allons ouvrir une boite de dialogue par un bouton pourselectionner un ficher PNG uniquement.
Le nom et le chemin nous seront retouné dans une textbox.
Voici le code :

PUBLIC SUB Png_Click()
  Dialog.Filter = FileFilter(TRUE)
  Dialog.Path = User.home
  Dialog.Title = "S?lection du fichier png"
  IF Dialog.OpenFile() THEN RETURN
  Fpng.Text = Dialog.Path
CATCH
  Message.Warning(ERROR.Text)
END

PRIVATE FUNCTION FileFilter(OPTIONAL All AS Boolean = FALSE) AS String[]
  DIM filter AS NEW String[]
  filter.Add("*.png")
  filter.Add("Fichiers png")

  RETURN filter
END



Date de création : 25/07/2009 @ 22:55
Dernière modification : 02/10/2009 @ 21:18
Catégorie : Utiliser les fichiers
Page lue 3268 fois


Imprimer l'article Imprimer l'article


react.gifRéactions à cet article

Personne n'a encore laissé de commentaire.
Soyez donc le premier !


ACCES RAPIDE
RECHERCHE




LOGICIELS GAMBAS 2
LES INSTRUCTIONS
LES COMPOSANTS
Divers

^ Haut ^