AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Zeichnen auf Canvas

Ein Thema von Alexander Roth · begonnen am 9. Okt 2005 · letzter Beitrag vom 16. Okt 2005
Antwort Antwort
Seite 1 von 2  1 2      
Benutzerbild von Alexander Roth
Alexander Roth

Registriert seit: 17. Mai 2004
Ort: Kenn
574 Beiträge
 
Turbo Delphi für Win32
 
#1

Zeichnen auf Canvas

  Alt 9. Okt 2005, 08:15
Hallo Leute,

ich hab alles möglich versucht, doch irgendwie klappt es nicht. Könntet ihr mir zu den 2 Möglickeiten unten bitte Codeschnipsel geben und sagen ob das überhaupt so klappen könnte?

mein Problem ist:
Ich möchte möglichst schnell auf canvas zeichnen.

1. Möglichkeit: Dazu könnte ich ja einen Pointer und 2 TCanvas anlegen. Die sichtbare Zeichenoberfläche weise ich den Pointer zu und der Pointer zeigt auf einen der beiden TCanvas. Dann zeichne ich in den TCanvas auf den der Pointer gerade nicht zeigt. Dann lasse ich den Pointer auf den anderen Tcanvas zeigen und zeichne wieder in den anderen.

2. Möglichkeit: Ich habe einen TCanvas und zeichne in den etwas hinein. Dann weise ich der sichtbaren form1.canvas das Tcanvas zu. Dann zeichne in den TCanvas wieder etwas und lasse es wieder ausgeben.


Vielen Dank für eure Mühe.
Alexander Roth
Ich bin umgestiegen auf: Lazarus und Ubuntu! Alles OpenSource!

Besuch doch mal: www.roth.us.ms
  Mit Zitat antworten Zitat
tigerman33

Registriert seit: 30. Jul 2005
Ort: München
423 Beiträge
 
Delphi 2005 Professional
 
#2

Re: Zeichnen auf Canvas

  Alt 9. Okt 2005, 09:38
Das kannst du dir sparen. TWinControl führt die Eigenschaft DoubleBuffered ein, die genau das beschreibt, was du erreichen willst.
Christian
Der Computer hilft mir, Probleme zu lösen, die ich ohne Computer nicht hätte.
  Mit Zitat antworten Zitat
Benutzerbild von Alexander Roth
Alexander Roth

Registriert seit: 17. Mai 2004
Ort: Kenn
574 Beiträge
 
Turbo Delphi für Win32
 
#3

Re: Zeichnen auf Canvas

  Alt 9. Okt 2005, 11:13
Hmmm... Das ist ja Klasse.

Wie müsste der Code dann aussehen, damit das kappt?
Alexander Roth
Ich bin umgestiegen auf: Lazarus und Ubuntu! Alles OpenSource!

Besuch doch mal: www.roth.us.ms
  Mit Zitat antworten Zitat
tigerman33

Registriert seit: 30. Jul 2005
Ort: München
423 Beiträge
 
Delphi 2005 Professional
 
#4

Re: Zeichnen auf Canvas

  Alt 9. Okt 2005, 11:28
Form1.DoubleBuffered := true; (ist glaub ich standardmäßig false)
Christian
Der Computer hilft mir, Probleme zu lösen, die ich ohne Computer nicht hätte.
  Mit Zitat antworten Zitat
Benutzerbild von Alexander Roth
Alexander Roth

Registriert seit: 17. Mai 2004
Ort: Kenn
574 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: Zeichnen auf Canvas

  Alt 9. Okt 2005, 11:35
Ja das ist klar, aber wie müsste ich dann zeichnen? Wie kann ich erst ein vollständiges Bild zeichnen und dann erst auf die sichtbare Canvas darstellen?
Alexander Roth
Ich bin umgestiegen auf: Lazarus und Ubuntu! Alles OpenSource!

Besuch doch mal: www.roth.us.ms
  Mit Zitat antworten Zitat
tigerman33

Registriert seit: 30. Jul 2005
Ort: München
423 Beiträge
 
Delphi 2005 Professional
 
#6

Re: Zeichnen auf Canvas

  Alt 9. Okt 2005, 11:43
Hmmm, dazu müsstest du irgendwie das Zeichnen verhindern, bis du es selbst erlaubst. Eine Möglichkeit wäre, die WM_PAINT message abzufangen und zu unterdrücken, bis du fertig bist mit zeichnen.
Christian
Der Computer hilft mir, Probleme zu lösen, die ich ohne Computer nicht hätte.
  Mit Zitat antworten Zitat
Benutzerbild von Khabarakh
Khabarakh

Registriert seit: 18. Aug 2004
Ort: Brackenheim VS08 Pro
2.876 Beiträge
 
#7

Re: Zeichnen auf Canvas

  Alt 9. Okt 2005, 12:04
Eine andere Möglichkeit wäre, es selbst in die Hand zu nehmen: [dp="OffScreenBitmap"]OffScreenBitmaps[/dp]. Du erzeugst zur Laufzeit ein TBitmap und benutzt dieses für alle Zeichenoperationen. Dadurch kannst du selbst entscheiden, wann du es auf die Canvas deiner Paintbox übertragen willst (z.B. in deren OnPaint-Event).
Sebastian
Moderator in der EE
  Mit Zitat antworten Zitat
Benutzerbild von Alexander Roth
Alexander Roth

Registriert seit: 17. Mai 2004
Ort: Kenn
574 Beiträge
 
Turbo Delphi für Win32
 
#8

Re: Zeichnen auf Canvas

  Alt 9. Okt 2005, 12:12
Wenn TWinControl aber doch schon die tolle Möglichkeit hat mit dem DoubleBuffered, dann muss es doch auch eine einfache Möglichkeit geben, diese voll auszunutzen indem man erst fertig gezeichnete Bilder auf die Canvas schreibt. Sonst bringt das ja herzlich wenig.
Alexander Roth
Ich bin umgestiegen auf: Lazarus und Ubuntu! Alles OpenSource!

Besuch doch mal: www.roth.us.ms
  Mit Zitat antworten Zitat
TStringlist

Registriert seit: 1. Dez 2003
360 Beiträge
 
Turbo Delphi für Win32
 
#9

Re: Zeichnen auf Canvas

  Alt 9. Okt 2005, 12:31
Was willst du denn eigentlich machen? Willst du so etwas wie eine Animation kreieren oder willst du etwa nur mehrmals auf irgend einem (TWin)Control herummalen? Im ersten Fall nutzt dir DoubleBuffered nämlich gar nichts. Da müsstest du schon mit der API-Funktion "BitBlt" arbeiten, welche Canvas-Inhalte jeweils immer mit einem Schlag auf andere Canvas(se plura?) überträgt.
MfG (& Thx ggf.)
  Mit Zitat antworten Zitat
Benutzerbild von Alexander Roth
Alexander Roth

Registriert seit: 17. Mai 2004
Ort: Kenn
574 Beiträge
 
Turbo Delphi für Win32
 
#10

Re: Zeichnen auf Canvas

  Alt 9. Okt 2005, 14:55
Was macht "BitBlt" genau?

Sagen wir mal so ich "male" einige sich bewegende Linien, mit Canvas.
Alexander Roth
Ich bin umgestiegen auf: Lazarus und Ubuntu! Alles OpenSource!

Besuch doch mal: www.roth.us.ms
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


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 22:48 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