Discussion :

[fab56]

Bonjour,

alors voilà je liste des capteurs de température dans un tlistview en mode vsReport. Pour ajouter un capteur je fais :

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
  ListCapteur.Items.Clear;
  case Grandeur of
    Temperature: begin
 
       AjouterCapteur('Diode Zener', 'LM335', 'Linéaire');
       AjouterCapteur('Diode', '1N4148', 'Linéaire');
    end;
 
[...]
 
  procedure AjouterCapteur(pType, pRef, pLin: String);
  begin
    ListCapteur.ReadOnly:=False;
    try
      with ListCapteur.Items.Add do
      begin
        Caption:=pType;
        SubItems.Add(pRef);
        SubItems.Add(pLin);
      end;
      ListCapteur.Update;
    finally
      ListCapteur.ReadOnly:=True;
    end;
  end;

Mais je rencontre des bugs, par exemple suivant le nombre de capteurs que j ajoute, il n'y en a que certain qui sont pris en cmpte. Avez-vous une idée d'où ca peut venir ?

Merci d'avance.

[Pedro]

Salut
As-tu vérifié que chaque capteur déclenche bien la procédure AjouterCapteur en mettant des breakpoints dans celle-ci?

[Clorish]

Petite question : Basculer la proprietee ReadOnly a false le temps de l'ajout est elle necessaire ?
Normalement c'est une proprietee qui affecte l'edition via l'interface graphique, et non par le code .....
Du moins c'est le cas pour tous les autres objets VCL qui ont une telle property

[fab56]

Petite question : Basculer la proprietee ReadOnly a false le temps de l'ajout est elle necessaire ?
Normalement c'est une proprietee qui affecte l'edition via l'interface graphique, et non par le code .....
Du moins c'est le cas pour tous les autres objets VCL qui ont une telle property

Tu as raison, j'ai retiré ça et maintenant ça marche. Mais j'avais mis ça au début parce que j'avais eu des problèmes d'access violation quand on modifiait à l'execution avec readonly à true

Merci pour ton aide.