Hi,
Do something like this:
for (0..100) {
$Wmain->Progressbar->StepIt();
Win32::GUI::DoEvents();
#your work here
}
Cheers,
jez.
From: "Chris" <[EMAIL PROTECTED]>
To: <perl-win32-gui-users@lists.sourceforge.net>
Subject: [perl-win32-gui-users] progress bars
Date: Wed, 1 Oct 2003 15:13:13 -0700
Okay, I'm working on making a progress bar that works, however, this
code won't let my progress bar show. If someone could help, I would very
much appreciate it.
$Wmain->AddProgressBar(
-name => "Progressbar",
-top => 15,
-left => 10,
-smooth => 1,
-visible => 1,
);
$Wmain->Progressbar->SetRange(0, 100);
$Wmain->Progressbar->SetStep(1);
$Wmain->Progressbar->SetPos($bwl1);
Thanks
--Chris
_________________________________________________________________
Sign-up for a FREE BT Broadband connection today!
http://www.msn.co.uk/specials/btbroadband