Problem mit encodedate

Hendrik · Beiträge: 324

Hi!

Bei folgendem Code

Delphi-Quelltext

1:	a:=timetostr(time+encodetime(0,0, 60+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 · Verfasst: Mo 12.04.04 20:09

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

grez
msch

_________________
ist das politisch, wenn ich linksdrehenden Joghurt haben möchte?

Gast Erhaltene Danke: 1

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)

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme