Einzelnen Beitrag anzeigen

Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#2

Re: IncMinute über 00:00 Uhr ??

  Alt 12. Jun 2005, 08:18
Hallo Matthias,

Incminute arbeitet schon richtig, du hast danach -20 min in deinem TTime stehen.

Allerdings schnippelt decodetime das Vorzeichen offensichtlich weg, und gibt dir (+) 20 min. aus.

Lösung:

Delphi-Quellcode:
var
   bookDate : TTime;
   myHH, myMM, mySec, myMilli : Word;
begin
  bookDate := StrToDateTime('00:10') + 2;
  bookDate := IncMinute(bookDate, -30);
  DecodeTime(bookDate, myHH, myMM, mySec, myMilli);

  showmessage (inttostr(myHH) + 'Std' + #13#10 + inttostr (myMM) + 'min' + #13#10 + inttostr (mySec) + 'sek' + #13#10 + inttostr (myMilli) + 'ms' + #13#10);
end;
Wenn du vorher ein, zwei Tage (egal) addierst, kommst du nicht in den negativen Bereich
  Mit Zitat antworten Zitat