diff options
Diffstat (limited to 'raetselunit.pas')
| -rw-r--r-- | raetselunit.pas | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/raetselunit.pas b/raetselunit.pas index 1819408..982d7ff 100644 --- a/raetselunit.pas +++ b/raetselunit.pas @@ -676,7 +676,7 @@ var begin zeichenflaeche.canvas.brush.color:=$ffffff; zeichenflaeche.canvas.rectangle(-10,-10,zeichenflaeche.width+10,zeichenflaeche.height+10); - zeichenflaeche.canvas.pen.width:=3; + zeichenflaeche.canvas.pen.width:=3-2*byte(sudokuCB.checked); zeichenflaeche.canvas.pen.color:=$000000; if diagonalenCB.checked then for i:=1 to dim do begin @@ -696,11 +696,13 @@ begin end; for i:=0 to dim do with zeichenflaeche.canvas do begin + pen.width:=3-2*byte(sudokuCB.checked and (i mod nSqrt <> 0)); moveTo(round((i+1)*zellGroesze),round(zellGroesze)); lineTo(round((i+1)*zellGroesze),round((dim+1)*zellGroesze)); moveTo(round(zellGroesze),round((i+1)*zellGroesze)); lineTo(round((dim+1)*zellGroesze),round((i+1)*zellGroesze)); end; + zeichenflaeche.canvas.pen.width:=3; zeichenflaeche.canvas.pen.color:=$8080ff; if (cursorPosition>=0) and (dim>0) then begin zeichenflaeche.canvas.brush.color:= |