perl - Curses::UI - How to close a window? -


how close win2 when pressing "back"-button?

#!/usr/bin/env perl use warnings; use 5.012; use curses::ui; $curses::ui::debug = 0; $list = [ qw( use libraries distribution instead of system ) ]; %hash; $y=0; $x_1=0; $width_1=14; $x_2=16; $width_2=30;  $cui = new curses::ui(  -color_support => 1 ); $win1 = $cui->add( "win1", 'window', );  $entry ( @$list ) {     $win1->add( undef, 'textentry', -x => $x_1, -y => $y, -width => $width_1,          -text => $entry, -focusable => 0, -readonly => 1, );     $hash{$entry} = $win1->add( $entry, 'textentry', -x => $x_2, -y => $y,          -width => $width_2, -focusable => 1, -readonly => 0, );     $y++; } $but1 = $win1->add(  "addbutton1", 'buttonbox',          -buttons => [ { -label => "< ok >", -onpress => \&add } ],          -x => 5, -y => $y + 2 );  sub add {      $y = 0;     $win2 = $cui->add( "win2", 'window', );     $entry ( @$list ) {         $input = $hash{$entry}->get();         $win2->add( undef, 'textentry', -x => $x_1, -y => $y, -width => $width_1,             -text => $entry, -focusable => 0, -readonly => 1, -bg => 'cyan' );         $win2->add( $y, 'textentry', -x => $x_2, -y => $y, -width => $width_2,             -text => $input, -focusable => 0, -readonly => 1, -bg => 'cyan' );         $y++;     }     $but2 = $win2->add(  "addbutton2", 'buttonbox',          -buttons => [{ -label => "< >", ###         -onpress => sub{ $win1->focus() }}], -x => 5, -y => $y + 2 );     sub add2 { $win1->focus(); };     $win2->focus(); }  $cui->mainloop;

call delete method on $cui.

@@ -32,7 +32,7 @@      }      $but2 = $win2->add(  "addbutton2", 'buttonbox',           -buttons => [{ -label => "", ### -        -onpress => sub{ $win1->focus() }}], -x => 5, -y => $y + 2 ); +        -onpress => sub{ $win1->focus(); $cui->delete('win2') }}], -x => 5, -y => $y + 2 );      sub add2 { $win1->focus(); };      $win2->focus();  }

Comments

Post a Comment

Popular posts from this blog

asp.net - repeatedly call AddImageUrl(url) to assemble pdf document -

i'm using abcpdf , i'm curious if can recursively call addimageurl() function assemble pdf document compile multiple urls? something like: int pagecount = 0; int theid = thedoc.addimageurl("http://stackoverflow.com/search?q=abcpdf+footer+page+x+out+of+", true, 0, true); //assemble document while (thedoc.chainable(theid)) { thedoc.page = thedoc.addpage(); theid = thedoc.addimagetochain(theid); } pagecount = thedoc.pagecount; console.writeline("1 document page count:" + pagecount); //flatten document (int = 1; <= pagecount; i++) { thedoc.pagenumber = i; thedoc.flatten(); } //now try again theid = thedoc.addimageurl("http://stackoverflow.com/questions/1980890/pdf-report-generation", true, 0, true); //assemble document while (thedoc.chainable(theid)) { thedoc.page = thedoc.addpage(); theid = thedoc.addimagetoc...
Read more

java - Android recognize cell phone with keyboard or not? -

in android app, want detect user's device if device has keyboard(like motorola milestone) , show corresponding user interface. guys know how that? ! regards justicepenny http://developer.android.com/reference/android/content/res/configuration.html public int keyboard the kind of keyboard attached device. 1 of: keyboard_nokeys, keyboard_qwerty, keyboard_12key. that's it!
Read more

iphone - How would you achieve a LED Scrolling effect? -

how achieve led scrolling effect example below? led sign - led ticker emulator iphone , ipad http://img.skitch.com/20101201-rsfh4p1bajb1wp94k466pdpiuj.preview.jpg sometimes remunerates comment in other posts :) have put code you, should implement font '8pin matrix' realistic feeling. uilabel *label; - (void)viewdidload { [super viewdidload]; label = [[uilabel alloc]initwithframe:cgrectmake(10, 50, 300, 20)]; label.font = [uifont fontwithname:@"courier-bold" size:16.0]; label.backgroundcolor = [uicolor blackcolor]; label.textcolor = [uicolor greencolor]; label.linebreakmode = uilinebreakmodecharacterwrap; // otherwise "…" label.text = @"this led text scrolled "; // blanks space between [self.view addsubview:label]; [nstimer scheduledtimerwithtimeinterval:0.12f target:self selector:@selector(scrolllabel) use...
Read more