Der Ball

[peacekeaper]

Einen wunderschönen wünsch ich zuerst einmal!

hab da mal ne frage die vielleicht nich direkt was mit
delphi oder sonstigen programmiersprachen zu tun hat...

bin nämlich gerade dabei ein spiel das sich da nennt...manche kennen es vielleicht...
PONG nachzubauen doch kriege ich es nicht hin, dass man
bei dem ball den ich per Image in mein Programm eingebaut habe,
den schwarzen hintergrund nicht sieht...
sprich immer wenn der ball die mittellinie passiert
flackert es und der schwarze wenn auch kleine rand kommt zum vorschein
hab schon so einieges versucht...(Photoshop, etc. ja sogar paint)
doch komme nicht zu dem ergebnis was ich haben will...
kann mir jemand vielleicht nen tipp geben?!
:wall:
:wiejetzt:

schonmal danke im vorraus


mfg peacekeaper!
:dp:

[Jelly]

Schon mal nach PONG hier im Forum gesucht. Ich meine das gabs schon öfters. Ansonsten schmeiss ich mal Stichwörter wie DirectX bzw DelphiX und Sprite in die Runde.

[Kroko1999]

Image ist der langsamste Ansatz, lade den Ball in ein Bitmap und benutze BitBlt!

[konda]

Wie wärs mit nem Shape-Ball? :)

[Mavarik]

Ich würde sagen das liegt daran, dass Du keine transparente Farbe gesetzt hast...

Setzte Transparent auf true und fülle den Hintergrund einheitlich....

Frank

[peacekeaper]

okay also mit direktx etc. kenne ich mich leider nich aus..
das bitmap tool kenn ich net xD
aber ich werde das mal mit dem shape versuchen...
wo soll ich denn die hintergrundfarbe auf transparent setzen!?
wenn man das bei fotoshop oder sowas macht dann funzt es nich...

aber danke für die comments!!!

mfg peacek.
:stupid:

[turboPASCAL]

Ich machs mal kurz, einfach hier abgucken: Simple Pong ;)

Delphi-Quellcode:

// zB. im FormCreate
var bitmap: TBitmap;
begin
  bitmap := TBitmap.Create;
  bitmap.LoadFromFile('...Ball.bmp');
  bitmap.Transparent := True;
  bitmap.TransparentColor := clFuchsia;
  //...
end;

procedure PaintBall(x,y: Integer);
begin
  Form1.Canvas.Draw(x,y, Bitmap);

  //oder zB.:
  PaintBox1.Canvas.Draw...
  
end;

//...
procedure TForm1.FormDestroy(Sender: TObject);
begin
  bitmap.free; // <---<<< nicht vergessen
end;

[peacekeaper]

ja sauber ich danke euch vielmals!!

hab einfach mal die eigenschaft transparent (hatte wohl so rote runde teile auf den augen)
auf true gesetzt jetz funztz!!

danke danke danke!

viell stell ich ja mal das prog online...

mfg peacek.



sodele habs jetz online gestellt! unter open source oder wie sich dat schimpft!