je suis en train de realiser un jeu de dames en pascal ...
voici ma procedure qui rempli le damier :
--------------------------------------------------------
procedure remplirGrilleCouleur;
begin
i:=1;j:=1;
while i<10 do
begin
while j<10 do
begin
TextBackground(0);
grille[i,j].background := ' A ';
grille[i+1,j+1].background := ' A ';
TextBackground(11);
grille[i+1,j].background := ' B ';
grille[i,j+1].background := ' B ';
j:=j+2;
end;
j:=1;
i:=i+2;
end;
end;
-------------------------------------------------------
ceci cré le damier sauf que je n'arrive pas à différencier les couleurs des cases
A et B me permettent de verifier que le damier se décompose bien en grille. ( pour le debug )
