Felice, this is what I had in mind (see below). You must also reference the text property in the change event for the color to change. sub Textfield_Change { my $text = $Textfield->Text(); my $lbltext= $Label->Text(); if ($text eq "") {$Label->Change(-foreground => [255,128,0], -text => $lbltext);} else {$Label->Change(-foreground => [0,0,0], -text => $lbltext);} } Regards, Eric
- Re: [perl-win32-gui] change color Aldo Calpini
- Re: [perl-win32-gui] change color Eric Hansen
- Re: [perl-win32-gui] change color fvittori