Discussion :

[aharel]

Bonjour,

J'ai un petit soucis avec le composant TComboBoxEX.
Je voudrais pouvoir ajouter ou supprimer un item d'une Combo avec image dynamiquement par le code. En gros, en fonction d'une propriété de type Boolean je dois afficher 1,2 ou 3 items avec leur icone associée.

Ci dessous la methode qui est censée mettre à jour le contenu de ma combo :

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
 
procedure TFrameSaisieCourbe.SetMode(pBouffeePossible: Boolean);
begin
  ComboBoxExTypePoint.ItemsEx.BeginUpdate;
  try
    ComboBoxExTypePoint.ItemsEx.Clear;
    ComboBoxExTypePoint.ItemsEx.AddItem('Point continu',0, 0, -1,-1, nil);
    ComboBoxExTypePoint.ItemsEx.AddItem('Fin de palier',1, 1, -1,-1, nil);
 
    if (pBouffeePossible) then
        ComboBoxExTypePoint.ItemsEx.AddItem('Bouffée',2, 2, -1,-1, nil);
 
   ComboBoxExTypePoint.ItemIndex := 0;
  finally
    ComboBoxExTypePoint.ItemsEx.EndUpdate;
  end;
end;

Ce code déclenche une exception sur le ItemsEx.Clear. Je ne comprend vraiment pas pourquoi...

[Ph. B.]

Bonjour,

1. Avez vous essayé tout simplement ComboBoxExTypePoint.Clear; ? (je dis cela par analogie avec TComboBox)
2. Quel est le message délivré par l'exception ?

[aharel]

Oui j'ai essayé le Combo.Clear mais ca ne change rien.

L'exception qui est déclenchée est une EInvalidPointer : 'Opération de pointeur incorrect'

Bonjour,

1. Avez vous essayé tout simplement ComboBoxExTypePoint.Clear; ? (je dis cela par analogie avec TComboBox)
2. Quel est le message délivré par l'exception ?

[ShaiLeTroll]

As-tu essayé sans BeginUpdate ?
Ce dernier est utile si tu souhaites ajouter beaucoup d'élement ce qui n'est pas très convivial dans une Combo
Si cela fonction sans BeginUpdate, faudrait déposer une QC !

Le Clear doit modifier le ItemIndex, selon l'aide

OnChange d'un ComboBoxEx ne se produit qu'en réponse aux actions utilisateur. La modification de la programmation de la propriété Text ne déclenche aucun événement OnChange.

Mais est-ce que ItemIndex réagit comme Text ?
Peut-être un autre évènement en conflit ?

[aharel]

Oui. J'ai essayé avec et sans le BeginUpdate. Dans le doute je l'ai laissé.
Je ne comprend vraiment pas ce qui peut provoquer l'explosion.

As-tu essayé sans BeginUpdate ?
Ce dernier est utile si tu souhaites ajouter beaucoup d'élement ce qui n'est pas très convivial dans une Combo
Si cela fonction sans BeginUpdate, faudrait déposer une QC !

Le Clear doit modifier le ItemIndex, selon l'aide

Mais est-ce que ItemIndex réagit comme Text ?
Peut-être un autre évènement en conflit ?