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

Web Perl Discussion :

MessageBox


Sujet :

Web Perl

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau membre du Club
    Inscrit en
    Janvier 2005
    Messages
    6
    Détails du profil
    Informations forums :
    Inscription : Janvier 2005
    Messages : 6
    Par défaut MessageBox
    Hello,

    J'aimerais affiché une simple MessageBox (pour une alerte), et je voudrais savoir avec quel module ce serait possible ! Avec Perl/Tk on peut le faire, mais il faut avoir une fenêtre principale, or je voudrais juste une messagebox

    Merci d'avance

    Deimos

  2. #2
    Membre éclairé
    Inscrit en
    Octobre 2005
    Messages
    47
    Détails du profil
    Informations forums :
    Inscription : Octobre 2005
    Messages : 47

  3. #3
    Nouveau membre du Club
    Inscrit en
    Janvier 2005
    Messages
    6
    Détails du profil
    Informations forums :
    Inscription : Janvier 2005
    Messages : 6
    Par défaut
    J'aurais préféré quelque chose qui tourne sous tous les OS : windows, unix-like, etc ...

    Merci
    Deimos

  4. #4
    Membre expérimenté
    Avatar de GLDavid
    Homme Profil pro
    Head of Service Delivery
    Inscrit en
    Janvier 2003
    Messages
    2 892
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Head of Service Delivery
    Secteur : Industrie Pharmaceutique

    Informations forums :
    Inscription : Janvier 2003
    Messages : 2 892
    Par défaut
    Salut

    J'ai trouvé ce code chez les mongueurs de Perl :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
     
     #!/usr/bin/perl -w
        ####-----------------------------------
        ### File    : dialog.pl
        ### Author  : C.Minc
        ### Purpose :
        ### Version : 1.2 1/17/2004
        ####-----------------------------------
     
        use strict;
        use Tk;
        use Tk::Dialog;
     
        # messageBox
     
        # Affiche 6 combinaisons différentes de messageBox
        # successivement en cliquant sur un bouton.
        # Le nom du bouton cliqué est retourné par la
        # méthode appelée ($reponse dans cet exemple).
     
        my @listtype = qw(AbortRetryIgnore OK OKCancel RetryCancel YesNo YesNoCancel);
        my @iconlist = qw(error info question error info question);
     
        my $mw = MainWindow->new;
     
        foreach (0 .. $#listtype) {
     
            my $reponse = $mw->messageBox(-icon => $iconlist[$_],
                    -message => "ceci est un message du type : $listtype[$_]\n".
                                " avec une icone : $iconlist[$_]",
                    -title => "messageBox $listtype[$_]",
                    -type => $listtype[$_] 
                    -default => 'OK'
            );
            print "$reponse \n"
        }
     
        MainLoop();
    Ceci pour MessageBox justement

    @++
    GLDavid
    Consultez la FAQ Perl ainsi que mes cours de Perl.
    N'oubliez pas les balises code :tagcode: ni le tag :resolu:

    Je ne répond à aucune question technique par MP.

  5. #5
    Nouveau membre du Club
    Inscrit en
    Janvier 2005
    Messages
    6
    Détails du profil
    Informations forums :
    Inscription : Janvier 2005
    Messages : 6
    Par défaut
    Merci GLDavid, le code marche nickel, mais j'avais déjà regardé dans l'article des mongueurs sur Tk !
    Cependant, comme je l'ai dit dans mon premier post :

    Avec Perl/Tk on peut le faire, mais il faut avoir une fenêtre principale, or je voudrais juste une messagebox
    Il y a la fenêtre principale en arrière plan j'aurais voulu éviter ça !

    Thx,
    Deimos

Discussions similaires

  1. Rediriger cerr<< ver un MessageBox
    Par philippe V dans le forum C++
    Réponses: 3
    Dernier message: 22/12/2004, 16h23
  2. [TP][Turbo Vision] MessageBox
    Par sovo dans le forum Turbo Pascal
    Réponses: 5
    Dernier message: 18/08/2004, 20h50
  3. MessageBox always on top
    Par Ingham dans le forum Composants VCL
    Réponses: 5
    Dernier message: 08/04/2004, 13h44
  4. [Kylix] MessageBox et autre
    Par glub dans le forum EDI
    Réponses: 4
    Dernier message: 13/02/2004, 02h34
  5. Comment masquer le MessageBox de la barre des tâches ?
    Par Coussati dans le forum Langage
    Réponses: 7
    Dernier message: 25/08/2003, 14h33

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