Hi,
You are deleting whatever is in $text0 till the énd'.
Comment that out and you will see all the values of $i.
...
sub prg{
for (my $i=0;$i<20;$i++){
# $text0->delete('0.0','end');# commented out
$text0->insert('end',"$i\n");
# sleep 1;
}
}
Bye,
Zeray
|---
Here you go
I took out your sleep and added a timer. Sleep will block tk handling events.
The built in timer will not be blocked. So you will be able to do things like
refresh the gui and move the window around the screen, etc. The '$top->update'
is probably not required I just added it to
[EMAIL PROTECTED] wrote:
> Hi All!
> In the following snippet:
>
> use strict;
> use Tk;
> require Tk::LabFrame;
> my $top = new MainWindow;
> my $bar=$top->LabFrame(-label => 'buttons bar');
> $bar->pack;
> my $exi=$bar->Button(-command=>\&exi,-text=>'exit');
> $exi->pack(-side=>'left');
> m
Looks like it's just because the window doesn't update until you return from
the callback. Are you trying to create some sort of special effect? Perhaps
asking how to create that effect might be simpler - the Text widget doesn't
look like it likes that sort of thing!
Kind regards,
Mark Anderson
S
> When executing this snippet
> I see in text0 only the last $i /in for cycle/
> What I must add to prg code
> in order to see all cosequtive values of $i ?
for (my $i=0;$i<20;$i++){
#$text0->delete('0.0','end'); # just don't delete everytime all
contents of the box
$text0->insert
Just add:
$top->update
any place inside the "prg" procedure.
On Wed, 1 Jun 2005 08:06:42 UT, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
> Hi All!
> In the following snippet:
>
> use strict;
> use Tk;
> require Tk::LabFrame;
> my $top = new MainWindow;
> my $bar=$top->LabFrame(-label => 'b
Well right now ur deleting all the text before inserting any more. Get rid
of the delete line or move it out of the for loop. Then it'll work as expected.
At 08:06 AM 6/1/05 UT, [EMAIL PROTECTED] wrote:
>sub prg{
> for (my $i=0;$i<20;$i++){
> $text0->delete('0.0','end');
>
there is also a set of modules around which allow you to
> > embed an internet
> > explorer browser in your app -it wasn't quite fully working
> > when I last
> > looked at it 8 months ago though:-(
> >
> > Marty
> > - Original Message -
> >
Marty: What's the IE embedding module for Tk? Do you remember? I'd be
really interested in seeing that!
jpt
> -Original Message-
> From: Martin Moss [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, June 26, 2002 7:32 AM
> To: Jack; Perl-Win32-Users
> Subj
Marty
- Original Message -
From: "Jack" <[EMAIL PROTECTED]>
To: "Perl-Win32-Users" <[EMAIL PROTECTED]>
Sent: Wednesday, June 26, 2002 5:36 AM
Subject: Re: Perl TK question
> - Original Message -
> From: "Kevin" <[EMAIL PROTECTED]>
&
I'd suggest using Win32::GUI if your running on Win32 platforms.
I'd also suggest becoming familiar with win32::API.
There is a module that can import ActiveX but I'm not remembering the name
of it. A search in the Win32::GUI list at source forge for ActiveX should
bring it up.
When I last played
11 matches
Mail list logo
