Discussion :

[WDKyle]

Bonjour,

Je suis entrain de créer une installation pour un logiciel que je développe et je bloque sur un point : Delphi.

Oui car Inno setup fonctionne avec du code en Delphi et ce n'est pas vraiment mon langage habituel.

Et j'ai beau farfouiller sur le web, je ne trouve rien pour pouvoir récupérer la valeur d'un radiobutton pour savoir si il est coché ou non car j'aimerais pouvoir faire une boucle ensuite en fonction de quel radiobutton est coché.

Pouvez-vous m'aider svp ?

Merci, cordialement.

[ouiouioui]

Bonjour, Avec un peu de code c'est plus facile et surtout savoir quel radio bouton, À quel endroit tu veux exécuté ta boucle.

Lorsqu'un radio bouton est coché la valeur de sa propriété Checked est mise a True;

Donc Si ton radio bouton s'appelle test tu peux tester si il est coché avec:

Code :

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

1
2
3
4
if test.Checked then
begin
// Le bouton test avec coché
end;

[WDKyle]

Merci pour ton aide ouiouioui, je vais essayer ! sinon mon code est celui-ci :

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
Page := CreateCustomPage(wpSelectDir, 'Type d''installation', 'Choisissez le poste à installer');
 
  CheckListBox := TNewCheckListBox.Create(Page);
  CheckListBox.Width := Page.SurfaceWidth;
  CheckListBox.Height := ScaleY(97);
  CheckListBox.MinItemHeight := WizardForm.TasksList.MinItemHeight;
  CheckListBox.Flat := True;
  CheckListBox.Parent := Page.Surface;
  CheckListBox.ShowLines := False;
  CheckListBox.WantTabs := True;
  CheckListBox.BorderStyle := bsNone;
  CheckListBox.ParentColor := True;
  CheckListBox.AddRadioButton('Installation du poste ON AIR', '', 0, True, True, nil);
  CheckListBox.AddRadioButton('Installation du poste STANDARD', '', 0, False, True, nil);
  CheckListBox.AddRadioButton('Installation du poste GESTION', '', 0, False, True, nil);

Mais je ne vois pas vraiment quel est le nom de mes radiobutton ...

[ouiouioui]

La tu utilise une fonction qui permet de créer une page facilement, tu ne crées pas toi même les checkbox mais une page en contenant

Chaque fonction AddCheckBox renvoie un numéro qui est celui du checkbox créé

Pour accéder à leur propriété checked, il faut faire comme ça:

Code :

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

1
2
3
4
if CheckListBox[I].Checked then
begin
// la checkbox ou i est son numéro est coché
end;

là tu ajoutes trois choix, I dois être 0 1 2
je ne suis pas sûr que ça commence à zéro mais je crois

[WDKyle]

j'ai essayer avec CheckListBox[0].Checked

mais il me renvoi une erreur :

period('.')expected

[ThierryAIM]

Si je comprends bien ton besoin, tu souhaites faire 3 types d'installations différentes.
C'est aussi possible de le faire sans code

Code InnoSetup :

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

1
2
3
4
5
6
7
8
9
[Types]
Name: onair; Description: Installation du poste ON AIR
Name: standard;  Description: Installation du poste STANDARD
Name: gestion;  Description: Installation du poste GESTION
 
[Components]
Name: program; Description: Fichiers programme; Types: onair standard gestion ; Flags: fixed
Name: complements; Description: Complements; Types: onair
....

puis pour chaque fichier, utilises Components: et le nom associé

Sinon, moi je créerai plutôt une TInputOptionWizardPage

[WDKyle]

TInputOptionWizardPage ?

[ouiouioui]

j'ai fait une petite erreur:

Code :

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

1
2
3
4
if CheckListBox.Checked[i] then
begin
// la checkbox ou i est son numéro est coché
end;