Webmaster Forum / Perl / Tk / April 2007

Hi, just released a new program to CPAN called Shapeshifter.
It is a stripped-down version of my secure stream, chat, and
file transfer utility.
In case anyone wants to see a simple example of Tk and threads

I've a question about Win32::OLE and Word.
from a perl script word-application starts via OLE in the following way:
$Word = Win32::OLE->new('Word.Application');
$Word->Documents->Open($file);

When I use
($x, $y) = ($Tk::event->x, $Tk::event->y);
on a canvas to get the coordinates of the mouse, is there any way to
specify the precision at which I'd like to get them? In my lasso-

It couldn't be simpler:
$lb = $mw->Scrolled("Listbox")->pack();
I then put 20 lines in the listbox, of which 10 duly appear. So where's
the scrollbar? OK, I can grab the text with the mouse and drag it up and

how can I disable the LEFT and RIGHT-Key in a scrolled HList, because they
causes an error (Entry "" not found) when all entries in the hlist are
disabled ?
Thanks

Can anyone offer any suggestions or help in getting a Perl Tk
programme to use character sets such as UTF-8 or ISO8859-1 to work on
a mininal Linux platform.
The warning message that I get on running the programme is

Is it possible to color a portion of the Hlist entry text?
Suppose my HList is as follows.
          Root
             |_ First Entry in the HList

Is there any way to add image in a Tk::Listbox entry?
Thanks,
/Robert

I'd like to implement a simple lasso selection that allows me to
select a few objects on a canvas and move them by dragging the mouse.
At the moment, I can draw the selection with my mouse, but I can't
seem to dig up any ideas in Google about how to then go on and select

I've got script which gets packets like that:
A1: 123
Then it makes fork(). Child proces creates Tk window called 'A1' with button,  
the title of button is '123'. The parent continue to listening. After that

       In my application i have so many entries .I need to validate
the entries when the user entered the values in that entries. They are
three cases the user go to other widget form the entry.
First case :By pressing Enter :    Here i used bind to bind the task

I am looking to create a series of list/combo boxes where the choices
available in the second box are based on the selection in the first and
the choices in the third are based on the second.
I didn't see a comp.lang.perl.tk FAQ, so hopefully someone can point me

Is this possible?  Chain a Tie::File toe a Tie::Tk::Listbox?
Is there a better way to get a listbox based on a file instead of an
array?
Thanks in advance.

I am using Net::SFTP::Foreign so that I can transfer a file to a
server. I want to make a GUI for it and have run into some problems. I
am new at programming in Tk so excuse my errors.
#!/usr/bin/perl -w

Hullo,
Using ActivePerl downloaded about 3 weeks ago on win XP
I installed MesgBox.pm using PPM.
package Tk::MesgBox;    # Documented at the __END__.