Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Gewinnzähler in Edit realisieren


marcon01 - Do 10.11.11 16:17
Titel: Gewinnzähler in Edit realisieren
Moderiert von user profile iconNarses: Abgetrennt von [url=http://www.delphi-forum.de/viewtopic.php?p=654027#654027]hier[/url].

Hallo,

eine Frage habe ich noch ^^.
Und zwar:
Nehmen wir an 2 Leute spielen Tic Tac Toe.
Da dieses Spiel sehr kurz ist spielt man mehrere Runden.
Also möchte ich immer wenn "X" oder "O" gewonnen hat den Wert in ein Edit ablegen.
Zum Beispiel hat "X" 8mal gewonnen und "O" 5mal also steht in edit1:8 und in edit2:5.

Wenn ich da Spiel das erste mal beende zählt er auch 1 aber er zählt nich hoch also +1 sondern bleibt immer auf 1.

Meine if-Abfrage:

Delphi-Quelltext
1:
2:
    if (Label2.Caption = 'X WINS!'then  Edit1.text := IntToStr(zahlx);
      if (Edit1.text = IntToStr(zahlx)) then Edit1.text := Edit1.text(zahlx + 1);
Ja ich weis ist übel aber learning by doing XD
Danke.

Moderiert von user profile iconNarses: Delphi-Tags hinzugefügt


thepaine91 - Do 10.11.11 16:24

An der Stelle an der du die Caption "X Wins" setzt solltest du auch gleich die Anzahl der Gewinne erhöhen und nicht später nochmal die Caption abfragen.
Dann musst du auch nur je nach dem wer gewonnen hat die Zahl der Gewinne +1 in das entsprechende Feld schreiben.


marcon01 - Di 15.11.11 09:23

Moin,

habe viel probiert aber es will nicht so ganz.
weis auch nicht genau was ich falsch mache deine idee
scheint sinnig.
Aber meine Umsetzung ist naja -.-

könntest du mir ein Ansatz geben nur ein Ansatz nicht die Lösung ^^
will lernen nicht abschreiben ;)

Solltest du was schreiben vielen dank:D

ansonsten danke für den tipp ^^


Andreas L. - Di 15.11.11 09:36


Delphi-Quelltext
1:
2:
3:
4:
5:
  if Label2.Caption = 'X WINS!' then  
  begin
    zahlx := zahlx + 1;
    Edit1.text := IntToStr(zahlx);
  end;


marcon01 - Di 15.11.11 09:57

Hallo ich nocheinmal XD,

es klappt soweit aber ich habe das Problem wie ich es schoneinmal hatte,
nämlich das er beim ersten mal gewinnen um 1 hochzählt aber er zählt nicht weiter
er bleibt also auf der 1 egal wie offt O oder X gewinnt.

muss ich das in den Button schreiben der das Spiel neustartet ?

danke.

Moderiert von user profile iconNarses: Beiträge zusammengefasst

Hat sich erledigt habe den Fehler gefunden THX :D !