By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
437,904 Members | 1,089 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 437,904 IT Pros & Developers. It's quick & easy.

how to make readonly text area in perl

P: 17
i want to make my text area readonly. is there any way to do that in perl.

any help,appreciate.......
Oct 22 '08 #1
Share this Question
Share on Google+
2 Replies


nithinpes
Expert 100+
P: 410
Please be more clear while posting questions. If you are referring to Textbox in Perl-Tk, you can set this by using the '-state' option. After inserting required data in textbox, you may configure the state as 'disabled'. E.g.

Expand|Select|Wrap|Line Numbers
  1. my  $tx= $fr->Scrolled( 'Text', '-scrollbars' => 'e', '-background' => 'white',       
  2.   )->pack( -fill => 'both', -expand => 1, -side => 'bottom' );
  3. $tx->insert('insert', "characters of line1\n");
  4. $tx->insert('insert',"characters of line2\n"');
  5. $tx->insert('insert',"characters of line3\n");
  6. $tx->insert('insert',"characters of line4\n");
  7. $tx->configure('-state'=> 'disabled'); ## set the state as disabled (non-editable)
  8.  
  9.  
- Nithin
Oct 22 '08 #2

P: 17
thanks a lot nithin it worked.sorry i mean text box.ok.
Oct 22 '08 #3

Post your reply

Sign in to post your reply or Sign up for a free account.