Stocker des entiers dans Objects de TStrings

Bonjour,

Voila, dans une combo box, j'affiche une liste de nom provenant d'une table
SQLite. La table ne contient qu'un identifiant et un nom (en gros)
Je veux stocker dans Items de ma ComboBox, les Noms à afficher et les Ident, pour pouvoir les retrouver facilement.

J'ai pensé utiliser Objects pour stocker mes entiers, mais comment faire ?

Pour l'instant j'ai

Code:

---

1 2 3 4 5 6 7

Var pEntier : ^Integer;   GetMem( pEntier, SizeOf(Integer)); pEntier^ := MonIdSQLite; MaCombo.Items.AddObject( NomSQLite, TObject( pEntier));

---

Ca passe à la compile
Ensuite si je fais

Code:

---

1 2 3 4 5

Var unEntier : Integer;   unEntier := Integer( MaCombo.Objects[ n]);

---

Ca ne va pas être bon ! Je pense !

Et surtout, comment je dois fais pour libérer la mémoire (tout ces GetMem...) faut bien que je les vire non ?

Si vous avez des idées, merci

Kwasin

salut

pourquoi tu passe par un pointeur ?
si tu transtype directement (meme si c'est pas beau)
tu n'aura pas a liberer la memoire

autre solution tu creer un objet TintegeObj

@+ Phil

Bonjour,

C'était presque bon, mais c'est encore plus simple (et pour nos developpements pro, on l'utilise souvent) :

Code:

---

1 2 3 4

MaCombo.Items.AddObject( NomSQLite, Pointer( MonIdSQLite)); ... unEntier := Integer( MaCombo.Objects[ n]);

---

et évidement pas d'objects à libérer à la fin.

Bonjour,
et merci pour vos réponses.

Juste une question, si je fais comme tu dis Grafito, dans une boucle, ma valeur va changer à chaque ligne de la requete, mais ma variable sera la même, et donc Pointer( MonIDSQLite) lui ne changera pas.

Au final, tout les Objects de la combo pointeront sur le même endroit et je auront donc tous la même valeur ?

Non ??? J'ai rien compris ?

Bon, apres test, Graphito tu as entierement raison :D. Je n'en doutais pas, d'ailleurs.

Par contre j'avoue ne pas comprendre le fonctionnement de tout ça. Comment ça s'explique au final.


Pour pas que je reste comme un c.. qqun aurait-il un moment pour m'expliquer le mécanisme qui se cache derriere ?

Merci d'avance

c'est un transtypage : tu dis au compilo de prendre des vessies pour des lanternes : un integer (4 octets) pour un pointeur (4 octets) ; ça lui permet d'accepter d'affecter la valeur prise comme pointeur à un objet (propriété objects).
évidemment, à toi de transtyper en sens inverse à la récupération.
c'est limite bricolage, mais super pratique !
pour peu que tu documentes ton code, histoire que quelqu'un ne récupère pas l'objet en ayant la mauvaise idée de faire appel à une fonction qu'il n'aura donc pas...

Bonjour,

Lorsqu'on utilise un utilise une variable objet, l'information qui est affectée et passée aux instructions, fonctions et procédures qui utilisent la variable est un pointeur vers l'allocation mémoire de l'objet.

Tant qu'on ne fait pas appel à une variable interne de l'objet ou à une de ses méthodes (comme "free" par exemple), rien n'empèche d'affecter à ce pointeur n'importe quelle valeur qui tient sur 4 octets comme un entier ou une référence à un autre objet.

Merci d'avoir eclairer mes lanternes :lol:
Je suis comme ça, j'aime bien comprendre ce que je code 8-)