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

Outils Delphi Discussion :

[Inno setup]Message temporaire


Sujet :

Outils Delphi

  1. #1
    Membre émérite
    Profil pro
    Inscrit en
    Juin 2005
    Messages
    572
    Détails du profil
    Informations personnelles :
    Âge : 43
    Localisation : France, Haute Vienne (Limousin)

    Informations forums :
    Inscription : Juin 2005
    Messages : 572
    Par défaut [Inno setup]Message temporaire
    Bonjour à tous,

    Je reviens à la charge avec mon installation personnalisée.
    J'ai à peu près réussi à faire tout ce que je désirais, soit en résolvant soit en contournant j'avoue, et il me reste un petit détail à régler.

    Au moment de l'installation, je fais une copie préalable de plusieurs répertoires énormes.
    Ce traitement peut durer un certain temps (plusieurs minutes).
    J'aimerais donc juste avant l'installation, voir figurer un message temporaire à l'utilisateur, lui demandant de patienter pendant la copie provisoire.

    J'ai tenté d'insérer une image temporairement sur le formulaire en cours, mais elle s'insère visiblement en arrière plan.
    Y'aurait il une solution pour la forcer en avant plan ?

    Je vous laisse le code pour vous aider à mieux comprendre :

    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
     
    procedure CurStepChanged(CurStep: TSetupStep);
    var imagePatientez : TBitmapImage;
    var nomImagePatientez : String;
    begin
      if CurStep = ssInstall then
      begin
     
         nomImagePatientez := ExpandConstant('{tmp}\patientez.bmp');
         ExtractTemporaryFile(ExtractFileName(nomImagePatientez));
     
         imagePatientez := TBitmapImage.Create(WizardForm);
         imagePatientez.AutoSize := false;
         imagePatientez.Top := 50;
         imagePatientez.Left := 110;
         imagePatientez.width := WizardForm.width ;
         imagePatientez.Height := WizardForm.Height ;
     
         imagePatientez.Bitmap.LoadFromFile(nomImagePatientez);
         imagePatientez.Parent := WizardForm;
     
         //Ici aura lieu mon traitement
         msgbox('test', mbConfirmation,MB_Ok);
     
         imagePatientez.Hide;
     
      end;
      if CurStep = ssPostInstall then
      begin
        finishedInstall := True;
      end;
    end;
    Merci d'avance.

  2. #2
    Membre Expert
    Avatar de Droïde Système7
    Homme Profil pro
    Inscrit en
    Septembre 2003
    Messages
    2 288
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Septembre 2003
    Messages : 2 288
    Par défaut
    Bonsoir,

    Plus facilement, pourquoi ne pas lancer, toujours en [Code] un .exe qui lancerait un ShowMessage ou équivalent ?

    @+

  3. #3
    Membre émérite
    Profil pro
    Inscrit en
    Juin 2005
    Messages
    572
    Détails du profil
    Informations personnelles :
    Âge : 43
    Localisation : France, Haute Vienne (Limousin)

    Informations forums :
    Inscription : Juin 2005
    Messages : 572
    Par défaut
    J'ai trouvé une solution alternative : passer par une page custom précédemment pour la copie, comprenant une progressbar, en activant le bouton suivant à la fin de celle-ci.

    C'est un peu plus lourd pour l'utilisateur, qui doit subir en quelque sorte deux install, mais ça a l'avantage de me permettre de vérifier la bonne copie des fichiers, et de bloquer à tout moment.

    J'ai aussi vu d'après les exemples que l'on pouvait créer une page prédéfinie de progressbar, qui passait directement à la page suivante une fois fini, mais je n'ai pas réussi à l'appeler juste avant la page d'installation à proprement parler.

    Merci pour ta réponse en tout cas, je garde cette alternative sous le coude

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 2
    Dernier message: 12/03/2014, 09h48
  2. [inno setup] problème custom message
    Par andykimpe dans le forum Outils
    Réponses: 1
    Dernier message: 10/01/2014, 07h56
  3. [Inno Setup] Message Exit Setup personalisé
    Par Rahim-US dans le forum Outils
    Réponses: 1
    Dernier message: 31/10/2009, 15h35
  4. [Inno Setup] Message de bienvenue
    Par lovedesitaliens dans le forum Outils
    Réponses: 2
    Dernier message: 17/10/2008, 09h26
  5. Bde Inno Setup et Test
    Par Fxg dans le forum Bases de données
    Réponses: 2
    Dernier message: 20/07/2004, 14h35

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