AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Gedrehter Gradient im Rechteck
Thema durchsuchen
Ansicht
Themen-Optionen

Gedrehter Gradient im Rechteck

Ein Thema von Medium · begonnen am 13. Dez 2015 · letzter Beitrag vom 14. Dez 2015
Antwort Antwort
Medium

Registriert seit: 23. Jan 2008
3.687 Beiträge
 
Delphi 2007 Enterprise
 
#1

Gedrehter Gradient im Rechteck

  Alt 13. Dez 2015, 08:29
Ich zweifle gerade an mir selbst. Ich möchte einfach nur einen linearen Farbverlauf in ein Rechteck zeichnen. So weit so einfach. Diesen will ich aber gerne in einem beliebigen Winkel zeichnen, und zwar so, dass die Farbe 0 und Farbe 1 immer irgendwo genau am Rand landen, der Verlauf aber das Rechteck genau ein mal ausfüllt. Ein Bild ist da weit aussagekräftiger als Text, daher bitte jetzt den Anhang ansehen. (Angegeben wird der Verlauf mittels zweier Punkte zwischen denen der Verlauf läuft, bei mir P0 und P1.)

(Ich warte so lange.)

Ok, am Bild sieht man, dass ich schon mal auf den Trick gestoßen bin, dass die Eckpunte um den Faktor Sqrt(2) weiter vom Zentrum entfernt sind als die Kantenmittelpunkte. Und für diese zwei Fälle (Drehung um Vielfache von 90° und Drehung um Vielfache von 45°) stimmt das Ergebnis auch. Leider aber für alles dazwischen nicht, wenn ich zwischen den Faktoren "1" und "Sqrt(2)" linear mit dem Winkel interpoliere. Dann laufen nämlich meine "Endkanten" des Verlaufs durch das Rechteck (ganz rechts im Bild gezeigt), und das sollen sie nicht.
In irgend einer Weise muss das mit der kleinsten umschließenden Ellipse zusammenhängen (daher kommt auch die Sqrt(2)), aber das in zwei Punkte in Abhängigkeit von Mittelpunkt, Breite, Höhe und Drehwinkel zu verpacken - da habe ich irgendwie eine Blockade. Auch Google half leider nur wenig, da viele offenbar nur die 90° oder 45° Fälle brauchen.

Für ein Quadrat allerdings funktioniert der gezeigte Weg schon! Aber das genügt leider nicht. Ich hoffe, dass hier jemand etwas Licht in mein Hirn bringen kann. Danke schon mal!

(Realisiert wird das ganze in C#, das sollte aber eher unerheblich sein. Wenn sich durch die Benutzung davon (also GDI+) einfachere Wege bieten als die P0 und P1 von Hand zu berechnen, wäre ich aber natürlich auch interessiert, weshalb ich das hier kurz erwähne.)
Angehängte Grafiken
Dateityp: png squares.png (71,1 KB, 45x aufgerufen)
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)

Geändert von Medium (13. Dez 2015 um 08:38 Uhr)
  Mit Zitat antworten Zitat
Dejan Vu
(Gast)

n/a Beiträge
 
#2

AW: Gedrehter Gradient im Rechteck

  Alt 13. Dez 2015, 10:59
Nennen wir deine beiden Eckpunkte E0 und E1. Deine gesuchten Punkte P0 und P1 liegen auf einer Geraden G durch C im gewünschten Neigungswinkel Phi des Gradienten verläuft.

P0 ist doch der Schnittpunkt der Senkrechte zu G, die durch E0 geht. Für P1 gilt das gleiche.
  Mit Zitat antworten Zitat
Namenloser

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

AW: Gedrehter Gradient im Rechteck

  Alt 13. Dez 2015, 11:18
Hier noch mal als Skizze.
Angehängte Grafiken
Dateityp: png winkel.png (70,2 KB, 27x aufgerufen)
  Mit Zitat antworten Zitat
Medium

Registriert seit: 23. Jan 2008
3.687 Beiträge
 
Delphi 2007 Enterprise
 
#4

AW: Gedrehter Gradient im Rechteck

  Alt 13. Dez 2015, 17:56
Ok, so weit so gut. Ich habe jetzt einfach mal naiv den Schnitt gebildet:

S: Vektor (sin(φ) cos(φ))
K: Gerade durch C im Winkel φ
K': Senkrechter Vektor zu K (-Ky Kx)
N: Gerade durch E0, senkrecht zu K

Code:
    /sin(phi)\
S = |        |,
    \cos(phi)/


K = C - aS,

     /-Cy + a*cos(phi)\
K' = |                |,
     \ Cx - a*sin(phi)/

N = E0 + bK'

Ziel: N = K
(Das φ kennt die Code-Box leider nicht )

Ich habe das mal ausmultipliziert und nach b gelöst, und dies eingesetzt um nach a auflösen zu können. Aber irgend etwas passt da gewaltig nicht. Ich komme auf eine quadratische Gleichung für a, also 2 Lösungen! Das dürfte beim Schnitt von 2 Gerade doch überhaupt nicht sein. (Und der Term ist ein höllischer Rattenschwanz.)
Dazu kommt, dass "-Cy + a*cos(φ)" nicht 0 werden darf, und ich für den Fall auch noch die komplett anders herum aufgebaute Lösung brauche. (sin(φ)+cos(φ) darf auch nicht 0 werden, aber das sollte es ja nie.)

Ich befürchte hier grobe Denkfehler, die ich in 2 dicht beschriebenen DIN A4 Seiten mit Monster-Termen nicht mehr finde. Die Lösung muss vom Gefühl her viel einfacher sein.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
  Mit Zitat antworten Zitat
Namenloser

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

AW: Gedrehter Gradient im Rechteck

  Alt 13. Dez 2015, 23:02
Eigentlich sollte der Schnittpunkt sich leicht finden lassen, indem du den Punkt C ganz einfach auf die Senkrechte projizierst. Die Lösung müsste dann P = E + (cos φ, sin φ)*(C-E) sein.

Ich muss aber zugeben, ich habe auch erst ein paar Minuten lang sinnlos Variablen auf dem Papier hin- und hergeschoben, bis ich darauf gekommen bin. Hoffe, das stimmt jetzt auch. Aber müsste es eigentlich.
  Mit Zitat antworten Zitat
Medium

Registriert seit: 23. Jan 2008
3.687 Beiträge
 
Delphi 2007 Enterprise
 
#6

AW: Gedrehter Gradient im Rechteck

  Alt 14. Dez 2015, 00:01
Ich hab das mal exemplarisch angewendet.

Gegeben ist ein Rechteck mit der oberen linken Ecke E bei (10,10) und einer Breite von 100 und Höhe von 30. Der Mittelpunkt C liegt dann bei (60,25).

Für φ = 0° ergibt sich korrekt der Punkt P=(60,10)
Für φ = 90° ergibt sich korrekt der Punkt P=(10,25)
Für φ = 45° ergibt sich falsch der Punkt P=(45.35,20.605) (Es sollte (10,10) sein)

Da schleicht sich auch wieder dieser blöde Faktor von Sqrt(2)/2 ein, da Sin(45°) ~= 0.707 = Sqrt(2)/2.

Die Menge der Punkte P müssten - wenn ich mir das richtig vorstelle - in etwa so wie im Anhang aussehen (rote Kurven). Die Frage ist dann aber, welche Formel gibt diese vor, bzw. sind das echt Halbkreise/-ellipsen, und wenn ja mit welchen radii?
Angehängte Grafiken
Dateityp: png curves.png (12,2 KB, 1x aufgerufen)
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)

Geändert von Medium (14. Dez 2015 um 02:10 Uhr)
  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 20:12 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