Hi,
Zitat von
Kompon Ente:
Hier mein Code:
Delphi-Quellcode:
czeit := now;
ShowMessage(DateTimeToStr(czeit));
czeit := EncodeTime(0, 0, ((stop - start) div 1000), ((stop - start) mod 1000));
DateTimeToSystemTime((izeit + czeit), k);
DecodeTime(izeit, k.wHour, k.wMinute, k.wSecond, k.wMilliseconds);
DecodeDate(izeit, k.wYear, k.wMonth, k.wDay);
k.wSecond := k.wSecond - ((stop + start) mod 1000), ((stop + start) div 1000);
Die letzte Zeile funzt noch net so ganz. Was könnte falsch sein?
Ich kann leider absolut nicht erkennen, was Du da machen willst, aber ich versuchs!
Daher nun mal meine Fragen:
Du hast mit DateTimeToSystemTime Deine SystemTime k berechnet - warum änderst Du die danach wieder
Zur letzten Zeile, vereinfacht steht da "x := x - y, z;" - Wie soll das funktionieren? Was soll das werden
Gruß
Stephan
Stephan B.
Wer andern eine Grube gräbt ist Bauarbeiter!
Wer im Glashaus sitzt, sollte sich lieber im Dunkeln ausziehen!
Außerdem dieser Satz kein Verb...