Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi Schachfeld

**fkerber**

Hi!

Zufällig hab eich auch mal ein Schachfeld gemalt:

Delphi-Quellcode:

			farbe:=clwhite;

 for i:=0 to 63 do

  begin

    // Attribute berechnen:

    if not ((i mod 8) = 0) then

      if farbe=clwhite then

        farbe:=clblack else farbe:=clwhite;

[...]

Ciao Frederic

fkerber (CodeLib-Manager) Registriert seit: 9. Jul 2003 Ort: Ensdorf 6.723 Beiträge Delphi XE Professional	#2 Re: Schachfeld - Gerade, Ungerade... 21. Okt 2004, 21:17 Hi! Zufällig hab eich auch mal ein Schachfeld gemalt: markieren Delphi-Quellcode: farbe:=clwhite; for i:=0 to 63 do begin // Attribute berechnen: if not ((i mod 8) = 0) then if farbe=clwhite then farbe:=clblack else farbe:=clwhite; [...] Ciao Frederic Frederic Kerber
	Zitat

Einzelnen Beitrag anzeigen

Re: Schachfeld - Gerade, Ungerade...