Arbeiten mit einem Canvas

[R4c0N]

Hi, ich habe ein Canvas auf meiner Form, wie kann ich einstellen, dass per Buttonclick, das Canvas wieder an die Ursprungsposition zurückgeht?

[Luckie]

Was für einen Canvas? Canvas bezeichnet eine allgemeine Zeichenfläche. Das kan ein TImage, ein Bitmap oder die Form selber sein. Aber mal abgesehen davon gibt es da keine entsprechende Eigenschaft. Du musst die Koordinaten selber zurücksetzen.

Aber was hat das jetzt mit einem Timer zu tun? Ich bin leider kein Hellseher.

[R4c0N]

So habe ich die Kugel programmiert, die soll wieder an den Anfang:

Delphi-Quellcode:

procedure TForm2.FormCreate(Sender: TObject);
begin


 x:=20;y:=100;
 v_x:=20;
 v_y:=15;
[21:41:24] Jonas: procedure TForm2.Timer1Timer(Sender: TObject);
begin
with image3.Canvas do begin
brush.Color:=clwhite;
pen.Color:=clwhite;
image3.Width:=1057;
image3.Height:=553;
rectangle(0,0,image3.Width,image3.Height);
brush.Color:=clred;
pen.Color:=clred;
[21:42:02] Jonas: x:=x+v_x;
y:=y+v_y ;

ellipse(x,y,x+10,y+10);
end;

[Luckie]

Dann setze sie wieder auf die ursprüngliche Position.

[R4c0N]

Ja,aber mit welchem Befehl oder wie setzt man das wieder auf die ursprüngliche Position?

[Luckie]

Kann es sein, dass du deinen eigenen Quellcode nicht verstanden hast? Du verschiebst die Ellipse auf dem Image. Die musst du nur auf die Ausgangsposition zurück setzen.

[Matze]

OT:

Zitat von Luckie:

Kann es sein, dass du deinen eigenen Quellcode nicht verstanden hast? [...]

Zitat von R4c0N:

Delphi-Quellcode:

[21:41:24] Jonas: procedure TForm2.Timer1Timer(Sender: TObject);
[...]

Das ist wohl nicht sein eigener Quelltext sondern - ich vermute es - 1:1 ohne zu Überlegen kopiert.

[s.h.a.r.k]

... zumal der obigen Quellcode nicht annährend funktionieren würde und sehr fragmenthaft vorliegt ein wenig mehr Anstrengungen sind erwünscht

[alleinherrscher]

Zitat von R4c0N:

[21:41:24] Jonas:

OT: Also da gehört schon was zu, sooo blind zu kopieren, dass man noch den Chatlog mit ins Delphi Programm kopiert - Der Compiler- und sein Lehrer werden sich freuen

[R4c0N]

Ja, das is nich mein Quelltext, ich hab die Frage für nen Klassenkameraden gestellt der hier nich angemeldet is, wollte hier aber nich die ganze Story erzählen

edit: ach ja, er hats nun hinbekommen, er dankt für die Hilfe.