Rectangle mit der Maus verschieben (Graphische Oberflächen)

[thread]11779[/thread]

Rectangle mit der Maus verschieben

Leser: 1

Kean

2008-05-08 11:04

User since
2004-08-18
463 Artikel
BenutzerIn

user image

Ich würde gerne einen Rahmen in einem Canvas frei mit der Maus verschieben können. Denke dies ist evtl. über bind möglich.

So soll es dann aussehen:

Code (perl): (dl )

$canvas->delete("all");
$image_in = $canvas->Photo( -file       => $file_use, -format => $image_format );
$picture = $canvas->createImage(0, 0, -image => $image_in, -anchor => "nw");
$rahmen = $canvas->createRectangle(100, 100, 266, 300, -width => 2);
$canvas->bind($rahmen, ?????);

Welches Binding benötige ich für den Mausklick und wie kann ich die bewegung der Maus an die Position des Rahmen knüpfen???

renee

2008-05-08 11:22

User since
2003-08-04
14371 Artikel
ModeratorIn

Schau Dir mal http://groups.google.co.uk/group/comp.lang.perl.tk... an...

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

View all threads created 2008-05-08 11:04.