AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Arbeiten mit einem Canvas

Ein Thema von R4c0N · begonnen am 11. Jan 2010 · letzter Beitrag vom 11. Jan 2010
Antwort Antwort
R4c0N

Registriert seit: 7. Jan 2010
12 Beiträge
 
#1

Arbeiten mit einem Canvas

  Alt 11. Jan 2010, 20:35
Hi, ich habe ein Canvas auf meiner Form, wie kann ich einstellen, dass per Buttonclick, das Canvas wieder an die Ursprungsposition zurückgeht?
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#2

Re: Arbeiten mit einem Timer

  Alt 11. Jan 2010, 20:38
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.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
R4c0N

Registriert seit: 7. Jan 2010
12 Beiträge
 
#3

Re: Arbeiten mit einem Canvas

  Alt 11. Jan 2010, 20:42
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;
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

Re: Arbeiten mit einem Canvas

  Alt 11. Jan 2010, 20:44
Dann setze sie wieder auf die ursprüngliche Position.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
R4c0N

Registriert seit: 7. Jan 2010
12 Beiträge
 
#5

Re: Arbeiten mit einem Canvas

  Alt 11. Jan 2010, 20:45
Ja,aber mit welchem Befehl oder wie setzt man das wieder auf die ursprüngliche Position?
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#6

Re: Arbeiten mit einem Canvas

  Alt 11. Jan 2010, 20:49
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.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: Arbeiten mit einem Canvas

  Alt 11. Jan 2010, 21:07
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.
  Mit Zitat antworten Zitat
Benutzerbild von s.h.a.r.k
s.h.a.r.k

Registriert seit: 26. Mai 2004
3.159 Beiträge
 
#8

Re: Arbeiten mit einem Canvas

  Alt 11. Jan 2010, 21:12
... zumal der obigen Quellcode nicht annährend funktionieren würde und sehr fragmenthaft vorliegt ein wenig mehr Anstrengungen sind erwünscht
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
  Mit Zitat antworten Zitat
Benutzerbild von alleinherrscher
alleinherrscher

Registriert seit: 8. Jul 2004
Ort: Aachen
797 Beiträge
 
Delphi XE2 Professional
 
#9

Re: Arbeiten mit einem Canvas

  Alt 11. Jan 2010, 21:13
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
„Software wird schneller langsamer als Hardware schneller wird. “ (Niklaus Wirth, 1995)

Mein Netzwerktool: Lan.FS
  Mit Zitat antworten Zitat
R4c0N

Registriert seit: 7. Jan 2010
12 Beiträge
 
#10

Re: Arbeiten mit einem Canvas

  Alt 11. Jan 2010, 21:13
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.
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:00 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz