Bonjour!
J'ai un probleme avec mon projet en cours :
procedure tpaquet.addcarte(c:tcarte);
begin
lescartes.add(c);
nbcarte:=nbcarte+1;
showmessage (inttostr(c.getnum));
showmessage(inttostr(tcarte(lescartes.Items[0]).getnum))
end;
Peu importe le nombre de carte que je rajoute, il me ressort toujours la dernière carte enregistrée! Alors que je lui demande d'afficher la 1ère carte (dernière ligne). Ca doit etre une erreur fourbe qui se cache mais au bout de 24h elle me lourde
Voici le lien pour le projet : http://tempo.phpnet.org/efzados/cards2.zip
Merci d'avance!