Liste exceeds bounds (Schnelle Hilfe bitte)

[JamesTKirk]

Zitat von Der schöne Günther:

Also:
for j:=3 to (Form1.zwischenspeicher.Lines.Count-1) do

Kleine Anmerkung am Rande: die Klammern sind nicht nötig.

Gruß,
Sven

[Finki]

Vielen Dank für die Antworten.
Aber ich verstehe es noch nicht, last uns des mal durch gehen am beispiel:

Memo inhalt:

Code:

1
2
0

2
lblFeld1
Labeltext eingeben
135
44
100
16

4
lblFeld2
21.08.2013
137
53
55
16

1
txtFeld1
Name
134
72
50
23

gut, das Programm fängt an mit auslesen:

Delphi-Quellcode:

    for j:=3 to Form1.zwischenspeicher.Lines.Count do  //j ist 3
    begin
    if Form1.zwischenspeicher.Lines[(j-3)*8+4]='1' then  // 3 (j)-3= 0; 0*8=0; 0+4=4

und in der 4ten Zeile steht eine 2 also geht das Programm nicht in diese if schleife!

und das geht doch so weiter und dann am Ende is es halt zu Ende. Oder nicht?

[DeddyH]

1. If-Schleife
2.

Zitat:

Delphi-Quellcode:

for j:=3 to Form1.zwischenspeicher.Lines.Count do //j ist 3
    begin
    if Form1.zwischenspeicher.Lines[(j-3)*8+4]='1' then

Nehmen wir mal an, das Memo enthält 4 Zeilen. Dann ergibt das im letzten Durchlauf 1*8+4 = 12. 12 ist aber um einiges größer als 4 (wobei die 4. Zeile auch noch den Index 3 hat, also noch einen weniger). Was soll denn dabei herauskommen?

[Finki]

1. die seite ist richtig witzig!!

2. aha so langsam dämmert mir es was das Problem ist, vielen dank!!

[Furtbichler]

Solche abenteuerlichen Schleifen macht man z.B. so

Delphi-Quellcode:

j := 0;
while j<List.Count do begin
  List[j] := irgendwas;
  List[j+1] := irgendwas anderes.
  ...
  List[j+7] := das Letzte;
  inc (j,8);
end;

Wobei hier wirklich eine INI-Datei angebracht wäre, weil dann die einzelnen Werte nicht durch eine Formel, sondern direkt durch Namen angesprochen werden.

[DeddyH]

Das knallt aber genauso, wenn die Liste weniger als 8 Elemente hat. Besser so:

Delphi-Quellcode:

j := 8;
while j <= Liste.Count do
  begin
    Liste[j - 8] := Dideldum;
    Liste[j - 7] := Düdeldü;
    ...
    Liste[j - 1] := LetzterEintrag;
    inc(j, 8);
  end;

[Finki]

Vielen dank für den Tipp, mit der INI Datei is echt ne sinnvolle sache. Vielen dank.

[Furtbichler]

Zitat von DeddyH:

Das knallt aber genauso, wenn die Liste weniger als 8 Elemente hat. Besser so:

Angeber.