[sf-perl] Tk

[Francisco Obispo]

looks like Tk::TableMatrix::Spreadsheet is not installed:

# cpan Tk::TableMatrix::Spreadsheet

should do the trick



On Aug 31, 2010, at 8:32 AM, Lemseffer. Tahar (SDA) wrote:

> Hello Garth,
> Here is my Tk code, but I’m running some issue here..
> Error: can’t locate TK/TableMAtrix/Spreedsheet.pm
>  
> Any idea why?
> #!/usr/local/bin/perl –w
> 
> Use strict;
> 
> use Tk; 
> use Tk::TableMatrix::Spreadsheet; 
> $mw = MainWindow->new; 
> $mw->configure(-title=>'Testing'); 
> $mw->minsize(qw(500 200)); 
> $menu = $mw->Frame()->pack(-side=>'top',-fill=>'x'); 
> $menu_file = 
> $menu->Menubutton(-text=>'File', 
>  -tearoff=>'false' 
> )->pack(-side=>'left'); 
> $menu_file->command(-label=>'Exit',-command=>sub{$mw->destroy}); 
> $frame = 
> $mw->Frame(-height=>'10', 
>  -width=>'30', 
>  -relief=>'groove', 
>  -borderwidth=>'3' 
> )->pack(-fill=>'x',-pady=>'0'); 
> @border = (0,0,0,1); 
> $arrayVar->{"0,0"} = "%"; 
> $arrayVar->{"0,1"} = "Artist"; 
> $arrayVar->{"0,2"} = "Album"; 
> $arrayVar->{"0,3"} = "Year"; 
> $arrayVar->{"0,4"} = "Genre"; 
> $table = $frame->Scrolled('Spreadsheet', 
>  -cols => 5, 
>  -width => 5, 
> -height => 6, 
>  -titlerows => 1, 
>  -variable => $arrayVar, 
>  -selectmode => 'multiple', 
>  -selectmode => 'extended', 
>  -selecttype => 'row', 
>  -resizeborders => 'col', 
>  -bg => 'white', 
>  -rowheight => 2, 
>  -bd => \@border, 
>  -justify => 'left', 
>  -drawmode => 'compatible', 
>  -wrap => 0, 
>  -relief => 'solid' 
> )->pack(-fill=>'both'); 
> $table->rowHeight(0,1); 
> $table->tagRow('title',0); 
> $table->tagConfigure('title', -bd=>2, -relief=>'raised'); 
> $table->colWidth(0,5,3,6,4,10); 
> #$table->selectionAnchor('topleft'); 
> $table->activate("1,0"); 
> MainLoop();
> 
>  
>  
> From: sanfrancisco-pm-bounces+lemseffert=sacsewer.com at pm.org [mailto:sanfrancisco-pm-bounces+lemseffert=sacsewer.com at pm.org] On Behalf Of Garth Webb
> Sent: Friday, August 27, 2010 1:54 PM
> To: San Francisco Perl Mongers User Group
> Subject: Re: [sf-perl] Tk
>  
> Yes that is possible to do with Perl/Tk. I googled Perl/TK found a few tutorials that will help you get started:
>  
> http://www.bin-co.com/perl/perl_tk_tutorial/
> http://www.lehigh.edu/~sol0/ptk/perlmonth01/pm1.html
>  
> and of course the POD for TK itself:
>  
> http://search.cpan.org/~ni-s/Tk-804.027/pod/UserGuide.pod
>  
> HTH
>  
> Garth
>  
> On Fri, Aug 27, 2010 at 1:36 PM, Lemseffer. Tahar (SDA) <lemseffert at sacsewer.com> wrote:
> That is true the worst that can happen is you say "i dunno".
> Ok here is my little delima.
> I want to create a Table with the fields: Point Name, Point Description,
> Point Status, and comments field.
> I want to be able to enter it Point Name ..etc manually into the table.
> 
> Any help will be appreciated
> Thank you
> T
> 
> -----Original Message-----
> From: Joe Brenner [mailto:doom at kzsu.stanford.edu]
> Sent: Friday, August 27, 2010 1:31 PM
> To: Lemseffer. Tahar (SDA)
> Cc: San Francisco Perl Mongers User Group
> Subject: Tk
> 
> 
> Lemseffer. Tahar (SDA) <lemseffert at sacsewer.com> wrote:
> 
> > Good Afternoon All,
> > Is anyone familiar with TK?
> 
> I wouldn't say "familiar", but I used it a while back. Feel free to hit
> us with your question, the worst that can happen is we say "i dunno".
> 
> ____________________________________________________________________________
> EMAIL DISCLAIMER:
> This email and any attachments thereto may contain private, confidential, and
> privileged material for the sole use of the intended recipient. Any review,
> copying, or distribution of this email (or any attachments thereto) by other
> than the intended recipient is strictly prohibited.
> 
> If you are not the intended recipient, please contact the sender immediately
> and permanently delete the original and any copies of this email and any
> attachments thereto.
> _____________________________________________________________________________
> 
> _______________________________________________
> SanFrancisco-pm mailing list
> SanFrancisco-pm at pm.org
> http://mail.pm.org/mailman/listinfo/sanfrancisco-pm
>  
> _______________________________________________
> SanFrancisco-pm mailing list
> SanFrancisco-pm at pm.org
> http://mail.pm.org/mailman/listinfo/sanfrancisco-pm

Francisco Obispo 
Hosted@ Programme Manager
email: fobispo at isc.org
Phone: +1 650 423 1374 || INOC-DBA *3557* NOC
Key fingerprint = 532F 84EB 06B4 3806 D5FA  09C6 463E 614E B38D B1BE