Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Fehlermeldung bei begin und then (https://www.delphipraxis.net/122991-fehlermeldung-bei-begin-und-then.html)

Die Muhkuh 25. Okt 2008 16:57

Re: Fehlermeldung bei begin und then
 
Zitat:

Zitat von DeddyH
Zitat:

Delphi-Quellcode:
        For a := 1 to 4 do
        begin
          richtig:=0;
          For b := 1 to 4 do
          begin
            y:=a+b;
            gefunden:=Target.cells[r,y]=IntToStr(Spieler);

Wenn a = 4 und b = 4, wird y zu 8, da Du 8 Zeilen hast, hat die letzte den Index 7. Du liest also über die verfügbaren Zeilen hinaus. Vermutlich gibt es noch mehrere solche Stellen, ich habe beim ersten Fund aufgehört zu suchen.

Da sagt er es doch :)

foerster7892 25. Okt 2008 16:57

Re: Fehlermeldung bei begin und then
 
y:=-1

Die Muhkuh 25. Okt 2008 16:58

Re: Fehlermeldung bei begin und then
 
Und was soll uns das nun sagen?

Fakt ist, was Detlef gesagt hat. :gruebel:

foerster7892 25. Okt 2008 16:59

Re: Fehlermeldung bei begin und then
 
da ich anfangs y auf -1 setze siehe seite 1
is dann y erst 7 d.h. ich greife auf die 7. Zeile zu

DeddyH 25. Okt 2008 17:00

Re: Fehlermeldung bei begin und then
 
Du kannst auch 1000 mal y auf -1 setzen, sobald Du a und b addierst, ist y wieder 8.

Die Muhkuh 25. Okt 2008 17:01

Re: Fehlermeldung bei begin und then
 
:roll:

Wenn aber in der Schleife a = 4 und b = 4 ist, ist y = 8, da beißt die Maus kein Faden ab.

foerster7892 25. Okt 2008 17:08

Re: Fehlermeldung bei begin und then
 
aso stimmt mein Fehler :wall: :wall: :wall: :wall: :wall: :wall:
hab da irgendwie garnicht nachgedacht naja das weg und einfach y:=a+b-1;
jetzt kann ichs starten aber er ignort dsa up........... naja mal gucken was sich machen lässt thx dann nochma


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:21 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz