Re^3: Perl::Gtk and Color tutorial


Syntactic Confectionery Delight
	PerlMonks

Re^3: Perl::Gtk and Color tutorial

by blueberryCoffee (Scribe)

on Dec 15, 2004 at 10:30 UTC ( [id://414979]=note: print w/replies, xml )

Need Help??

in reply to Re^2: Perl::Gtk and Color tutorial
in thread Perl::Gtk and Color tutorial

take a look at the perl-gtk2 class docs. Label is a subclass of widget, which provides the get_colormap function. In your above code change:

my $colormap = $l->window->get_colormap();
[download]

to:

my $colormap = $l->get_colormap();
[download]

I have not used this but it looks right from the docs.

Comment on Re^3: Perl::Gtk and Color tutorial Select or Download Code

Replies are listed 'Best First'.

Re^4: Perl::Gtk and Color tutorial
by Crackers2 (Parson) on Dec 15, 2004 at 15:00 UTC

That does get me a little further, but now it still fails on the last line:

      my $l = new Gtk::Label( "Success" );
      my $colormap = $l->get_colormap();
      my $gdk_color = Gtk::Gdk::Color->parse_color( "green" );
      $gdk_color = $colormap->color_alloc( $gdk_color );
      $l->window->set_background( $gdk_color );
[download]

$l->window is undefined, so can't do a set_background on it, and $l->set_background doesn't appear to exist either.

[reply]
[d/l]

In Section Seekers of Perl Wisdom