Frage zur for-schleife

[niederrheiner]

Hallo an Alle,

kann mir jemand die unterschiedliche Ausgabe der beiden Codeschnipsel erklären?

Code: Alles auswählen

max := 4;
   for j := 0 to max  do    begin
 showmessage('1: j = ' + inttostr(j));
     for k1 := 0 to 9 do begin
          zeile[k1] := '0';
     end ;
 showmessage('2: j = ' + inttostr(j));
 end;

showmessage 1: bringt j = 0
showmessage 2: bringt J = 137108028 die äußere Schleife wird nach dem ersten Durchlauf verlassen

Code: Alles auswählen

max := 4;
   for j := 0 to max  do    begin
 showmessage('1: j = ' + inttostr(j));
 //    for k1 := 0 to 9 do   begin
 //         zeile[k1] := '0';
//     end ;
 showmessage('2: j = ' + inttostr(j));
 
   end;

showmessage 1: bringt j = 0
showmessage 2: bringt J = 0 und die äußere Schleife wird auch korrekt durchlaufen


Hat jemand dafür eine Erklärung?

MfG
Günter

[Hitman]

Ist "zeile" denn korrekt deklariert (array[0..9]) bzw. initialisiert (SetLength(zeile, 10))?

[niederrheiner]

das Array habe ich folgendermaßen deklariert

Code: Alles auswählen

Type
sr = array[1..8] of string;   
.
.
.
procedure ...
var
       zeile              :sr;

Habe gerade selbst den Fehler gefunden, die Länge muß 1..9 sein und nicht 1..8

Danke für Deine Hilfe

MfG
Günter

[marcov]

Eine schleife Variable ist undefiniert wenn sie in eine FOR genutzt ist.

Also J drucken nach ein for J.... ist immer falsch

[Hitman]

Eine schleife Variable ist undefiniert wenn sie in eine FOR genutzt ist.

Also J drucken nach ein for J.... ist immer falsch

Das J wurde innerhalb der Schleife ausgelesen. Das Problem war schon (wie ichs mir dachte) ein falscher Zugriff auf das Array (über die Grenzen hinaus).

[Teekeks]

Entweder muss das dann so heißen:

Code: Alles auswählen

for k1 := 1 to 9 do begin

oder dein array muss so aussehen:

Code: Alles auswählen

sr = array[0..9] of string;

[lrlr]

nächstes mal "range check" einschalten! hätte den fehler angezeigt...

[marcov]

Eine schleife Variable ist undefiniert wenn sie in eine FOR genutzt ist.

Also J drucken nach ein for J.... ist immer falsch

Das J wurde innerhalb der Schleife ausgelesen. Das Problem war schon (wie ichs mir dachte) ein falscher Zugriff auf das Array (über die Grenzen hinaus).

Mein Fehler ja.