_Fabien
Messages postés119Date d'inscriptionvendredi 17 novembre 2006StatutMembreDernière intervention28 avril 2008
-
17 avril 2008 à 17:19
NHenry
Messages postés15114Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention 4 mai 2024
-
18 avril 2008 à 13:59
Bonjour,
Voici le code puis viendra la question :
' personne = (nom, prénom, âge)
dim objPersonne1 = new personne ("NAPHAR", "Henri", 34)
dim objPersonne2 = new personne ("NAPHAR", "Henri", 34)
J'aimerais savoir si il existe une commande qui puisse vérifier si les 2 objets ont les mêmes valeurs et non les mêmes références.
j'ai bien testé 3 trucs sans y croire :
1) if objPersonne1 is objPersonne2 --> false
2) msgbox(Equals (objPersonne1,objPersonne2)) --> renvoie false
3) msgbox(ReferenceEquals (objPersonne1,objPersonne2)) --> renvoie false
Et ça c'est bien confirmé : seules les références (adresses) sont comparées
D'avance, merci.
_____________________________________________________________
Coder et coder sont 2 choses différentes. La 1ère consiste à arriver au but coûte que coûte. La 2nde est de trouver la solution de manière élégante.
Polack77
Messages postés1098Date d'inscriptionmercredi 22 mars 2006StatutMembreDernière intervention22 octobre 20191 17 avril 2008 à 17:50
Salut juste une idée en passant.
Tu pourais copier la valeur de la mémoire (en utilisant l'API copymemory) dans un type string (ATTENTION de définir la taille de ce string avant la copie) et comparer les deux string. Si elle sont égale c'est que les valeurs en mémoire sont identique.
Aucune idée si sa fonctionnera réellement mais je pense qu'il y à possibilité de faire un truc du genre
_Fabien
Messages postés119Date d'inscriptionvendredi 17 novembre 2006StatutMembreDernière intervention28 avril 2008 18 avril 2008 à 09:13
Merci vous 2. J'aurais du penser que, comme chaque objet est différent, une méthode générique n'eu été pas possible.
_____________________________________________________________
Coder et coder sont 2 choses différentes. La 1ère consiste à arriver au but coûte que coûte. La 2nde est de trouver la solution de manière élégante.