comment utiliser les couleurs en pascal ?

comment utiliser les couleurs en pascal ? - Delphi/Pascal - Programmation

Marsh Posté le 13-01-2004 à 13:30:37    

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 )

Reply

Marsh Posté le 13-01-2004 à 13:30:37   

Reply

Marsh Posté le 22-01-2004 à 13:16:07    

http://pascal.developpez.com/mode_txt/
le 4ème fichier pourrait t'aider (j'ai pas tester!)

Reply

Marsh Posté le 29-01-2004 à 10:58:27    

A et B c quoi ? Les cases ?  
Essaie avec un TColor.....
Tu vas sous Paintshoppro je crois, ou ultraedit, tu prends la valeur de la couleur que tu veux (en Hexa si je ne m'abuse ...) et tu vas dans les propriétés de ta gille dans le genre  :
 
grille.Font.color := $couleur;
Ca doit ressembler à qqchose ça ...

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed