 |
 |
 |
 |
 |
|
Sprachen und Entwicklungsumgebungen
Object-Pascal / Delphi-Language
Delphi Problem mit Zufalls zahlen!
Antwort
|
|
Registriert seit: 11. Jan 2005 Ort: Bochum 50 Beiträge Delphi 2006 Architect |
#1
Problem mit Zufalls zahlen!
5. Mär 2005, 13:59
|
Zitat
|
Registriert seit: 29. Mai 2002 37.621 Beiträge Delphi 2006 Professional |
#2
Re: Problem mit Zufalls zahlen!
5. Mär 2005, 14:01
Hast du auch irgendwo mal
 Randomize aufgerufen? Edit hast du. Aber du darfst es nur einmal aufrufen, am besten in OnCreate Ereignis der Form.
Michael
Ein Teil meines Codes würde euch verunsichern. |
|
Zitat
|
Registriert seit: 12. Dez 2004 Ort: Wien, Österriech 893 Beiträge Delphi 6 Enterprise |
#3
Re: Problem mit Zufalls zahlen!
5. Mär 2005, 14:03
Delphi-Quellcode:
Variable i ist nach der Schleife undeffiniert. (Delphi ist nicht halt C
for i:=0 to random(Q.Count) do
Q.Push(Q.Pop); LogForm.APPEND('Tmaze.RandomTQueueItem: Zufälliges element:'+inttostr(i)+' aus:'+inttostr(Q.Count),0);  )[EDIT] Und warscheinlich wegen Compiler - Optimierung läuft i von Random(Q.Count) DOWNTO 0 .
Katura Haris
Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen. |
|
Zitat
|
Registriert seit: 19. Jan 2005 Ort: Elstra 764 Beiträge Delphi 7 Enterprise |
#4
Re: Problem mit Zufalls zahlen!
5. Mär 2005, 14:08
Zitat von sniper_w:
Delphi-Quellcode:
Variable i ist nach der Schleife undeffiniert. (Delphi ist nicht halt C
for i:=0 to random(Q.Count) do
Q.Push(Q.Pop); LogForm.APPEND('Tmaze.RandomTQueueItem: Zufälliges element:'+inttostr(i)+' aus:'+inttostr(Q.Count),0); )MfG Binärbaum There are exactly 10 kinds of people: those who understand binary, and those who don't.
--- "Software reift beim Kunden. Bei Hardware ist es anders: Hardware fault beim Kunden." - Rainer G. Spallek |
|
Zitat
|
|
Registriert seit: 11. Jan 2005 Ort: Bochum 50 Beiträge Delphi 2006 Architect |
#5
Re: Problem mit Zufalls zahlen!
5. Mär 2005, 14:11
|
|
Zitat
|
|
Registriert seit: 29. Mai 2002 37.621 Beiträge Delphi 2006 Professional |
#6
Re: Problem mit Zufalls zahlen!
5. Mär 2005, 14:19
Zitat von Binärbaum:
Zitat von sniper_w:
Delphi-Quellcode:
Variable i ist nach der Schleife undeffiniert. (Delphi ist nicht halt C
for i:=0 to random(Q.Count) do
Q.Push(Q.Pop); LogForm.APPEND('Tmaze.RandomTQueueItem: Zufälliges element:'+inttostr(i)+' aus:'+inttostr(Q.Count),0); )
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i : Integer; begin for i := 0 to 9 do begin Listbox1.Items.Add(IntToStr(i)); end; ShowMessage(IntToStr(i)); end;
Zitat:
[Warning] Unit1.pas(35): FOR-Loop variable 'i' may be undefined after loop
Michael
Ein Teil meines Codes würde euch verunsichern. |
|
Zitat
|
ForumregelnEs ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.
BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus. Trackbacks are an
Pingbacks are an
Refbacks are aus
|
|
Linear-Darstellung
