Mini Spiel: Hex

[Antigo]

bisher mache ich es so:

Delphi-Quellcode:

  if aktiv and (value=0)then box.canvas.brush.color:=clgreen else
  case value of
    0: box.canvas.brush.color:=clcream;
    1: box.canvas.brush.color:=clbackground;
    2: box.canvas.brush.color:=RGB(255,66,66);
  end;

das heisst er kommt mit clbackground nicht zurecht. ok dann mache ich ein screenshot von meinem Programm, lade es paint, gucke mir die RGB Werte an, wandle sie in eine TColor um und schreibe sie darein

edit: so ist geändert, bitte testen ob es jetzt funktioniert