Einzelnen Beitrag anzeigen

Benutzerbild von Tobias
Tobias

Registriert seit: 26. Okt 2004
Ort: Pforzheim
18 Beiträge
 
Delphi 6 Personal
 
#10

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

  Alt 19. Nov 2004, 16:39
@bigg:
ok, dann eben nochmal von ganz von vorne...

wenn spinEdit.Value = 1 ist, dann zeichnet meine funktion einfach einen ganz normalen pixel...
Delphi-Quellcode:
if spinEdit.Value=1 then begin
image1.Canvas.Pixels[x,y]:=ColorDialog2.Color;
wenn spinEdit.Value aber größer als 1 ist, dann soll erin etwas anderes zeichnen, nämlich ein Viereck mit 4 gleich langen seiten mit der seitenlänge "spinEdit.Value"
Delphi-Quellcode:
end else
image1.Canvas.Brush.Color:=ColorDialog2.Color;
image1.Canvas.Rectangle(x1,y1,x2,y2);
end;
x1,y1 sind in diesem fall die koordinaten des mauszeigers, also auch der linken oberen ecke des Vierecks...
wenn meine spinEdit-Komponente jetzt auf 2 steht, will ich, dass es ein Rechteck zeichnet, mit der seitenlänge 2pixel... also ein rechteck der größe 2x2 px....
das problem ist aber dass es das nicht macht, sondern dass es das rechteck immer doppelt so groß zeichnet...
und des problem will ich beheben...
mit den tipps die ich aber bisher bekommen habe, klappt das nicht...
Tobias
  Mit Zitat antworten Zitat