Bonjour a tous,

J'ai une THashedStringList avec des elements auxquels j'associe des TObject grace a la fonction AddObject. Je fais:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
var
    compteursRecordsTxt: THashedStringList;
    compteurTemp: Integer;
    dateFixe: TDateTime;
begin
...
compteurTemp := 0;   
compteursRecordsTxt.AddObject( DateToStr( dateFixe ), TObject(
compteurTemp ));
Apres j'aimerai afficher mon objet avec:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
objet := compteursRecordsTxt.Objects[0];
int temp := int(objet);
memo1.Lines.Add( IntToStr( temp ) );
mais le "castage" de objet en int ne fonctionne pas ! Comment puis je m'y prendre? Merci