Discussion :

[Anselme45]

Bonjour,

La rétrocompatibilité est vraiment un gros mot chez Embarcadero!!!!!!!!!!!!!!

Une app Android avec des TListBox développée sous Delphi10.3.3 qu'il faut compiler sous Delphi10.4.2

Résultat?

La compilation se passe bien mais...

La totalité des TListBox de l'app reste "vide", plus rien ne s'affiche!


Même résultat avec une compilation sous Delphi 11.2!

J'ajoute des lignes à ma liste à l'aide de la proc suivante:

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
procedure TForm1.AddListBoxItem(myListBox:TListBox;Definition, Qty1, Qty2:string;BackColor:integer);
var
 ListBoxItem : TListBoxItem;
 ItemText : TText;
 
begin
 myListBox.BeginUpdate;
 
 try
  ListBoxItem:= TListBoxItem.Create(myListBox);
  ListBoxItem.Parent:= myListBox;
  ListBoxItem.Height:=30;
 
 
  if BackColor=0 then
   begin
    if Odd(myListBox.Items.count) then ListBoxItem.StyleLookup:='ListBoxMapStyle'
     else
      ListBoxItem.StyleLookup:='ListBoxMapStyleKhaki';
    end
  else
   if BackColor=1 then ListBoxItem.StyleLookup := 'ListBoxMapStyleTitle';
 
 
  ListBoxItem.ApplyStyleLookup;
 
  ListBoxItem.StylesData['Reference.text']:=Definition;
  ListBoxItem.StylesData['Qty1.text']:=Qty1;
  ListBoxItem.StylesData['Qty2.text']:=Qty2;
 
 finally
  ListBoxitem.Free;
  myListBox.EndUpdate;
 end;

Est-ce que quelqu'un a déjà été confronté à ce problème?

Est-ce que quelqu'un à une solution à proposer?

Merci d'avance

[Paul TOTH]

ListBoxitem.Free; ???

Patrick, rappelle moi dans quelle version ARC a été supprimé ? que Free est redevenu un vrai Free ?

[anapurna]

Salut

Comme le dit Paul, la destruction de ton objet n'a rien à faire ici à moins que tu crées une copie de celui-ci dans l'autre, ce qui n'est pas le cas ici.

Lors de la destruction, celui-ci sera automatiquement libéré car le Owner dans le Create est renseigné, ce qui met ce composant dans une liste qui sera détruite à la libération du conteneur.

[pprem]

ListBoxitem.Free; ???

Patrick, rappelle moi dans quelle version ARC a été supprimé ? que Free est redevenu un vrai Free ?

En 10.3 Rio.

[pprem]

salut

comme le dit Paul la destruction de ton objet n'a rien à faire ici
à moins que tu crées une copie de celui-ci dans l'autre ce qui n'est pas le cas ici

lors de la destruction celui-ci sera automatiquement liberé car le Owner dans le Create est renseigné
ce qui met ce composant dans une liste qui sera détruite à la libération du conteneur

Ce qui est étrange, c'est que ce code ait fonctionné avant.

D'une manière générale, tout composant FMX auquel on attache des éléments prend la propriété du composant et s'occupera de sa libération. Il ne faut surtout pas la faire nous-même.

[Anselme45]

Vous êtes bien gentil avec vos conseils sur le .free ou pas!

Si je croise le mec à l'origine de ce code, je n'hésiterai pas un instant à lui tirer les oreilles et à le remettre sur le droit chemin!

Mais franchement là, je suis pas sûr que cela règle mon problème!

Par acquis de conscience, je vais virer ce .free et recompiler le tout, mais cela m'étonnerait beaucoup que soudainement les TListbox se mettent à fonctionner... Pour les miracles, c'est habituellement Lourdes et pas le bureau d'un développeur Delphi

Je ferai part ici du résultat de l'opération... Miracle ou pas? Le suspense est intenable...

[Paul TOTH]

homme de peu de foi, pourquoi as-tu douté ?
Matthieu 14:22-33

[Anselme45]

Chapeau bas, Messieurs!

Je vais de ce pas contacter le Vatican... Il y a une nouvelle destination concurrente de Lourdes... Mon bureau!!!!!!!!!!!!!!!!!!!!!!!!

Plus de .free et les TListBox fonctionnent!

Question qui restera sans réponse: Pourquoi est-ce que cela fonctionnait avec Delphi Rio 10.3.3? Je suis trop content pour que cette question m'empêche de bien dormir ce soir.

Merci encore pour votre aide à tous.

[ShaiLeTroll]

Pourtant la réponse a été donné, le temps que l'ARC disparaisse de tous les compilateurs pour FMX, cela a commencé en 10.3 pour Linux (Comptage de références mémoire dans le compilateur Linux) et continuer en 10.4 pour Android et iOS : Gestion de la mémoire unifiée

Le Free ne fait rien en cas d'ARC, c'est juste décoratif ... suffit de lire le code, la directive AUTOREFCOUNT vide complétement le code de sa substance ... la directive a du changer de nom je suis encore en 10.0 et en VCL ... pourtant je connais l'hérésie de l'ARC introduite pour le support de multi-plateforme ... on ne parle même pas du délire des chaines 0-based.

l'affectation à nil décremente le compteur de référence (comme on en a l'habitude pour un TInterfacedObject par exemple) ... tout cela pouvait rendre difficile de partager du code non OS dépendant entre VCL et FMX, uniquement à base de la RTL, par exemple, des fonctions de manipulation de chaine.

[Anselme45]

Effectivement ShaiLeTroll, je viens de tomber sur un blog qu'il parle d'un changement intervenu à partir de Delphi Sydney 10.4... Cela expliquerait pourquoi le code fonctionnait encore sur Delphi Rio...

[pprem]

Ce qui est étrange, c'est que ce code ait fonctionné avant.

Et c'est là que je réalise que ma mémoire est vraiment trop sélective et se met à jour au fil des versions en effaçant l'historique pour ne pas s'encombrer. Effectivement .Free en FMX ne faisait rien selon les plateformes avant la 10.4 Sydney.