> this works for setting the original color but doesn't allow you to change
> the color after creating the label. If someone knows a way to do this
> please let me know. I tried $label->foreground([150,0,0]);

  Try...

  $label->Change(-foreground([150,0,0]);
  
  For some reason this does not kick in until I do a:

    $label->Text($label->Text);

  ...basically setting the text back to itself.  There may be better way,
  but I haven't discovered it yet.

  -dhiltz

> > ----------
> > From:       David Hiltz[SMTP:[EMAIL PROTECTED]]
> > Sent:       Tuesday, February 23, 1999 11:17 AM
> > To:         [EMAIL PROTECTED]
> > Subject:    RE: [perl-win32-gui] font colors
> > 
> > 
> > From:                   "Doughty, Matt" <[EMAIL PROTECTED]>
> > To:                     "'[EMAIL PROTECTED]'"
> > <[EMAIL PROTECTED]>
> > Subject:                [perl-win32-gui] font colors
> > Date sent:              Mon, 22 Feb 1999 18:40:17 +0900
> > Send reply to:          [EMAIL PROTECTED]
> > 
> > > I apologize if this has been asked before can anyone tell me how to change
> > > the font color on a Label? I tried creating a new font with the -color =>
> > > "Green" but it ididn't work. TIA,
> > >  //Matt
> > 
> >    $Win->AddLabel(
> >        -text => "whatever",
> >        -left => 50,
> >        -top  => 50,
> >        -foreground => [150,0,0],
> >        -background => [0,0,150],
> >    );
> > 
> >    To pick a color interactively you can also call:
> > 
> >       $foreground = $Win->ChooseColor();
> > 
> >    Hope that helps.
> > 
> >    - David Hiltz
> > 
> 


Reply via email to