Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - Zufallszahlengenerator und Array --> Wo ist der Fehler ??
elduchte - Mo 23.06.03 12:02
Titel: Zufallszahlengenerator und Array --> Wo ist der Fehler ??
Hallo,
habe folgendes Problem:
Ich möchte 10 Zufallszahlen erzeugen und diese jeweils in einer Zeile eines Memo-Feldes ablegen bzw anzeigen.
Habe folgendes geschrieben:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
| const
Anzahl = 10;
var
Zaehler1 : integer;
Zaehler2 : integer;
Feld : array[1..Anzahl] of integer;
begin
Zaehler2 := 0;
randomize;
for Zaehler1 := 1 To Anzahl do
begin
Feld[Zaehler1] := random(100);
Memo1.Lines[Zaehler2] := IntToStr(Feld[Zaehler1]);
inc(Zaehler2);
end;
end; |
Starte ich das Programm, erscheinen nur 2 Zufallszahlen im Memo-Feld. Wo ist denn der Fehler ? Wer kann mir helfen ??
Danke
Andreas
Keldorn - Mo 23.06.03 12:39
Hallo
| Zitat: |
Memo1.Lines[Zaehler2] := IntToStr(Feld[Zaehler1]);
|
wenn dein Memo nicht schon 10 Zeilen enthält nimm
Delphi-Quelltext
1:
| Memo1.Lines.add(IntToStr(Feld[Zaehler1])); |
(Du mußt die Zeilen hinzufügen, du änderst nichtvorhandene Zeilen ab)
Mfg Frank
elduchte - Mo 23.06.03 13:40
Ohhhhh man, da hätte ich nun wirklich selber drauf kommen können...
Vielen Dank, aber warum werden die Zahlen denn erst in Zeile 2 des Memos (also oben am Rand des Memos ist eine Zeiel leer) geschrieben?
Danke
Andreas
elduchte - Mo 23.06.03 13:50
Alles klar, hab den Fehler selber gefunden. Vielen Dank für Deine Hilfe
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!