Forum: Object-Pascal / Delphi-Language
Delphi
by foerster7892,
25. Okt 2008
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
Forum: Object-Pascal / Delphi-Language
Delphi
by foerster7892,
25. Okt 2008
da ich anfangs y auf -1 setze siehe seite 1
is dann y erst 7 d.h. ich greife auf die 7. Zeile zu
Forum: Object-Pascal / Delphi-Language
Delphi
by foerster7892,
25. Okt 2008
ja richtig
und wann bitte greif ich auf die 8. zu???
Forum: Object-Pascal / Delphi-Language
Delphi
by foerster7892,
25. Okt 2008
ich lese nciht über die zeilen hinaus :gruebel:
mit dem ersten kontrolliere ich die spalten
mit dem zweien such ich mir jeweils eine spalte aus
und mit dem letzten kontrolliere ich die diese und die 3 folgenden auf true
wo gehe ich da über die zeilen hinaus???????????????? 1-7 nutze ich und die 0.Zeile lass ich weg
Forum: Object-Pascal / Delphi-Language
Delphi
by foerster7892,
25. Okt 2008
@helmi hab ich geändert danke für den tipp
@jfhans aber ich hab ne frage kannst du mir kurz GANZ GENAU sagen was ich in procedure zeile ändern muss (hab mir das heute erst erfragt mit dem unterprogramm auf formular beziehen(das mit dem target))
plz :roteyes:
Forum: Object-Pascal / Delphi-Language
Delphi
by foerster7892,
25. Okt 2008
thx helmi und auch allen anderen danke
procedure Kontrolle(const Target: TStringgrid);
var a, b, r, richtig :integer;
gefunden :boolean;
begin
y:=-1;
begin
For r := 1 to 6 do
Forum: Object-Pascal / Delphi-Language
Delphi
by foerster7892,
25. Okt 2008
falls das mit der Schleife im if nicht geht
könnte ich dann nen Unterprogaufruf im If machen praktisch alles ins UP packen und dann das da aufrufen???
Forum: Object-Pascal / Delphi-Language
Delphi
by foerster7892,
25. Okt 2008
begin //<-- das unterstreicht er rot
For x := 1 to 6 do
begin
For a := 1 to 4 do
begin
For b := 1 to 4 do
begin
y:=a+b;
Target.cells=IntToStr(Spieler);//<-- wenn das bei jedem Schleifendurchlauf wahr ist soll er weiter machen(Bedingung)
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by foerster7892,
25. Okt 2008
Hab mal noch ne Frage heute:
Ich bekomme hier ne ganze Reihe an Fehlermeldungen rein
Unit3.pas(49): E2029 Ausdruck erwartet, aber 'BEGIN' gefunden
Unit3.pas(50): W1019 FOR-Schleifenvariable muss eine einfache lokale Variable sein
Unit3.pas(57): E2029 ':=' erwartet, aber '=' gefunden
Unit3.pas(62): E2029 'END' erwartet, aber 'THEN' gefunden
Unit3.pas(170): W1019 FOR-Schleifenvariable...