Canvas - Popup bei MouseOver - #113459 (Graphische Oberflächen)

pktm

2008-08-13 02:14

User since
2003-08-07
2921 Artikel
BenutzerIn

Dubu+2008-07-27 01:19:15--
Suchst du vielleicht etwas wie Tk::Balloon?

Jepp.
Ich hab jetzt jedem Element in der Canvas ein Tag gegeben.
Für jedes Tag gibts ne Message in Tk::Baloon.

Code: (dl )

	# -- bloat the baloon
           my %gui = (); #... wird irgendwo gefüllt
	$gui{baloon} 	= $top->Balloon(-initwait => 0);
	
	my %msgs = ();
	for my $key ( keys %gui ) {
		if( $key =~ m/^((?:section|shelf)\d+)$/ ) {
			$msgs{$1.'_tag'} = $1;
		}
	}
	
	$gui{baloon}->attach($canvas,
		-balloonposition => 'mouse',
		-msg => \%msgs,
	);

Wie kann ich diese Meldungen jetzt nachträglich einzeln ändern? Gibts dafür was in Configure?

Ich habs momentan so gemacht, dass ich die Referenz auf %msgs irgendwo speichere. Aber ich greife eigentlich lieber über nette Schnittstellen auf sowas zu.

Grüße, pktm

http://www.intergastro-service.de (mein erstes CMS :) )