Ramakanta,
The problem is that system will block until the script completes, which means
the join() on the thread will also block. If you can do without the return
value, you can detach() the thread instead of join()ing it.
I'm not too sure as to how you can call DoEvents() while waiting for s
Ramakanta,
I'm not sure what you are trying to do here:
sub Loop_Click {
print "Loop clicked \n";
$win ->( -activate => (1));#<==
my $thr2 = threads->create( \&thread2);
$res =$thr2->join();
print "hello $res\n";
};
__END__
I think you meant:
sub Loop_Click {
HI
I am new in perl. I have created one basic perl script to run win32 gui
with threads but my gui got stock .. can any one help me ...
posted my code below
main code...
use threads;
use threads::shared;
use Win32::GUI ();
use Win32::GUI::ThreadUtils;
my $win =
3 matches
Mail list logo
