bonjour a tous,

j'utilise des THashedStringList. Voici mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
var
    compteurTemp: Integer;
    compteurRecordeTxt: THashedStringList;
    dateFixe: TDateTime;
    idx: Integer;
begin   
    compteurTemp := 5;
    compteursRecordsTxt.Add( DateToStr( dateFixe ) );
    compteursRecordsTxt.AddObject( DateToStr( dateFixe ), Pointer( compteurTemp ) );
   idx := compteursRecordsTxt.IndexOf( DateToStr( dateFixe ) );
   ShowMessage( IntToStr( Integer(compteursRecordsTxt.Objects[idx]) ) )
Or il me renvoit 0 au lieu de 5. Merci de votre aide.