Thema
:
Delphi
Game Of Life - ich könnte etwas Hilfe gebrauchen, bitte
Einzelnen Beitrag anzeigen
Maya
Registriert seit: 15. Jun 2011
Ort: Potsdam-Mittelmark
107 Beiträge
Delphi 2010 Enterprise
#
25
AW: Game Of Life - ich könnte etwas Hilfe gebrauchen, bitte
15. Jun 2011, 20:06
Zitat von
Daniela.S
:
letzte Nachbarzelle...
markieren
Delphi-Quellcode:
function
GameOfLife(x,y: Integer): Integer;
var
Temp: Integer;
begin
if
(x<4)
and
(y<4)
and
(Zellen[x+1,y+1]=1)
then
Temp:=Temp+1;
// <----x<4
Dankeschön! Es klappt!
Zitat
Maya
Öffentliches Profil ansehen
Mehr Beiträge von Maya finden