Eine Projektarbeit

[Sherlock]

Das mit der Siegbedingung ist ja eh egal, da es bei ernsthaften TTT-Runden nie zu einem Gewinner kommen wird

Sherlock

[Dejan Vu]

Dabei geht es in der Spieleprogrammierung nicht. Man kann anhand von TTT aber die Basistechniken der Nullsummenspielemitvollständigerinformationprogram mierung sehr gut lernen.

Ein anderes gutes und einfaches Spiel ist das Bauernspiel, bei dem auf einem NxN brett jeweils N Bauern plaziert werden. Es gibt nur zwei Züge: Ein Feld nach vorne und ein Feld schräg nach vorne zum Schlagen (wenn da einer ist). Gewonnen hat der, der zuerst einen Bauern an die gegnerische Grundlinie bringt.

Obersimpel, langweilig, aber hervorragend geeignet, um selbstlernende, genetische Programme zu schreiben, mit Spielbaum, Minimax und allem, was dazugehört.

[BadenPower]

Du solltest in Zeile 37 die Procedure "Update" umbenennen, da sie nicht im geringsten etwas mit der Procedure "Update" zu tun hat, welche in der Klasse TForm deklariert ist.

Der Compiler gibt Dir auch die entsprechende Warnung aus:

Code:

unit1.pas(37,15) Warning: An inherited method is hidden by "TForm1.Update(LongInt,LongInt,TImage);"

[BadenPower]

noch eine Kleinigkeit:

Delphi-Quellcode:

    for i:= 0 to 2 do begin
        for j:= 0 to 2 do begin
            Feld[x,y]:=0;  // Hier ???
        end;
    end;

Was soll denn in der Button1Click-Procedure an der markierten Stelle geschehen, ausser dass das Feld[0,0] jedesmal 0 zugewiesen bekommt???