Forum: Multimedia
Delphi
by SunSet,
4. Mai 2010
Danke :) War zwar viel zu lesen aber hab mein Problem lösen können.
Forum: Multimedia
Delphi
by SunSet,
4. Mai 2010
Also ich habe das jetzt mal versucht zu löschen, jedoch funktioniert das auch nicht wie ichs gern möchte. Ich habe folgenden Code im MouseMove-Ereignis:
if Klick then begin
with imgZeichenflaeche.Canvas do begin
Pen.Mode := pmNotXor;
Pen.Color := clWhite;
Rectangle(x1,y1,x2,y2);
Pen.Color := Farbe;
Rectangle(PenPos.X,Penpos.Y,X,Y);
x1 :=...
Forum: Multimedia
Delphi
by SunSet,
4. Mai 2010
Ich programmiere zurzeit ein Zeichenprogramm ähnlich wie Paint. Mein Programm hat schon diverse Funktionen wie Freihand zeichnen, Pipette, etc., nur beim Rectangle und der Ellipse habe ich ein Problem, da beim bewegen das alte Viereck bleibt und das ist natürlich nicht richtig. Ich habe folgenden Code in den Maus-Ereignissen meiner Zeichenflaeche:
procedure...