AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz
Thema durchsuchen
Ansicht
Themen-Optionen

tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

Ein Thema von biby90 · begonnen am 22. Aug 2011 · letzter Beitrag vom 31. Aug 2011
Thema geschlossen
biby90
(Gast)

n/a Beiträge
 
#1

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:04
Zitat:
Das ist der Code der hinter deinem Formular steckt
joa, hab ich mir gedacht.... wusste garnicht, dass es das gibt
 
biby90
(Gast)

n/a Beiträge
 
#2

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:08
Delphi-Quellcode:
procedure TForm1.MakeArray;
begin
 GBuffer[1] := Label1.Caption;
 GBuffer[2] := Label2.Caption;
 GBuffer[3] := Label3.Caption;
 GBuffer[4] := Label4.Caption;
 GBuffer[5] := Label5.Caption;
 GBuffer[6] := Label6.Caption;
 GBuffer[7] := Label7.Caption;
 GBuffer[8] := Label8.Caption;
 GBuffer[9] := Label9.Caption;
end;
Das kann so bleiben, ja?
Ich starte mal...
 
biby90
(Gast)

n/a Beiträge
 
#3

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:10

Es Fukntioniert!!!!!!!
Jetzt noch mal was ganz kleines dass seit ihr mich los^^

wenn ich das dritte Feld Klicke um zu gewinnen, dann sagt er schon gewonnen obwohl da noch kein x oder O drin steht...!?
 
Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#4

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:12
Hallo,

Dann schreib mal in den OnClicks:

Delphi-Quellcode:
 if IsFieldEmpty(Label2.Caption) then
 begin
    Label2.Caption := WriteToField(GPlayer);
    Label2.Repaint; // oder: Application.ProcessMessages
    MakeArray;
    // Weiterer Code
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
 
biby90
(Gast)

n/a Beiträge
 
#5

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:13
Wofür steht das Repaint?
 
Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#6

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:18
Das Label wird dann neu gezeichnet.

Wenn du die Caption des Labels änderst, dann wird eine Windows-Message versandt, dass das Label sich neuzeichnen soll, weil sich sein Aussehen geändert hat.
Es kann aber sein, dass die Message erst ankommt NACHDEM du angezeigt hast, dass Spieler X gewonnen hat. Also zeichnest du das Label mit Repaint manuell neu, damit es auf jeden Fall noch das O oder X anzeigt bevor die Gewinn-Meldung kommt.
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
 
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.666 Beiträge
 
Delphi 12 Athens
 
#7

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:13
Dann setz einen Haltepunkt in die OnClick-Routine des Labels und führe dann schrittweise aus. Irgendeine Bedingung scheint ja zuzutreffen, die das nicht sollte.

@NG: Caption ist doch bereits gesetzt, ich glaube kaum, dass das am Zeichnen liegt.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
 
biby90
(Gast)

n/a Beiträge
 
#8

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:16
Also es funktioniert ja so wie es soll.
Wenn ich jetzt in einer Reihe schon 2 X stehen habe und die mit einem zum Gewinn vervollständige dann sagt er ich habe gewonnen... soll er ja auch aber er müsste ja wenigstens voher noch ein X schreiben damit manns auch sehen kann
 
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.666 Beiträge
 
Delphi 12 Athens
 
#9

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:17
Achso, dann habe ich das falsch verstanden. Somit nehme ich das Gesagte zurück, der General hat recht, mach das mal so.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
 
biby90
(Gast)

n/a Beiträge
 
#10

AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz

  Alt 25. Aug 2011, 10:19
Jop, hab ich.... jetzt blinkt das X nur kurz auf und geht wieder weg.... es soll danach auch noch stehen bleiben... das blinkt so schnell dass man es kaum sieht

aber das kommt schon nahe!

Geändert von biby90 (25. Aug 2011 um 10:21 Uhr)
 
Thema geschlossen


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:10 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