2007/11/19, zentara <[EMAIL PROTECTED]>:
>
> On Mon, 19 Nov 2007 00:14:29 +0800, [EMAIL PROTECTED] (Panda-X)
> wrote:
>
> >Hi all,
> >
> >Below is my code. With this code, 12345 will show at once
> >after 5 seconds I click the button.
> >But what I want is to insert() each number per second.
> >Is
On 11/18/07, Panda-X <[EMAIL PROTECTED]> wrote:
> Any more clues ?
This is a forum for Perl beginners, but there are forums available
specifically for all of the major modules used with Perl. Some modules
have more than one forum. As you might expect, you'll generally get
better answers faster by
2007/11/19, Tom Phoenix <[EMAIL PROTECTED]>:
>
> On 11/18/07, Panda-X <[EMAIL PROTECTED]> wrote:
>
> > But what I want is to insert() each number per second.
>
> > sub RollText{
> > for ( 1..5 ) {
> > $_[0] ->{mw}{box} -> insert ( 'end', $_ ) ;
> > sleep 1;
> > }
> > }
>
> You p
On 11/18/07, Panda-X <[EMAIL PROTECTED]> wrote:
> But what I want is to insert() each number per second.
> sub RollText{
> for ( 1..5 ) {
> $_[0] ->{mw}{box} -> insert ( 'end', $_ ) ;
> sleep 1;
> }
> }
You probably don't want sleep() there; the after() method is generally
th
Hi all,
Below is my code. With this code, 12345 will show at once
after 5 seconds I click the button.
But what I want is to insert() each number per second.
Is that something I can do like $| = 1 in such case ?
At least, could anybody tell this is the behavior of insert () ?
or it's the behavior
can you add after your 'insert'
$text1->update() to make a refresh.
You need an update if there is no new event in your widget.
Be areful : Don't use update for each line if you insert a lot of lines
but only at the end of a batch or only every 100 lines to keep good
performance.
macus
I am trying to make a tk app that parses the qrz callsign ham radio
database: It's not working. I'm trying to get information from the
text field, and the result in the gray box.
#!/usr/bin/perl
use Tk;
use LWP::Simple;
use LWP::UserAgent;
my $main = MainWindow -> new();
$entr
PM
> > To: ; [EMAIL PROTECTED]
> > Subject: Could you please help with a PERL/TK
> question.
> >
> >
> >
> > Hi, I developed a perl/TK script in Win-2000
> > environment.
> > when I run it the DOS-screen pops up and displays
> my
> > program e
istribution. But if that's the case, then you won't be able to double-click
anyway.
-Original Message-
From: Toby Stuart [mailto:[EMAIL PROTECTED]
Sent: Sun 7/11/2004 11:34 PM
To: 'Marco Perl'
Cc: '[EMAIL PROTECTED]'
Subject:
> -Original Message-
> From: Marco Perl [mailto:[EMAIL PROTECTED]
> Sent: Monday, 12 July 2004 4:19 PM
> To: ; [EMAIL PROTECTED]
> Subject: Could you please help with a PERL/TK question.
>
>
>
> Hi, I developed a perl/TK script in Win-2000
> environment.
Hi, I developed a perl/TK script in Win-2000
environment.
when I run it the DOS-screen pops up and displays my
program errors. but this screen closes so fast that
its
impossible to read the error. so, how do I debug my
perl.ptk script or how do I slow down the DOS-screen
to read the errors?
tha
I think thath is a problem of implementation of TK on Win/DOS.
On Linux with Gnome Desktop i'm tries something script with TK, opening new window by a
button, without problem.
if you post all the code is best...
Walter
> I have a TK issue.
>
> This code creates the initial TK box.
>
> >>
I have a TK issue.
This code creates the initial TK box.
>> use vars qw/$TOP/;
>> $TOP = Tk::MainWindow->new;
>> $TOP->title('blah blah');
>> $TOP->configure(-background => lc('PeachPuff1'));
etc.(a lot more code)
When the user clicks the button of his choice, the TK box disappears into
Can anyone help me by telling me how can I scroll in program to the end of a
Scrolled object after adding some text that goes out of the displayed area?
Many thanks in advance,
Daniel Bornaz
GBS Specialist
~~
Compaq Computer Romania
77 Emanoil Porumbaru St.
Bucha
14 matches
Mail list logo
