Morgen Leute
also mein src
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
Randomize;
for i := 1 to strtoint(edAnzahl.text) do
begin
Listbox1.items.add(random(strtoint(edBis)+strtoint(EdVon)));
end;
end;
so und jetzt das problem...
in der zeile
Zitat:
Listbox1.items.add(random(strtoint(edBis)+strtoint (EdVon)));
wird eine zufallszahl berechnet edBis is die anfangszahl und Edvon is die endzahl also von wo bis wo die zufallszahlen gehn
wenn edBis = 1 ist funktioniert das auch ganz gut aber wenn die zahl über 1 ist kommen werte von 1 und auch werte die über der endzahl heraus .. was is daran flassch oder wie kann ich das besser machen ??
MfG. PBiggi