Webmaster Forum / Perl / Tk / November 2004

we are intensively using perl/tk (and especially Tk::Zinc) and a
software bus called ivy (www.tls.cena.fr/products/ivy). Both are open
software and are working pretty well. However, when porting ivy-perl on
windows (in fact there was nothing to port, as the perl flavor of ivy is

 I heard that perl has lot many features within it some of which
specifically cater to the windows operating system, the Win32 API
series. I had specific question relating to the Win32 API sets
supported through it and so thought of posting a query to this mailing

--=====================_-1562702156==.ALT
Content-Type: text/plain; charset="us-ascii"; format=flowed
John,
Have you tried using the focus method to force your widget to have focus.

Can this be done?
By clicking a button to export a Canva with all the drawn circles, rectangles
and texts as well to a bmp file.
-++**==--++**==--++**==--++**==--++**==--++**==--++**==

I have a set of perl scripts which are usually called from the command
line. I would like to make a simple GUI, which has buttons to start each
of them, and a box where the STDOUT of each script is diplayed live. I
came across this:

I want to see if I understand what is available here for printing a
report from a Tk app to a printer on a Win32 system.
1) I can use canvas->postrcipt() to create a postscript file of the
canvas. So, since I currently have a ROText widget for my report, can I

I have an HLIST with embedded entry widgets.
I want to implement functionality that selects or activates (depending
on a single or double click) the row in the HLIST widget and the
embedded entry widgets on the that row whenever the user clicks (or

Hello, how can I display text in the middle of the progressbar. I'd like to
display the current value of the progress bar in percent. I created a text
widget into a progress bar widget but this solution is not satisfiable to  
me.

Hello *,
I used $wi_main->destroy() in many scripts to close a Tk application. But in
the script I just prepare I get a strange behaviour:
--- CUT start (heavily boilt down) ---

is it possible to establish a callback for a Text widget?
I would like to validate and store the text, if the user has modified the
content of the Textbox.
I have tried

i tried to send email in my tk application using Net::SMTP
my $smtp = Net::SMTP->new('10.10.10.10',Hello=>'server', Timeout=>60);
# connect to an SMTP server
$smtp->mail("TEST");     # use the sender's address here

Has there been any movement in porting the Tk/Aqua stuff that's in Tcl/Tk
over to Perl/Tk, in order to get Perl/Tk running under MacOS X without the
use of the X11 server?
--Wade

Any ideas on how to play an MPEG in a Perl/Tk app?
Bill Hess

Looking for a way to create a round or oval MainWindow.
I'm somewhat sure there is no standard way to do this,
perhaps there is a way to do it with a image overlay somehow?
Does anyone have any strategies for accomplishing this?

I'd like the ability to display widgets other than buttons in menus,
specifically, scales.  Is there an easy way to do this, or I have to
try to reinvent what I suspect should already be a well-worn wheel?
For example, I'd like the "Buttons" below to be Scale widgets instead: