Canvas soll nicht auf Parent.Canvas sondern Bitmap gezeichnet werden

[mb.99]

Hallo,


um das Flackern des Canvas (KlasseA :TCosumControl) zu vermeiden möchte ich alles erst in ein PufferBitmap zeichnen,
das Problem ist das KLasseA der Parent mehrerer anderer TCostumControlls(MouseClock... soll erhalten bleiben) ist die sich selbst auf die Canvas von KlasseA zeichnen.

Wie löse ich das geschicktesten.

Gruß

[Bjoerk]

TCosumControl; das Problem ist das KLasseA der Parent; TCostumControlls; MouseClock; ist die sich selbst auf die Canvas von KlasseA zeichnen. Sorry, aber wer soll das verstehen? :?

[p80286]

U.U brauchst Du nur

Delphi-Quellcode:

.Doublebufferd

(und etwas Geduld um Deine Frage nochmals durch zu lesen)

Gruß
K-H

[mb.99]

Dann versuche ich es etwas genauer zu erklären:

KlasseA : TCostumControl; // Klasse A dient als Container für Objekte der KLasse B,
KlasseA.Paint
{
- Hier wird der Hintergrund als Karo gezeichnet.
}

KlasseB : TCostumControl; // KlasseB stellt ein auf KlasseA bewegbares Objekt dar, es kann mit der Maus verschoben werden
KlasseB.Paint
{
Hier wird ein farbiges Rectangle mit Text gezeichnet.
}

KlasseC : TForm // hier wird ein Objekt von KlasseA und eine dynamische Anzahl von KLasseB-Objekten erzeugt


Da KLasseA der Parent von Objekten der KlasseB ist zeichnen die Objekte der Klasse B ihr Canvas auf das ParentCanvas.
Ich möchte es aber wie bereits erwähnt in einer Bitmap zwischenspeichern um das Flackern zu vermeiden.

[DeddyH]

Ich mag mich irren, aber TCustomControl zeichnet AFAIK auf seinen eigenen Canvas, im Gegensatz zu TGraphicControl.

[Bjoerk]

Würde sagen, bissl viel Canvas?

Edit: TGraphicControl hat auch schon ein eigenes Canvas.

[mb.99]

In der Paintmethode zeichnet jeder ins eigene Canvas, ich gehe davon aus das in der Urklasse das eigene Canvas auf das Parent.Canvas gezeichnet wird, sonst würde man ja nur den Inhalt des Parent.Canvas sehen.

[mb.99]

Ich habe es hinbekommen alles auf eine BitMap zu zeichnen, mit dem Flackern ist es jetzt vorbei,
dafür sind neue Probleme aufgetreten:

Beim Verschieben der Objekte enstehen Frackmente und teilweiße wird der Hintergrund auf das Objekt gezeichnet.

Am BitMap kann es definitiv nicht liegen, ich habe mir mit dem Befehl SaveToFile einige Screenshoots ausgeben lassen,
auf denen alles einwandfrei aussah.

Die Zeichenmethode wird im MouseMove aufgerufen:

- DrawBackground
- DrawObjects
- BitMapToCanvas


Habt ihr eine Ahnung woran das liegen könnte?

[DeddyH]

Hast Du den Vorschlag, DoubleBuffered der "Parentkomponente" auf true zu setzen, schon versucht?

[Blup]

Es wurde doch schon gesagt:

KlasseC.DoubleBuffered := True; // Formular
KlasseA.DoubleBuffered := True; // Hintergrund

Damit kümmern sich die Sreuerelemente selbst um eine Bitmap, den ganzen Zeichenkram und alles was dazu gehört.
Erst wenn das nicht funktioniert sollte man über eine eigene Lösung nachdenken.


Die Artefakte entstehen vermutlich, weil du nicht alle notwendigen Bereiche neu zeichnest.

[mb.99]

DoubleBuffered bringt leider überhaupt nichts,

der Grund für die Grafikfehler liegt wohl darin das ich auf ein TCostumControl male wenn ich diess verschiebe nimmt
es die Pixel mit obwohl diese dem Parent.Canvas gehören.

[Sir Rufo]

Darum solltest du auch von TGraphicControl ableiten, da ist schon die fertige Verdrahtung drin, wenn die Komponente neu gezeichnet werden muss.

Du kannst dir die Klasse aber auch anschauen und dann alle benötigten Teile übernehmen (quasi alles)

PS

Für Quelltexte nimm doch bitte die

Code:

[DELPHI]
[/DELPHI]

Tags oder (wenn nicht Delphi) die CODE-Tags (statt DELPHI einfach CODE in die eckigen Klammern)

[mb.99]

Ich habe anstelle von TCostumControl die TGraphicControl genommen, wenn man die Objekte schnell bewegt läufts zwar etwas holprig aber damit kann ich leben.

Edit: Da war einer schneller..

Danke für eure Hilfe

[Sir Rufo]

Zitat:

Zitat von mb.99 (Beitrag 1261396)

Ich habe anstelle von TCostumControl

Wohl eher TCustomControl oder hast du die Karneval-Edition von Delphi? :mrgreen: