Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Kleines Problem bei Tic Tac Toe.... (https://www.delphipraxis.net/105129-kleines-problem-bei-tic-tac-toe.html)

kujin1000 16. Dez 2007 22:04


Kleines Problem bei Tic Tac Toe....
 
Hi leute nur ne kleine frage, wie kann ich das lösen...
Problem ist nur dass mein Programm in der IF Schleife 2 Sachen macht und ich will, dass mein Programm nur eine Sache macht. Z.B. wenn a[3] true ist soll er das alles schön machen aber auch c[1] auf true setzen, leider geht delphi sequentiell durch und sieht dann das c[1] dann auch auf true ist und macht die zweite sache...
Ich will aber die Variable behalten und nicht ändern...
Danke
Delphi-Quellcode:
if a[3] = true then  //a3
           begin
           form1.button9.visible := false;
           form1.label9.caption := 'O';
           [b]c[1] := true;[/b]
           XoO := 6;
           end;
           ....
           ....
if [b]c[1] = true[/b] then
           begin
           form1.button1.visible := false;
           form1.label1.caption := 'O';
           a[3] := true;
           XoO := 6;
           end;

Dax 16. Dez 2007 22:07

Re: Kleines Problem bei Tic Tac Toe....
 
Erstens: nie auf foo = true oder foo = false vergleichen, "foo" und "not foo" sind das selbe und viel logischer.

Zweitens: if-else-Kaskaden:
Delphi-Quellcode:
if a[3] then begin
  machwas
end else if c[1] then begin
  mach was anderes
end ...

Jelly 16. Dez 2007 22:08

Re: Kleines Problem bei Tic Tac Toe....
 
So wie du deine Bedingung testest, ist es ja klar, dass auch die 2. Bedingung greift... Aber häng doch mal vor das if in Zeile 10 noch ein else ein, und es sollte klappen. :zwinker:

kujin1000 16. Dez 2007 22:10

Re: Kleines Problem bei Tic Tac Toe....
 
Danke :)

Muetze1 16. Dez 2007 23:15

Re: Kleines Problem bei Tic Tac Toe....
 
Zitat:

Zitat von kujin1000
IF Schleife

Damit dieser Fehler endlich mal ein Ende hat: Es gibt keine If Schleifen, das sind If Abfragen bzw. Einfach-Verzweigungen!


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:22 Uhr.

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-2025 by Thomas Breitkreuz