Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by marabu,
8. Jun 2005
Hallo PBiggi,
denke daran, dass Math.RandomRange(iLow, iHigh) nie iHigh als Ergebnis liefert. Der Range ist ein nach oben offenes Intervall. In meinem Code war ich von einem geschlossenen Intervall ausgegangen. Wenn du also diese Funktion einsetzt, dann musst du das Supremum auf Succ(iHigh) setzen um ein vergleichbares Ergebnis zu erhalten.
Freundliche Grüße vom marabu
PS: Seit wann wird...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by marabu,
8. Jun 2005
Hallo PBiggi,
mach das besser so:
var
iStart, iEnde, iRange: integer;
begin
iStart := StrToInt(edVon);
iEnde := StrToInt(edBis);
iRange := Succ(iEnde - iStart);