if TimeToStr(StrToInt(listview2.Items.Item[i].SubItems[0]) - (StrtoInt(ComboBox1.Text) div (1440))) = TimeToStr(Time) then begin
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionif TimeToStr(StrToTime(listview2.Items.Item[i].SubItems[0])-(StrToInt(ComboBox1.Text) / 1440)) = TimeToStr(Time) thenMais il va peut-être falloir aller plus loin avec du DecodeTime, DecodeDate, IncMinute, DateUtils etc...c'est pour cela que nous donner le contenu à toute son importance ! Car je pense que le code actuel ne correspond pas à ce que tu souhaites faire et au résultat que tu veux obtenir...