Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Kugeln in glas fallen lassen (https://www.delphipraxis.net/82248-kugeln-glas-fallen-lassen.html)

Max Langer 9. Dez 2006 14:03


Kugeln in glas fallen lassen
 
Hallo

also ich habe folgendes Problem. Ich möchte Kugeln (kreise) in ein glas (einfach eine Paintbox) "fallen" lassen. Natürlich kann man sich einfach die Koordinaten der kreise merken, aber ich möchte dass die kreise ganz anliegen:

http://www.host2k.de/User/orakeldel/kreise.gif

Wie kann ich mir jetzt die Koordinaten errechnen die ich für die Ellipsen-funktion bei TCanvas brauche.

Hoffe ihr könnt mir helfen

Grüße

Max

jfheins 9. Dez 2006 14:18

Re: Kugeln in glas fallen lassen
 
Wenn sich die Kreise berühren, gilt folgendes:

(x2 - x1)² + (y2 - y1)² = (2r)²

x1, y1: x/y-koordinate des linken/unteren kreises

x2, y2: Koordinaten des anderen Kreises

r: Kreisradius

Das kannst du nun bspw. nach x2 umstellen, dann kannst du - mit den konstanten x1, y1 und r - das y2 ausrechnen ;)

dino 9. Dez 2006 16:17

Re: Kugeln in glas fallen lassen
 
aber nur bei gleichen radien, ansonsten (r1+r2)^2


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:20 Uhr.

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 by Thomas Breitkreuz