Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Länge zwischen zwei Punkten! (https://www.delphipraxis.net/106403-laenge-zwischen-zwei-punkten.html)

Anjamaus89 10. Jan 2008 11:03


Länge zwischen zwei Punkten!
 
hey na?

Ich versuche ein Programm zu erstellen, wo mir das Programm die Länge zwischen 2 bestimmten Punkten sagen soll.
Es ist ein Punkt festgelegt (Lösung) und einer soll vom Benutzer eingegeben werden.
Der Abstand zwischen diesen Punkten soll dann ausgegeben werden.
Ist das irgendwie programmierbar? :)

Danke schon mal für eure Hilfe

DerDan 10. Jan 2008 11:09

Re: Länge zwischen zwei Punkten!
 
Hallo,


wie weit bist du denn schon? was ist schon fertig und wo haperts?

Anjamaus89 10. Jan 2008 11:12

Re: Länge zwischen zwei Punkten!
 
Naja wir müssen jetzt so nen Projekt machen. Da sollen wir halt die Luftlinie zwischen zwei zb Städten dann ausgeben. Da ich aber Anfänger bin weiß ich jetzt nich wirklich wie ich das machen kann bzw. wie ich anfangen könnte. Ich mein die Weltkarte hab ich schon :oops:

lg Anja

Corpsman 10. Jan 2008 11:20

Re: Länge zwischen zwei Punkten!
 
Also das Programmieren ist total simple

Was du machen must ist die Sogenannte Norm berechnen. Also den Abstand zwischen 2 Punkten.

2 Punkte sind gegeben durch x1,y1 und x2,y2

Mittels Pytagoras

Länge = Wurzel aus ( (x1-x2) im Quadrat + (y1-y2) im Quadrat )

und fertig.

Das ganze Programmieren müstest du selbst können.

DeddyH 10. Jan 2008 11:21

Re: Länge zwischen zwei Punkten!
 
Ich werfe mal den guten alten Pythagoras in den Raum, der sollte Dir weiterhelfen.

[edit] Etwas zu spät :? [/edit]

Aurelius 10. Jan 2008 11:25

Re: Länge zwischen zwei Punkten!
 
das ganze könnte man mit dem Satz des Pythagoras machen. Die Punkta auf der Weltkarte hast du ja, du must nur noch den Maßstab in die Berechnung einfügen.

Nehmen wir mal an du hast die Punkte (0;0) und (10;20).

Dann erhälst du bei einem Maßstab von 1 Pixel = 1m:

a = 0 + 10
b = 0 + 20
c²= a² + b² = 100 + 400 = 500
c = sqrt(500) --> Luftlinie

//edit: Grummel, da war wer schneller...^^

Anjamaus89 10. Jan 2008 11:28

Re: Länge zwischen zwei Punkten!
 
hey ich danke euch!
Ich denk mal schon das ich das hinbekomm, und wenn nich kann ich ja immer nochmal fragen! :wink:

bis später dann! :-D

Anjamaus89 10. Jan 2008 11:34

Re: Länge zwischen zwei Punkten!
 
ach noch gleich ne andere Frage. Wie funktionierten denn das, dass wenn wir auf einen bestimmten Punkt in der Karte klicken, dass dann genau da ein anderer Punkt erscheint?

Danke :wink:

Aurelius 10. Jan 2008 11:38

Re: Länge zwischen zwei Punkten!
 
Bim OnClick auf die Karte die Koord. abfragen und dann mit den Canvas-Funktionen färben (hoffentlich ist das richtig :oops: )

snow 10. Jan 2008 21:35

Re: Länge zwischen zwei Punkten!
 
Fast richtig.

Die Koordinaten sind dann auf den bildschirm bezogen. Nicht auf das Image/Paintbox/irgendwas.

Mit der
function ScreentoClient(punkt : Tpoint): Tpoint;

rechnest du die Bildschirmkoordinate in eine Paintbox-/Image-koordinate um.

Gruß snow


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:54 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz