Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Treffnix**

Zitat von himitsu:

Also wenn schon, dann so:

Delphi-Quellcode:

			If RandTo > RandFrom Then

  Result := RandFrom + Random(RandTo - RandFrom + 1)

Else 

  Result := 0;

Ups, da haste natürlich recht

Treffnix Registriert seit: 25. Jun 2003 Ort: AC 740 Beiträge Delphi 7 Professional	#21 Re: Random zwischen zwei Zahlen 12. Nov 2003, 15:54 Zitat von himitsu: Also wenn schon, dann so: markieren Delphi-Quellcode: If RandTo > RandFrom Then Result := RandFrom + Random(RandTo - RandFrom + 1) Else Result := 0; Ups, da haste natürlich recht
	Zitat