Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   [Andorra] Objekte per MouseDonw Plazieren ? (https://www.delphipraxis.net/115972-%5Bandorra%5D-objekte-per-mousedonw-plazieren.html)

mimi 20. Jun 2008 22:04


[Andorra] Objekte per MouseDonw Plazieren ?
 
Hallo,
ich versuche einen einfachen Level Editor für mein neues Spiel zu schreiben.
Das Problem ist jetzt, sobald gescrollt ist kann ich keine Objekte mehr erstellen, was auch kein wunder ist,
das liegt an den verschiedenen Position angaben.

Würde ich sagen. Die Frage ist jetzt, wenn die Engine gescrollt hat/ist und ich gerne dort wo ich hinklicke ein Objekt haben möchte, wie kann ich jetzt die Positionen entsprechend umrechnen ?

Danke !

Diamondback2007 21. Jun 2008 02:57

Re: [Andorra] Objekte per MouseDonw Plazieren ?
 
So wie ich das gesehen habe, gibt es relative Koordinaten (WorldX und WorldY).
Vielleicht kann man damit was errichen.

Codewalker 21. Jun 2008 08:57

Re: [Andorra] Objekte per MouseDonw Plazieren ?
 
Du musst das Scrolling mit der Mauskoordinate verrechnen. Wenn du nach links scrollst, heißt das, dass du die Engine nach rechts verschiebst (analog mit den anderen Richtungen).

Delphi-Quellcode:
procedure TEngine.MouseMove(X, Y: integer);
begin
  X:=Round(-SpriteEngine.X)+X;
  Y:=Round(-SpriteEngine.Y)+Y;
  // .......
end;
Klappt bei mir wunderbar ;-)

mimi 21. Jun 2008 10:56

Re: [Andorra] Objekte per MouseDonw Plazieren ?
 
So, klappt das leider nur nach Rechts ganz gut, also wenn ich die Engine nach rechts scrolle, aber was ist wenn ich nach links scrolle ? Dann klappt das nicht mehr. :( :(

mimi 23. Jun 2008 10:56

Re: [Andorra] Objekte per MouseDonw Plazieren ?
 
Es hatte doch so Funktioniert wie es Codewalker vorgeschlagen hat.
(Ich habe wohl bei meinem ersten test zu früh aufgeben.)

Vielen Dank noch mal.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:30 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