Canvas: Änderungen/Bewegungen zeichnen

[Fritzew]

So könnte das aussehen,
als Zip da das Gif zu gross ist..

[stahli]

@scurra

Ich habe mal ein graphisches Framework gebaut, das nur zyklisch in ein Bitmap zeichnet und dieses auf den Bildschirm kopiert.
Damit baue ich Formulare auf, ähnlich VCL bzw. FMX.
Die Positionen der Controls speichere ich in der Datenschicht und ermittle darüber, über welchem Control die Maus sich befindet.

Hat ganz gut funktioniert und ging wirklich schnell (sogar ohne Grafikbeschleunigung etc).

Schau mal hier:
https://www.delphipraxis.net/175033-...-schlecht.html
Im letzten Beitrag ist eine Demo zum Testen.

[Scurra]

Danke noch einmal für den Input von euch. Ich werde versuchen, das beste daraus zu machen und gebe dann evtl. noch einmal Bescheid ob es geklappt hat. Kann allerdings noch etwas dauern, da das ein Freizeitprojekt (und just for fun) ist und ich durchschnittlich wahrscheinlich nur 1-2 Stunden pro Woche daran arbeite. Also nicht wundern, wenn ich erst einmal keine Rückmeldung gebe.

Die Implementierung von Fritzew sieht für mich gut aus, vor allem der Schritt, die Zeichenfläche noch einmal abzukapseln. Ob ich nun direkt eine Paintbox zeichne oder ein Bitmap verwende, weiß ich noch nicht genau. Im Moment sieht es für mich aber eher so aus, als wäre es leichter, eine Bitmap zu verwenden, vor allem, weil dort die Verwendung mehrerer Schichten möglich ist.

[jaenicke]

Zitat von Scurra:

Ob ich nun direkt eine Paintbox zeichne oder ein Bitmap verwende, weiß ich noch nicht genau.

Du solltest in jedem Fall alles erst fertig in ein Bitmap zeichnen und dann in einem Rutsch dieses in die Paintbox kopieren. Ansonsten flackert es nur unnötig.

[Scurra]

Ich habe gestern und heute mal ein wenig herumgespielt. Da ich das graphics32-Package schon hatte, habe ich dieses verwendet (ich dachte bislang, dass das schon standardmäßig in Delphi enthalten ist ). Mit der TImage32-Komponente und den darin enthaltenen (Bitmap-)Layern klappt das bisher wunderbar. Das einzige, das ich etwas störend/umständlich finde, sind die runden Enden von Linien, die man mit der Methode LineTo auf die Bitmaps zeichnet. Ich habe hier im Forum schon eine Lösung dafür gefunden (https://www.delphipraxis.net/92808-t...ten-ecken.html), man muss aber extra jedes Mal die Winapi verwenden.

Ich habe gerade noch eine Frage: Was ich bei meiner Anforderung komplett vergessen habe, ist, dass man das Formular auch vergrößern und verkleinern kann. Wie würdet ihr in einem solchen Fall vorgehen? Im Moment mache ich es so, dass ich die TImage32-Komponente mit alClient über mein Radar-Panel setze. Die Maße der Bitmaps in den Layern müsste ich aber im OnResize auch ständig anpassen, was evtl. zu einem Flackern führen könnte, wenn man das Formular mit der Maus groß/klein zieht (das OnResize-Event wird dann oft ausgelöst).

[stahli]

In meinem Projekt berechne ich das Bitmap in einem Thread. Für die Berechnung wird die Zielgröße ClientRect des Formulars mitgegeben.
Wenn die Berechnung fertig ist, wird das Bitmap synchronisiert auf den Formularcanvas kopiert.

Sofern zwischenzeitlich die Formulargröße verändert wurde (ist ja flüssig möglich, da die Bitmap-Berechnung in einem Thread läuft) passt der Inhalt nicht zur Formulargröße. Es gibt einen Rand oder es wird etwas abgeschnitten.
Es wird aber sofort eine Neuberechnung ausgelöst, so dass der Inhalt an die neue Größe angepasst wird. Man erhält also einen Nachlaufeffekt, bis die Bitmapgröße zur Formulargröße passt.
Flackern tut da aber nichts.

[himitsu]

Zitat von Scurra:

man muss aber extra jedes Mal die Winapi verwenden.

Du kannst das aber auch einmal in einer Funktion kapseln und dann die statt der WinAPI verwenden
oder besser noch es per Class-Helper als dein eigenes LineToIrgendwas an TCanvas hängen.

[Jens01]

Zitat:

Das einzige, das ich etwas störend/umständlich finde, sind die runden Enden von Linien, die man mit der Methode LineTo auf die Bitmaps zeichnet.

Das hier solltest Du Dir angucken:
http://angusj.com/delphi/gr32_lines.php

Es ist zwar schon veraltet aber gut...