Canvas "verwischt" ... wie kann man es ändern?

[Wuaegner]

Hallo ! Hab ein kleines Spiel nach der Art von Bomberman oder Bomberkids( TR) gemacht. Ich lade Bitmapdateien auf ein Canvas. Wenn ich das Spielfeldfenster nun aber aus dem Bildschirm schiebe "verwischt" sich das Spielfeld! Warum ist das so? Wie kann ich es ändern???
Hoffe ihr könnt mir helfen...
Gruß Florian

[Mirilin]

:hi:

Alles auf ein Bitmap, und im OnPaint alles auf die Form...

mfg Tobias

[Wuaegner]

Im OnPaint- Ereigniss habe ich es schon... Wie meinst du alles in ein Bitmap?
Gruß Flo

[Luckie]

http://www.luckie-online.de/Artikel/...tioniert.shtml
Ganz unten auf der Seite.

[Wuaegner]

Ah danke erstmal... habe meinen Quelltext nun entsprechend verändert... hab eine Paintbox Komponente erstellt mit der Größe des Spielfeldes jedoch zeichne ich ja in das bmp und nicht in die Paintbox...darum ist das Fenster leer! 'denkfehler?!'
Gruß Flo

[Luckie]

Du musst auch das BMP auf die Paintbox kopieren. Siehe meineen Artikel.

[Wuaegner]

Genau aber wie? Habe das nicht in deiner Beschreibung gefunden :?
Gruß Flo

[Luckie]

Zitat:

Zitat von Wuaegner

Genau aber wie? Habe das nicht in deiner Beschreibung gefunden :?
Gruß Flo

Und was ist das:

Delphi-Quellcode:

procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
  { bei Bedarf neu zeichnen }
  BitBlt(PaintBox1.Canvas.Handle, 0, 0, bmp.Width, bmp.Height, bmp.Canvas.Handle,
    0, 0, SrcCopy);
end;

[Wuaegner]

Ja nur die PaintBox bleibt bei mir trotzdem leer... hatte zuvor lauter prozeduren die auf der Canvas des Form1 ein Bitmap drauf gemalt haben. Nun habe ich die PaintBox1 erstellt, bmp global deklariert vom Typ Bitmap und alles Form1.Canvas.Draw(...) durch bmp.Canvas.Draw(..) ersetzt.. klappt aber leider noch nicht. Woran kann das liegen?
Gruß Flo

[Luckie]

Woher soll ich das wissen? Mit bmp.Canvas.Draw zeichnest du auch immer nur auf das Bitmap im Speicher. Wenn du es sehen willst, musst du es auch irgendwann mal auf die Paintbox kopieren.

[SirThornberry]

@Wuaegner: hast du die größe von "bmp" nach dem createn auch gesetzt???? ansonsten bleibt diese auf 0 pixel breite und höhe und somit wird nix in die Tbitmap gezeichnet

[Wuaegner]

Ja die Größe von bmp habe ich festgelegt. Wie kopiert man das bmp in die Paintbox?
Gruß Flo

[Mirilin]

:hi:

sieh bei Luckie oben.

mfg Tobias

[Luckie]

In dem Artikel steht ein kompletter Sourcecode, den man eins zu eins kopieren kann. Nur das was gezeichnet werden soll muss man eben anpassen.

[Wuaegner]

Nein nicht ganz, da in meinem Programm nicht auf ButtonClick etwas gezeichnet werden soll sondern ständig, mit jedem Tastendruck etwas verändert wird, übermalt wird. An dem hängt es bei mir noch...
Gruß Flo

[Luckie]

Das ist doch total egal, ob nun bei Tastendruck oder in einem Timer-Ereigniss oder sonst wo.

[Wuaegner]

He ganz ruhig ich habe lediglich eine Frage gestellt, viell. für einen der Delphi schon länger macht war sie dumm oder sonst was, aber ich wusste es wirklich nicht.

Es funktioniert nun soweit... nur wird meine PaintBox nun nach jedem Tastendruck neugezeuchnet, da ich ja ein rechteckiges Bitmap ( Spieler1, 2) über das Spielfeld bewege und so nach jedem Tastendruck natürlich die Paintbox aktualisieren muss, was aber glaub ich nicht sp sinnvoll ist, es kommt nämlich nach jedem Tastendruck ein "Flimmerstreifen", kurz aber störend. Könnt ihr mir dazu noch einen Tip gehen das zu verbessern? Wäre cool!

Gruß Flo

[Wuaegner]

Niemand eine Idee?
Gruß Flo

[Jonny-Flash]

Hi, ich habe das Problem, das bei meiner Anwendung eine Tabelle in ein Stringgrid gezeichnet werden soll. Das mit der Paintbox funktioniert soweit auch wunderbar, allerdings ist diese hinter dem Stringgrid und somit nicht sichtbar. Außerdem soll in der Tabelle noch "gearbeitet" werden können. Kann mich da noch Zellen markieren wenn das BMP vor dem Stringgrid liegt, und ist das BMP überhaupt durchsichtig?
Weiss da jemand einen Rat für mich. Oder hat jemand eine andere Idee, wie ich das Problem lösen kann?

Danke..

(Hab mal Bilder des Stringgrids angehängt)

[edit] Hab mal eine eigene Topic aufgemacht [/edit]

[Wuaegner]

Hab nun den "Flimmerstrich" wegbekommen. Ich mache nicht mehr REPAINT sondern löses direkt Canvas.OnPaint aus. Jetzt klappt es wunderbar.
Nochmal danke für die Tips
Gruß Flo