AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Algorithmen, Datenstrukturen und Klassendesign Rectangle finden, daß von 2 Punkten aufgespannt wird
Thema durchsuchen
Ansicht
Themen-Optionen

Rectangle finden, daß von 2 Punkten aufgespannt wird

Ein Thema von Bjoerk · begonnen am 7. Feb 2014 · letzter Beitrag vom 8. Feb 2014
Antwort Antwort
Der schöne Günther

Registriert seit: 6. Mär 2013
6.199 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 17:59
Winkel zwischen horizontaler Achse und was? Eine Skizze wäre wirklich ein Heilsbringer.
  Mit Zitat antworten Zitat
Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 18:12
Winkel zwischen horizontaler Achse und was? Eine Skizze wäre wirklich ein Heilsbringer.
Deine Skizze ist genau richtig.

P1 = TopLeft, P2 = BottomRight

Alpha = Winkel zwischen Horizontale zur Strecke TopLeft-TopRight.
  Mit Zitat antworten Zitat
Der schöne Günther

Registriert seit: 6. Mär 2013
6.199 Beiträge
 
Delphi 10 Seattle Enterprise
 
#3

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 18:23
Der rote oder der blaue
Angehängte Grafiken
Dateityp: png Unbenannt.png (7,4 KB, 12x aufgerufen)
  Mit Zitat antworten Zitat
Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 18:26
Der Blaue
  Mit Zitat antworten Zitat
Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#5

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 18:27
Hä? Das ist doch überhaupt keine zusätzliche Information, egal welcher von beiden gemeint ist. Der Winkel ergibt sich ja allein schon aus den Positionen der beiden bekannten Eckpunkte. die beiden anderen können immer noch überall sein...
  Mit Zitat antworten Zitat
Der schöne Günther

Registriert seit: 6. Mär 2013
6.199 Beiträge
 
Delphi 10 Seattle Enterprise
 
#6

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 18:33
Ach komm, es ist Freitag Abend
Da sind die grauen Zellen aufgebraucht.
  Mit Zitat antworten Zitat
Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#7

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 18:38
Hä? Das ist doch überhaupt keine zusätzliche Information, egal welcher von beiden gemeint ist. Der Winkel ergibt sich ja allein schon aus den Positionen der beiden bekannten Eckpunkte. die beiden anderen können immer noch überall sein...
Nee, das Rechteck ist schon eindeutig?
  Mit Zitat antworten Zitat
Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#8

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 18:47
-> Skizze
Angehängte Dateien
Dateityp: pdf Rectangle.pdf (1,06 MB, 19x aufgerufen)
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#9

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 19:11
Zitat:
Nee, das Rechteck ist schon eindeutig?
Nope. Der Winkel lässt sich doch aus den Punkten berechnen.

Aber aus deiner Skizze geht hervor, dass du den Winkel zwischen der horizontalen und der oberen Seite meinst. dann passt's.

Ich würde das Koordinatensystem um den Winkel drehen. Danach suchst du das achsparallele Rechteck und dreht die neuen zwei Punkte wieder zurück.
Die Formel kannst du dann auch in eine Zeile schreiben und schreiben "ist ja anschaulich korrekt"

Ich poste hier mal frech den MATLAB-Quellcode:
Code:
for phi = 0:0.01:2
   P1 = [1;4];
   P3 = [3;2];
   %phi = 0.5;

   R = [cos(phi), -sin(phi); sin(phi), cos(phi)];

   NewP = R * [P1,P3];
   P2 = R' * NewP([1; 4]);
   P4 = R' * NewP([3; 2]);

   plot([P1(1), P2(1), P3(1), P4(1), P1(1)], [P1(2), P2(2), P3(2), P4(2), P1(2)], 'o-'); daspect([1 1 1])
   xlim([-1 6]);
   ylim([-1 6])
   drawnow;
   pause(0.01)
end
Du siehst (vielleicht) dass ich die gegebenen Punkte P1 und P3 getauft habe. P2 errechnet sich dann nach R' * (xx(R*P1); yy(R*P2))
wobei xx(k) bedeuten soll "x-Komponente des Vektors k" und yy analog. R' ist die transponierte von R.
P4 = R' * (xx(R*P3); yy(R*P1))
  Mit Zitat antworten Zitat
Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#10

AW: Rectangle finden, daß von 2 Punkten aufgespannt wird

  Alt 7. Feb 2014, 20:20
Dank Dir. Damit kann ich allerdings nix anfangen? Man braucht doch nur beta und gamma und alles ist gut (- > Skizze).
Angehängte Dateien
Dateityp: pdf Rectangle2.pdf (1,66 MB, 5x aufgerufen)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:57 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-2025 by Thomas Breitkreuz