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