Incompatible types: 'Integer' and 'Extended' (??????)

[Tobias]

so, jetzt hab ichs (fast) genauso wie du, und es funktioniert immer noch nicht...

Delphi-Quellcode:

 Q:=StrToInt(spinEdit.Text);

 if BitBtnPunkt.Enabled=false then
 begin
   if spinEdit.Value=1 then begin
     image1.Canvas.Pixels[x,y]:=ColorDialog2.Color;
   end else
      image1.Canvas.Brush.Color:=ColorDialog2.Color;
      image1.Canvas.Rectangle(x, y, Q + x, Q + y);
 end;

die entstehendes quadrate sind immernoch doppelt so groß wie sie sein sollten...

das einzigste was ich nicht übernommen habe ist dieses

Delphi-Quellcode:

with Canvas do
  begin

und an dem wirds wohl nicht liegen, oder?