Deutsches Lazarusforum

Huhu,

bin da mit einem Kumpel dabei ein TicTacToe in Lazarus zu programmieren,was wir soweit auch fertig haben.

Nur leider finden wir bisher keinen Befehl/Bedingung wie wir ein Unentschieden einbauen können?

Hättet ihr da eine Idee?

Danke allerdings habe ich ein Problem mit dem Beispiel,sobald ich es öffne zeigt es mir überhaupt nix an d.h die gesamte Projekt.lpi ist leer,weder TForm noch sonst irgendwas.

Liegts bei mir?

Danke wieder :wink: ,so sieht es bei mir momentan aus :

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
Buttons, StdCtrls;

type

{ TForm1 }

TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Image1 ...

Danke für die fixe Antwort :wink: .

Folgendes vermutlich "Leichtes" aber ich komme nicht drauf,hätte ich noch nachzufragen :

a) Da wäre wieder das

const
MyImages: Array[1..2] of String =
('X_A.png', 'X_1.png');

Wo genau gebe ich das denn ein ? Über var?

Ich hatte bisher die MyImages ...

Habe leider doch jetzt erst wieder Zeit gefunden.

Also ich habe deine Grundstruktur soweit übernommen.

Als Variablen :

const
MyImages: Array[1..18] of String =
('X_A.png', 'X_A.png', 'X_A.png', 'X_A.png', 'X_A.png',
'X_A.png', 'X_A.png', 'X_A.png', 'X_A.png', 'X_1.png',
'X_1.png', 'X_1.png ...

Danke wieder für die Mühe

Also ich habe 9 T-Images und 2 Bilder.

Werde mir das dann heute später richtig durchlesen,bekomme sonst Kompfschmerzen,danke aber nochmals

Danke :wink: .

Also müsste ich das dann alle vorhandenen Möglichkeiten die das jeweilige Bild betreffen in das Image.Click einfügen?

Wenn also jemand gewonnen hat wenn :

1,3,4 oder 17,8 aufgedeckt werden, müsste in TForm.Image1.Click folgendes stehen :

ImageName[1]:='X_G.png';
ImageName[3]:='X_G ...

Da ich das Programm nicht auf meinem Laptop habe,kann ich es leider derzeit nicht hochladen/kopieren.

Wie weise ich denn den einzelnen "Stimmts" die Bilder hinzu?

Ich habe praktisch 9 Images, sobald ein Image angeklickt wird ändert sich per LFI das Bild und das Image wird disabled.
Bei drei ...

Danke erstmal .

Hmm wie mache ich das denn dann?

Also dass Lazarus bei 3 gleichen Bildern erkennt,dass jemand gewonnen hat?

Habe ich schon war leider nicht der Fehler :| , schon weitere Varianten wie :

if ((Image1.Picture.LoadFromFile('X_G.png')) and ((Image2.Picture.LoadFromFile('X_G.png')) and ((Image3.Picture.LoadFromFile('X_G.png')) then

if ((((Image1.Picture.LoadFromFile('X_G.png'))) and (((Image2.Picture ...

Danke :wink: .

Ich habe jetzt ein bisschen weitergearbeitet und hänge momentan an der Zeile :

if (Image1.Picture.LoadFromFile('X_G.png')) and ((Image2.Picture.LoadFromFile('X_G.png')) and ((Image3.Picture.LoadFromFile('X_G.png')) then
begin
Label1.Caption:='Spieler 2 hat gewonnen!';
end;

Er ...

Danke wieder :wink: kennst du auch den Picture-Befehl dafür?

Also ich würde mir dass jetzt folgendermaßen denken,ich habe die 4 Bilder und würde nun in die 3 Bilder immer dieselben Befehle einfügen,weil es 3 Konstellationen gibt mit denen sich das Bild von 4 wechseln/unsichtbar werden lässt lässt ...

Genau Mathias,

ich habe mich da vorallem im zumwiki belesen aber da sind größtenteils auch nur allgemeine Fälle.

Hast du eine Idee?

@ pluto : Die Grundstruktur verstehe ich zumindestens nur das "Verbinden" nicht,also den Befehl dass nach dem Klick dass Bild auch zurücksetzt. Danke auch für deine ...

Zeig doch mal den Code, dann sieht man auch eher um was es geht. :wink:

Nun da ist nicht viel mehr Code als ich hier bisher bekommen habe :wink: .

Eventuell hilft es dir wenn ich es Mal an einem Beispiel erkläre was wohl für sowas auch passen könnte.

Also wenn man 4 Bilder + 4 T-Images hat ...

Danke :wink: .

Das kommt der Sache schon nah.

Ich weiß nur nicht inwieweit bei dir der Bildwechsel für welches Bild zählt .

Ich versuche mir jetzt noch eine bessere Formulierung einfallen zu lassen. Schwirren momentan zu viele Ideen im Kopf rum.

Vielleicht geht das auch mit einem Button besser ...