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

**DeddyH**

Könnte man das nicht gleich von Anfang an ordentlich aufziehen und Logik und Darstellung trennen? Ich finde, damit kann man gar nicht früh genug anfangen und gewöhnt sich dann suboptimale Arbeitsweise gar nicht erst an.

ja hatte ich ja auch^^
nur wusste ich ja nicht dass es nicht funktioniert.
ich habe den Teil mit CheckForWin auskommentiert.... also es klappt alles hundert Prozent!
nur das ist eben noch die Sache die klappen muss

**DeddyH**

Nee, das hast Du nicht, Du verwendest visuelle Controls (TLabel) als Datenspeicher. Dafür sind sie aber nicht gedacht, sondern nur zur Darstellung von Daten. Ich weiß, dass man solchen Code oft findet, richtig gut ist das aber beileibe nicht.

**himitsu**

Du hast ein Parameter-Array ... wie wäre es, wenn man die Captions der Labels an diesen Parameter (beim Aufruf der Prozedur) übergibt?

**mleyen**

Jetzt kommt ihr sogar hier noch mit asm und irgendwelchen factory factory factorys....

markieren

Delphi-Quellcode:

			  AIndex[1]:= Label1.Caption;

  AIndex[2]:= Label2.Caption;

  AIndex[3]:= Label3.Caption;

  AIndex[4]:= Label4.Caption;

  AIndex[5]:= Label5.Caption;

  AIndex[6]:= Label6.Caption;

  AIndex[7]:= Label7.Caption;

  AIndex[8]:= Label8.Caption;

  AIndex[9]:= Label9.Caption;

Na, das muss man mir ja auch sagen, dass man es mit Labels nicht machen kann.
Ich muss die halt benutzen. dann suche ich mir mal einen anderen Weg womit es klappt.

**DeddyH**

Nö, ich hätte jetzt an einen Record mit Status (der neue Typ) und zugehörigem Label gedacht sowie einem 2-dimensionalen Array desselben. Das ist zwar immer noch nicht ideal, hält aber zusammen, was zusammen gehört.

Zitat:

wenn man die Captions der Labels an diesen Parameter

if CheckForWin(Label9.Caption) then das macht der Compiler nicht.

Zitat:

[Pascal Fehler] Unit1.pas(277): E2010 Inkompatible Typen: 'Array' und 'TCaption'

**DeddyH**

if CheckForWin([Label1.Caption, Label2.Caption, Label3.Caption]) then

aber mit dem Label1 hat er ja 3 Gewinnmöglichkeiten.

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

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

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

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

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

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

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

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

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

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

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

Forumregeln

biby90 (Gast) n/a Beiträge	#52 AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz 23. Aug 2011, 13:16 ja hatte ich ja auch^^ nur wusste ich ja nicht dass es nicht funktioniert. ich habe den Teil mit CheckForWin auskommentiert.... also es klappt alles hundert Prozent! nur das ist eben noch die Sache die klappen muss

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 43.136 Beiträge Delphi 12 Athens	#54 AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz 23. Aug 2011, 13:19 Du hast ein Parameter-Array ... wie wäre es, wenn man die Captions der Labels an diesen Parameter (beim Aufruf der Prozedur) übergibt? Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. my Delphi wish list : BugReports/FeatureRequests

biby90 (Gast) n/a Beiträge	#56 AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz 23. Aug 2011, 13:22 Na, das muss man mir ja auch sagen, dass man es mit Labels nicht machen kann. Ich muss die halt benutzen. dann suche ich mir mal einen anderen Weg womit es klappt.

biby90 (Gast) n/a Beiträge	#58 AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz 23. Aug 2011, 13:24 Zitat: wenn man die Captions der Labels an diesen Parameter if CheckForWin(Label9.Caption) then das macht der Compiler nicht. Zitat: [Pascal Fehler] Unit1.pas(277): E2010 Inkompatible Typen: 'Array' und 'TCaption'

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.540 Beiträge Delphi 11 Alexandria	#59 AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz 23. Aug 2011, 13:25 if CheckForWin([Label1.Caption, Label2.Caption, Label3.Caption]) then 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	#60 AW: tic tac toe.... mal wieder:) versteh aufgabestellung nicht ganz 23. Aug 2011, 13:28 aber mit dem Label1 hat er ja 3 Gewinnmöglichkeiten.