Entwickler-Ecke

Sonstiges (Delphi) - Problem mit encodedate


Hendrik - Mo 12.04.04 19:40
Titel: Problem mit encodedate
Hi!

Bei folgendem Code

Delphi-Quelltext
1:
a:=timetostr(time+encodetime(0,060+random(20)-random(20), 0));                    


bekomme ich die Meldung, dass es sich um ein ungültiges Argument für die Zeitkodierung handelt. Wo hab ich den Fehler? (a ist string)


MSCH - Mo 12.04.04 20:09

imho liefert Random integerwerte zurück, du brauchst aber Words.
vieleicht liegs daran

grez
msch


Anonymous - Mo 12.04.04 20:19

Wahrscheinlich liegt es daran, dass

60+random(20)-random(20)

öfters mal eine Zahl > 59 ausspuckt, was TryEncodeTime dann nicht mag.

Am besten ersetzt du es durch ein min(dasvonoben, 59) (uses math)