Discussion :

[Ayouten]

Bonjour,

Étant étudiant dans l'informatique, je suis actuellement en stage dans une entreprise, ma tâche confié dans cette entreprise est de réaliser un Installateur de logiciel via InnoSetup.

Il y a quelque jour je n'y connaissais rien à InnoSetup, et encore moin au Langage Delphi.

En faisant pas mal de recherche j'ai bien avancée sur mon projet cependant, il y a des réponses a mes question que je n'ai pas trouvées, je viens donc vers vous pour essayer de trouver les réponses .

Voici les différentes informations que je n'ai pas trouvées :



-Premiérement, j'ai réaliser des pages Personnalisées via des CustomPages. Dans c'est page, je souhaite enlever le bouton suivant, mais que sur c'est page ! J'ai trouver une solution mais cette solution s'applique pour toutes les pages, d’où ma question : Est-il possible de griser ou bien supprimer les boutons suivants dans des CustomPages et si oui Comment ?

-Ensuite, Dans l'un de mes CustomPages, j'ai Crées 2 Boutons (Oui et Non).Sur cette page, je pose une question a l'utilisateur lui demandant de sélectionner l'un des deux boutons si il souhaites importer le fichier. Le bouton (Oui) a pour fonction d'importer un fichier puis d'ensuite passer a la page suivante et le bouton (non) de passer a la page suivantes. J'ai réussi a trouver une solution pour passer a la page suivante, mais je n'ai trouver aucune solution pour télécharger le fichier !

Voici ma question : Comment dois-je faire dans une Procédure ButtonClick(Sender : Object) pour importer le fichier souhaité .

-Enfin, Je n'ai pas trouver d'exemples pour pouvoir redimensionner les CustomPages, Est-il possible de redimensionner les CustomPages ?


Voila, J’espère que mes question sont claire, Merci d'avoir lu mes différentes questions et d'y avoir peut être répondue

bonne fin de journée
Cordialement

Ayouten

[Andnotor]

C'est clairement pas la bonne approche.
Tu devrais avoir une case à cocher [Tasks] et lancer le téléchargement lorsque l'installation proprement dite démarre.

Il n'y a rien en natif pour le téléchargement mais quelques AddOns existent (pas testé).

[Ayouten]

Bonjour,

Tout d'abord, désolé pour l'attente et merci de votre réponse, je vais modifier cela

Ensuite, j'avais poser une autre petite question concernant le bouton suivant, si il est possible de le griser ou bien de le rendre inutilisable sur une CustomPage
Je n'ai toujours pas trouver le moyen de Supprimer ce bouton

Auriez-vous une solution a ce problème ?


Bonne fin de journée
Cordialement
Ayouten

[Andnotor]

Quelque chose comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure CurPageChanged(CurPageID: Integer);
begin
  if PageFromID(CurPageID) = MyCustomPage then
    Wizardform.NextButton.Enabled := FALSE;
end;

[Ayouten]

Bonsoir,

Décidément,Je suis pas très doué
Pourriez vous me dire a quoi correspond MycustomPage ?

Voici ma page perso ou je souhaite rendre le bouton inutilisable si besoin :

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
39
40
41
42
 
//============================================================= 
 //
 //=================={Page D'installation des MOS}==============
 //
 //=============================================================
 
  begin  
 
 
  PageMOS := CreateCustomPage(wpInfoAfter, ExpandConstant('{cm:Mess43}'),'');
 
 
  varLabel3 := TNewStaticText.Create(PageMOS);
  varLabel3.Width := ScaleX(75);
  varLabel3.Height := ScaleY(23);
  varLabel3.Parent := PageMOS.Surface;
  varLabel3.Caption := ExpandConstant('{cm:Mess51}');
 
 
  No1Button := TNewButton.Create(PageMOS);
  No1Button.Top := VarLabel3.Height+15;
  No1Button.Width := ScaleX(75);
  No1Button.Height := ScaleY(23);
  No1Button.Caption := ExpandConstant('{cm:Mess53}');
  No1Button.OnClick := @ButtonOnClick1;
  No1Button.Parent := PageMOS.Surface;
 
  Yes1Button := TNewButton.Create(PageMOS);
  Yes1Button.Top := VarLabel3.Height + 15 ;
  Yes1Button.Left := No1Button.Width + No1Button.Height + ScaleY(8);
  Yes1Button.Parent := PageMOS.Surface
  Yes1Button.Width := ScaleX(75);
  Yes1Button.Height := ScaleY(23);
  Yes1Button.Caption := ExpandConstant('{cm:Mess52}');
  Yes1Button.OnClick := @ButtonOnClick2;
 
 
 
 
 
 end;

Encore désolé pour les questions
Cordialement

[Andnotor]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure CurPageChanged(CurPageID: Integer);
begin
  if PageFromID(CurPageID) = PageMOS then
    Wizardform.NextButton.Enabled := FALSE;
end;

[Ayouten]

Merci Beaucoup a toi pour ton aide

Cordialement
Ayouten