All pastes #817353 Raw Edit

Etwas

public text v1 · immutable
·published 2007-12-15 14:34 UTC
rendered paste body
void PaintBoard()
{
 int i, j, offset;

 Form1->PaintBox1->Left = 192;
 Form1->PaintBox1->Top  = 8;
 Form1->PaintBox1->Color = clWhite;

 Form1->PaintBox1->Canvas->FloodFill(0,0,clBlack,1);

 Form1->PaintBox1->Canvas->Pen->Color = clBlack;
 Form1->PaintBox1->Canvas->Pen->Width = 1;

 for (i = 0; i <= 8; i++) {
     Form1->PaintBox1->Canvas->MoveTo(0, i*80);
     Form1->PaintBox1->Canvas->LineTo(641, i*80);

     Form1->PaintBox1->Canvas->MoveTo(i*80, 0);
     Form1->PaintBox1->Canvas->LineTo(i*80, 641);
 }

 // TODO: Code anpassen [Brett drehen..]
 for (i = 0; i <= 7; i++) {
     if ((i % 2) == 0)
         offset = 85;
     else
         offset = 5;

     for (j = 0; j <= 3; j++) {                                               //fsBorder
         Form1->PaintBox1->Canvas->FloodFill( j*160 + offset, i*80 + 5, clSilver, fsBorder);

     }


 }
}