IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Vos contributions VB6 Discussion :

Une boite de dialogue accès fichiers images avec GDI+ [Sources]


Sujet :

Vos contributions VB6

  1. #1
    Expert éminent sénior
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 091
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 091
    Points : 16 615
    Points
    16 615
    Par défaut Une boite de dialogue accès fichiers images avec GDI+
    Une boite de dialogue accès fichiers images avec GDI+.

    Sa existe peut être, pour VB6, avec emploi de GDI+, plus rarement je pense, car je n’ai pas trouvé.

    GDI+, une DLL qui change tout par apport à GDI32, pour les même fonctionnalités, la rapidité n’est pas a comparer (50/100 fois plus rapide), les possibilités graphiques sont immenses.

    Ceci ma amener a reconstruire le Form de dialogue imagerie que j’avais l’habitude de mettre dans mes programmes.

    La grosse difficulté avec l’emploi de GDI+ s’est qu’au cours de la construction du projet, la moindre erreur dans une commande (pas spécialement lié a GDI+) nécessitant l’arrêt de l’exécution du run projet, et plantage de l’éditeur VB.

    Le Form que je propose, il suffit de l’ajouter avec son module.bas, puis dans toutes vos Forms, une ligne de commande suffit pour l’utiliser, 2 paramètres minimum, 2 autres optionnels permettes de configurer le retour et les droits liés au options du Form de navigation.
    Exemples d’appel :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Dim DialBoxImage As String
    Label1 = ""
    Select Case Index
     Case 0 'Choisir une image par défaut accès complet
        Label1.Caption = ExplorImg(Me, Picture1)
     Case 1 'Choisir une image manipulation bridée
        DialBoxImage = ExplorImg(Me, Picture1, , Brider)
        Label1.Caption = "la variable DialBoxImage = " & DialBoxImage
     Case 2 'Choisir une image, ne récupère que le chemin et le nom du fichier
        Label1.Caption = ExplorImg(Me, Picture1, , NomChemFichier)
    End Select
    Pour le reste, l’image jointe laisse entrevoir les possibilités.

    Vos critiques et essais sous VISTA seront les bien venues, mes essais et utilisations dans des .EXEs n’ont pu être faits que sous Windows 2000 et XP, je n’ai jamais eu de plantage …… mais peut être que je n’ai pas fait d’actions que, inconsciemment, je savais ne pas devoir faire, là est la difficulté du debugage.
    NavigImage.zip (17.6Ko)

  2. #2
    Membre expert
    Avatar de Delbeke
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    2 675
    Détails du profil
    Informations personnelles :
    Âge : 70
    Localisation : France

    Informations forums :
    Inscription : Juillet 2006
    Messages : 2 675
    Points : 3 696
    Points
    3 696
    Par défaut
    Je viens d'essayer (sous XP) , magique ! Aucun plantage.

    La grosse difficulté avec l’emploi de GDI+ s’est qu’au cours de la construction du projet, la moindre erreur dans une commande (pas spécialement lié a GDI+) nécessitant l’arrêt de l’exécution du run projet, et plantage de l’éditeur VB
    Je ne pense pas que ce soit du à GDI, mais plutot au sous classement de FrmNaviguImages. Perso, pour éviter ce genre de problème, j'encapsule sous forme de composant ocx.

Discussions similaires

  1. Réponses: 3
    Dernier message: 13/08/2013, 08h38
  2. Droits accès fichier image avec espace
    Par stefluc dans le forum ASP.NET
    Réponses: 0
    Dernier message: 29/11/2011, 17h48
  3. Réponses: 0
    Dernier message: 26/05/2009, 22h23
  4. ouvrir un fichier avec une boite de dialogue
    Par gdulu dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 23/03/2009, 16h46
  5. Réponses: 7
    Dernier message: 11/06/2008, 12h36

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo