Linie zeichnen

[guko56]

Hallo
Stehe mal wieder auf den Schlauch. Für die Profis bestimmt kein Problem.
Möchte eine Linie mit Hilfe von Programmzeilen verändern. Klappt leider nicht so.
Mein Code lauten
on mouseup
set the Left of graphic „line_test“ to 500
set the Right of graphic „line_test“ to 700
set the Top of graphic „line_test“ to 150
set the Bottom of graphic „line_test“ to 300
end mouseup
Wenn ich jetzt einen Wert verändere ädert sich die gesamte Lage der Linie.
Ich hoffe ihr könnt mir helfen.
Gruß Günter

[Torsten]

Hallo guko56,

schau mal in die Properties der Grafik, da siehst Du, dass für die Angabe einer Linie ganz unten die „points“ als zwei Koordinaten angegeben werden, nämlich dem Start- und Endpunkt. Dazu werden der jeweilige x und y-Wert in zwei Zeilen angegeben.

In Deinem Fall würde also der Befehl lauten:

set the points of graphic "line_test" to "500,150" & cr & "700,300"
oder
set the points of graphic "line_test" to "700,300" & cr & "500,150"

Je nachdem, ob Du noch Pfeilspitzen dran hast und diese angezeigt werden, ansonsten ist es visuell egal.

Wenn Du es ganz clever machen willst, nimmst du ein allgemeines Schema und ersetzt die entsprechenden Werte in den Variablen:

set the points of graphic tGraphic to tLeft & comma & tTop & cr & tRight & comma & tBottom

Happy Coding
Torsten

[guko56]

Danke Torsten. hast mir sehr geholfen.

[Autor]

Beiträge