Hallo,

nachdem ich nun schon fast verzweifelt bin, da ich fuer mein Problem keine Loesung finde, moechte ich mich nun an euch wenden. Ich arbeite zur Zeit an einem Programm, in das ich unter anderem folgende Funktion integrieren moechte:

In eine TImage-Komponente werden per Image.Canvas.Ellipse… zwei Kreise eingefuegt. Diese Kreise sollen verbunden werden. Bei nur einer Verbindung gestaltet sich das ueber MoveTo und LineTo relativ einfach. Mein Problem besteht darin, mehrere Verbindungsstrecken zwischen zwei Kreise einzuzeichnen. Maximal soll es drei davon geben, von denen eine eben ueber LineTo erzeugt wird. Die anderen beiden Strecken sollen als Boegen dargestellt werden. Doch leider konnte ich auch nach langer Suche in saemtlichen Canvas- und GDI-Methoden keine passende Prozedur finden. Das Problem besteht hauptsaechlich darin, dass die beiden Kreise frei beweglich sind, also nicht immer auf einer horizontalen Linie liegen (Denn sonst koennte man ja einfach eine”halbe” Ellipse erzeugen).

Kennt jemand eine Moeglichkeit, wie ich die beiden Punkte mit Boegen verbinden kann? Ich selbst habe bereits probiert einzelne Punkte mittels trigonometrischer Methoden zu drehen. Das hat bis jetzt aber noch nicht so richtig funktioniert. Hinzu kommen noch die stoerenden Definitionsluecken beim Tangens. Vielleicht ist es auch einfacher drei gerade Strecken zu erzeugen. Hinzu kommt noch, dass ich die einzelnen Linien gerne mit Pfeilen markieren moechte. Doch auch hier stosse ich wieder auf die gleichen Probleme

Kann mir jemand helfen?

Vielen Dank fuer Eure Bemuehungen!

Ich hatte mal ein Programm geschrieben, in dem ich ein ähnliches Problem hatte. Ich hatte mir extra eine eigene Unit
dafür geschrieben, die Objekte (Kreise, Rechtecke,..) erzeugt und die man dann miteinander verbinden kann, etc.

Hier ist mal ein paar kleine Screenshots was die Unit so machen kann:
Klick1 Klick2

Ich weiß gerade nicht was alles online ist und was auch zum Download bereit steht. Wenn du Interesse hast, kann ich das Ganze mal raussuchen.

MfG
JackF

Hallo,

danke fuer die Antwort! Auf jeden Fall waere ich daran interessiert!

Verwandter Thread: www.delphi-forum.de/....php?p=360227#360227
Arc zeichnet übrigens einen Ellipsenausschnitt.