perl-win32-gui-users — Using the Win32::GUI Perl extension

[perl-win32-gui-users] Field checking(OT)

[Steve M. <pag...@ho...>]

This isn't really directly related to Win32 GUI, so I'd like to apologize 
now for that.  Don't even know PERL particularly well, and am not that 
bright.

The task I'm trying to accomplish is this, I've got a program thats got 
numerous text fields(single line text box), user fills them out, then upon 
clicking a button it assigns their text to some variables and does some 
unrelated actions with those variables.

I'd like to write a routine that checks that all the fields were filled out, 
if they weren't, it pops up a dialog box that says the fields they didn't 
fill out in a format like this:

You didn't fill out:
blah
blah
blah

Lets say the variables they need to fill out are $test $test1 $test2
Right now, I'm doing it with some if statements, but the problem is, the 
poor poor way I'm doing it, if they fill out $test and $test2 but not 
$test1, it will still work, because it checks the variables in order, and if 
the last one it checks isn't blank, it works.

All the variables used are scalar variables, with the exception of one, 
which is an array.



_________________________________________________________________
Join the world’s largest e-mail service with MSN Hotmail. 
http://www.hotmail.com

[perl-win32-gui-users] Dean Lennox/GIS/CSC is out of the office.

[<al...@cs...>]

I will be out of the office starting  12/28/2001 and will not return until
01/02/2002.

I will respond to your message when I return.

[perl-win32-gui-users] Riched window constants

[Bill M. <bi...@1t...>]

Hello All,

I am new to this list, and just started working with WIN32-GUI. As I have
read so many times, I am finding the documentation less than stellar, but I
think the library has great potential.

Here is my problem.

when I use the following in a click event, it does what it is supposed to,
change the window background color.

$Textbox->SendMessage(1091, 0, hex('cd0000'));

But when I use this (which is the same constant as the numeric above, it
doesn't work

$Textbox->SendMessage(EM_SETBKGNDCOLOR, 0, hex('cd0000'));

I have found both of these resources in this list, but can't find a
reference for the numeric constants.
Can anybody help me locate a reference, or give me a tip to make the text
versions work?

MSDN user interface library
http://msdn.microsoft.com/library/default.asp?URL=/library/psdk/psdkref/catf
unc_26m1.htm
Constant values for the Win32 API:
http://www.mvps.org/vbnet/index.html?http://www.mvps.org/vbnet/api/_consts/c
onstsa.htm

Much appreciated,

Bill

[perl-win32-gui-users] Multiple lines in ListView and how to initalize ListViews checkboxes

[<pko...@me...>]

Hello,

1. I think nobody had tried before to use items in ListViews that have
multiple lines? Anyone else who wanted items with linebreaks and solved
that?

2. I remember that there was a question for "How to make the initial state
in checkboxes?" Is there a solution?

I wish a happy new year 2002,

Peter

RE: [perl-win32-gui-users] Assigning contents of single line textbox to variable

[Howard, S. (US - Tulsa) <sth...@de...>]

You need an event handler to handle the Click event on your "OK" button (you
may know that, but JIC). The name of the subroutine would need to be then
name of your "OK" button followed by _Click. Additionally, you must have
either:
	-multisel		=>	1,
	
or

	-multisel		=>	2,

in the listbox definition to allow for selection of multiple items from that
listbox.

You need to use two functions: SelectedItems (returns a 0 based list of all
items selected in the list box).  When you have the numeric list, you can
use it with the GetString function to get the text associated with that
item. Here is a pasted in example from part of a GUI sub from an app I have
that will take the selected items a -multisel listbox. I place this event
handler inside the subroutine that contains the GUI. I did that so that the
@_ from the GUI sub is accessible without passing anything explicitly (That
may work with it outside. I'm not sure about that part, but I know it works
with it inside the GUI subroutine). I am using references because I am
populating multiple arrays from the GUI's sub:

# define the listbox:

    my $tb2 = $disp->AddListbox (
	  -name			=>	   'DeptsList',
	  -height		   	=>	   $disp->ScaleHeight() -
100,
	  -width		   	=>	   $disp->ScaleWidth() - 40,
	  -pos			=>	   [20,40],
	  -addstyle		   	=>	   WS_VSCROLL,
	  -multisel		   	=>	   2,  
	  );

	my @button;
    $button[0] = $disp->AddButton (
	  -name	   		  =>	  'submit3',
	  -text			  =>	  'Submit',
	  -height		  	  =>	  20,
	  -width		  	  =>	  50,
	  -pos			  =>	  [$disp->ScaleWidth()/4 - 25,
$disp->ScaleHeight() - 40],
	  );
	$button[1] = $disp->AddButton (
	  -name	   	     	=>		  'cancel3',
	  -text			=>		  'Cancel',
	  -height			=>		  20,
	  -width		 	=>		  50,
	  -pos			=>	  [3*($disp->ScaleWidth()/4) - 25,
$disp->ScaleHeight() - 40],
	  );

# finish building the GUI, then handle the Click event as so:
	
sub submit3_Click {
		# put the list indexes into the lexical @selected array:
		my @selected = $tb2->SelectedItems();

		# make it so nothing happens if nothing is selected:

		if ($selected[0] eq '') {
		   return;
		   }
		foreach (@selected) {
			# use the GetString function to get the text
			# associated with the each index as it is processed.
			# put these string items 
			# in the fourth array passed by reference to the GUI
sub:

			push (@{$_[3]}, $tb2->GetString($_));
			}
		# destroy the GUI:

		return -1;
		}	


Hope all that retains some formatting through the mail, and hope that gets
you what you need.

Steve H.

-----Original Message-----
From: Steve Myers [mailto:pag...@ho...]
Sent: Friday, December 28, 2001 6:46 AM
To: per...@li...
Subject: [perl-win32-gui-users] Assigning contents of single line
textbox to variable


I'm not really serious with creating GUI applications for PERL, I just found

Win32 GUI to be a pretty cool module, and at the time have the need for a 
small GUI app thats a workaround for something.

I've created numerous single line text boxes where the user may input text, 
I'd like to assign their current text to variables, and a large multi-line 
text box who's text I'd like to assign to an array.  It will use these 
values after they click an "OK" button, so it would assign the 
variables/array when they click it, to ensure getting the current value.

How would I do this?  I haven't really experimented or looked at sample 
code, this is just a early help thing, so in case I can't figure it out, 
maybe somebody will have already told me how.

_________________________________________________________________
Send and receive Hotmail on your mobile device: http://mobile.msn.com


_______________________________________________
Perl-Win32-GUI-Users mailing list
Per...@li...
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
- This message (including any attachments) contains confidential information
intended for a specific individual and purpose, and is protected by law.  -
If you are not the intended recipient, you should delete this message and
are hereby notified that any disclosure, copying, or distribution of this
message, or the taking of any action based on it, is strictly prohibited.

[perl-win32-gui-users] Assigning contents of single line textbox to variable

[Steve M. <pag...@ho...>]

I'm not really serious with creating GUI applications for PERL, I just found 
Win32 GUI to be a pretty cool module, and at the time have the need for a 
small GUI app thats a workaround for something.

I've created numerous single line text boxes where the user may input text, 
I'd like to assign their current text to variables, and a large multi-line 
text box who's text I'd like to assign to an array.  It will use these 
values after they click an "OK" button, so it would assign the 
variables/array when they click it, to ensure getting the current value.

How would I do this?  I haven't really experimented or looked at sample 
code, this is just a early help thing, so in case I can't figure it out, 
maybe somebody will have already told me how.

_________________________________________________________________
Send and receive Hotmail on your mobile device: http://mobile.msn.com

RE: [perl-win32-gui-users] _GotFocus-Event

[Piske, H. <Har...@bo...>]

I knew we had this before ... here's what I found out then:

-----Original Message-----
From: Piske, Harald
Sent: Friday, November 16, 2001 02:43
To: Win32-GUI-Mailing List (E-mail)
Subject: RE: [perl-win32-gui-users] Win32::DialogBox - LostFocus() Event
i n Button and RadioButton Objects doesn't seem to work for me

> The LostFocus() event doesn't respond at all when a mouse click 
> happens on another object (button, textfield, etc.)

From what I can see in the xs code, the button class is treated in a
different manner. You might want to try

Button_Anonymous {print join (', ', @_), '\n';}

This is an event handler that gets called for a lot of the otherwise
unhandled cases. If you're lucky, _LostFocus is one of them. The actual
message number is passed as the first parameter. I don't exactely remember
if _Anonymous gets fired for each unhandled message or just unhandled
notification messages.

If that does not help, you could subclass all your controls to receive
_MouseMove events and call your _LostFocus sub when another control or the
window sees mouse moves ... very easy in theory, just terribly annoying to
actually implement :-/

[perl-win32-gui-users] _GotFocus-Event

[Christian K. <chr...@ho...>]

Hi all,

I would like to use the _GotFocus-Event with buttons. The Win32-GUI
documentation says that this should work. Okay, it works with textfields
etc., but it seems not to work with buttons. Or is there something special I
have to do to get this?

Merry Xmas and best wishes,

  Christian





_________________________________________________________________
Testen Sie MSN Messenger für Ihren Online-Chat mit Freunden: 
http://messenger.msn.de

Re: SOLVED!! Re: [perl-win32-gui-users] This code runs onW2000, but not W98...???

[Mark W. <ma...@il...>]

"Piske, Harald" wrote:

> Guys ... it's Christmas :-) This group has always been a tremendous source
> for solutions.

indeed it has!


> I understand there is a solution to the problem that was
> posted. I fail to see the point in going back and forth about what might
> have been a better idea some time ago.

The intent was to explore this quirky behavior in its entirety and determine
exactly *why* it behaves the way it does, so that others who look through
archives of this group will be able to identify the solution if they have
similar but non-identical problems to the one I reported.  The
solution/workaround *is* straightforward, but only if you know the problem
exists, and why it works the way it does.  I spent three days trying to work out
why my code didn't function, and I want to both warn others about this potential
pitfall, as well as understand *why* the behavior exists so that I can avoid
meeting it again in the future.  As you will notice, I received a response
indicating a similar behavior with Bitmap objects in Label controls... a
non-identical situation that I can now avoid because I (and others) have been
warned... so these conversations are a good thing!

Certainly, as an open-source developer myself,  have several active mailing
lists and bug lists for my larger projects.  I find these kinds of conversations
*very* helpful as I go about improving my own products, so I am not ashamed to
hash-out problems I find with other modules.. not to be cruel, but to be
constructive and helpful to the author!  I know that I put a hell of a lot of
work into my own code, and I want people to find it straightfoward and clear...
I think all OS authors want that...


> Happy holidays everyone
> Hope you had a nice evening in Europe, mine's yet to come

Merry Christmas to you all!

Mark

RE: SOLVED!! Re: [perl-win32-gui-users] This code runs onW2000, but not W98...???

[Piske, H. <Har...@bo...>]

Guys ... it's Christmas :-) This group has always been a tremendous source
for solutions. I understand there is a solution to the problem that was
posted. I fail to see the point in going back and forth about what might
have been a better idea some time ago. Win32::GUI is an invaluable piece of
work for all of us, a tremendous amount of work, in fact, and mostly done by
Aldo alone. Moreover, it's being completely reworked, so support of 0.0.558
for bugs, no matter how annoying, is - in my view - asking too much.
Especially when there's a workaround.

Happy holidays everyone
Hope you had a nice evening in Europe, mine's yet to come

Harald

Re: SOLVED!! Re: [perl-win32-gui-users] This code runs onW2000, but not W98...???

[Johan L. <jo...@ba...>]

At 08:12 2001-12-24 -0600, Mark Wilkinson wrote:
>Is this considered...ummm... "normal" behavior??
>
>What is it about the architecture of the Win32GUI modules that makes it work
>this way?  It is really the most peculiar thing I have ever seen, and breaks
>every model for OO programming that I know of... (i.e. that the contents of an
>object must be maintained as references outside of the object for them to 
>remain
>in scope)

Some Win32::GUI Perl objects contain handles to Win32 (os level) 
structures, which are deallocated once the Perl object is destroyed. That 
might be considered a good thing.

What might be considered a bad thing is that some Win32::GUI controls 
doesn't take the responsibility to keep the reference count for the object 
up so it doesn't get garbage collected and destroyed while in use (if you 
declared it as a lexical variable). So you'll have to do that explicitly by 
e.g. assigning it to the property of another, more persistent object, or to 
a package var that never goes out of scope.


/J

-------- ------ ---- --- -- --  --  -    -     -      -         -
Johan Lindström    Sourcerer @ Boss Casinos     jo...@ba...

Latest bookmark: "Troubleshooting Guide"
<http://manuals.sybase.com/onlinebooks/group-rs/rsg1100e/rs_tsg/@Generic__BookView/4140;cs=default;ts=default>

Re: SOLVED!! Re: [perl-win32-gui-users] This code runs onW2000, but not W98...???

[Mark W. <ma...@il...>]

Is this considered...ummm... "normal" behavior??

What is it about the architecture of the Win32GUI modules that makes it work
this way?  It is really the most peculiar thing I have ever seen, and breaks
every model for OO programming that I know of... (i.e. that the contents of an
object must be maintained as references outside of the object for them to remain
in scope)

M


Johan Lindstrom wrote:

> At 09:48 2001-12-22 -0600, Mark Wilkinson wrote:
> >The solution, apparently, is that the reference to the Menu object must be
> >passed back to the main script; apparently the menu-ref is NOT encapsulated
> >inside of the Window object that contains it... which is
> >counter-intuitive, and
> >unlike any other perl module I have ever seen...
>
> The same goes with Bitmap objects you create, they have to stay in scope
> while the bitmap is in use by e.g. a Label control.
>
> /J
>
> -------- ------ ---- --- -- --  --  -    -     -      -         -
> Johan Lindström    Sourcerer @ Boss Casinos     jo...@ba...
>
> Latest bookmark: "Design Patterns in Dynamic Programming"
> http://www.norvig.com/design-patterns/
>
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Per...@li...
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users

RE: [perl-win32-gui-users] changing systray icon?

[Peter E. <Pet...@at...>]

Here is a repost of how to do it, written by Jason Bingham.

************************************************************************

From: Jason Bingham [jas...@gb...]
Sent: 27 August 2001 03:26
To: 'per...@li...'
Subject: RE: [perl-win32-gui-users] RE: NotifyIcon - How to Change icon
pr ogrammatically

> How can you change the -icon after it already exists in the 
> system tray?

Don't know how supported it is but this is what I had to do is call
Win32::GUI::NotifyIcon::Modify directly (it is located in the GUI.xs file
for those with the source). Example works off the click on the tray icon.

Don't forget to get the -id bit the same across all calls.... Other problem
I came across was the limit of 63 chars for the -tip windows doesn't like it
and the good doctor will come and visit if you make it too long.

JB


== Begin Perl Code ==
use Win32::GUI;

my $IconMode = 1;

my $icoEna = new Win32::GUI::Icon("DateTime.ico");
my $icoDis = new Win32::GUI::Icon("DisabledDateTime.ico");
my $Trace = 1;

my $win = Win32::GUI::Window->new(
   -name   => 'WIN',
   -text   => 'Recorder',
   -width  => 200,
   -height => 200,
);

my $ni = Win32::GUI::NotifyIcon->new(
   $win, 
   -name   => "NI", 
   -id     => 1,
   -icon   => $icoEna,
   -tip    => "Recording",
);

$win->Enable();
$win->Show();

Win32::GUI::Dialog();

sub WIN_Terminate {
   print "$0: ".(caller(0))[3]."::Start\n" if ($Trace); 

  -1;
}

sub NI_Click {
   print "$0: ".(caller(0))[3]."::Start\n" if ($Trace); 

   if ($IconMode) {
      $IconMode = 0;
      Win32::GUI::NotifyIcon::Modify(
         $win, 
         -id => 1, 
         -icon => $icoDis, 
         -tip => "Not Recording",
      );
   } else {
      $IconMode = 1;
      Win32::GUI::NotifyIcon::Modify(
         $win, 
         -id => 1, 
         -icon => $icoEna, 
         -tip => "Recording",
      );
   }

   1;
}
== End Perl Code ==




> -----Original Message-----
> From: Jeff Omick [mailto:jo...@us...]
> Sent: 21 December 2001 21:36
> To: per...@li...
> Subject: [perl-win32-gui-users] changing systray icon?
> 
> 
> 
> Is is posible to change the systray icon?  I got the 
> $main->ChangeIcon($icon)
> to change the upper left hand corner of the main window to change but 
> I would like to change the systray icon if that is 
> availble... A simple 
> example would be very much appreciated...
> 
> thanks in advance
> Jeff Omick
> http://msetimon.sourceforge.net
> 
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Per...@li...
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
> 

Re: SOLVED!! Re: [perl-win32-gui-users] This code runs on W2000, but not W98...???

[Johan L. <jo...@ba...>]

At 09:48 2001-12-22 -0600, Mark Wilkinson wrote:
>The solution, apparently, is that the reference to the Menu object must be
>passed back to the main script; apparently the menu-ref is NOT encapsulated
>inside of the Window object that contains it... which is 
>counter-intuitive, and
>unlike any other perl module I have ever seen...

The same goes with Bitmap objects you create, they have to stay in scope 
while the bitmap is in use by e.g. a Label control.


/J

-------- ------ ---- --- -- --  --  -    -     -      -         -
Johan Lindström    Sourcerer @ Boss Casinos     jo...@ba...

Latest bookmark: "Design Patterns in Dynamic Programming"
http://www.norvig.com/design-patterns/

SOLVED!! Re: [perl-win32-gui-users] This code runs on W2000, but not W98...???

[Mark W. <ma...@il...>]

The solution, apparently, is that the reference to the Menu object must be
passed back to the main script; apparently the menu-ref is NOT encapsulated
inside of the Window object that contains it... which is counter-intuitive, and
unlike any other perl module I have ever seen...

----------------------------------------
this pseudo-code does NOT work:

    my $window=Module->new;
    $window->Show();
    Win32::GUI::Dialog();

    package Module;
    $menu = Win32::GUI::MakeMenu (blah blah)
    $window=Win32::GUI::Window->new(-menu   => $menu)
    return $window
-----------------------------------------

this pseudo-code DOES work:

    my ($window, $menu)=Module->new;
    $window->Show();
    Win32::GUI::Dialog();

    package Module;
    $menu = Win32::GUI::MakeMenu (blah blah)
    $window=Win32::GUI::Window->new(-menu   => $menu)
    return ($window, $menu)
-------------------------------------------

I have no idea why it worked on one OS and not the other, but still... it is
the most bizzarre thing I have ever come across while using Perl!  It is such
bizzarre behavior that I am tempted to call it a bug in Win32GUI, rather than
just a quirk...

Anyway, in case anyone else ever has this problem, that is the solution :-)

Merry Christmas everyone!

M

[perl-win32-gui-users] changing systray icon?

[Jeff O. <jo...@us...>]

Is is posible to change the systray icon?  I got the $main->ChangeIcon($icon)
to change the upper left hand corner of the main window to change but 
I would like to change the systray icon if that is availble... A simple 
example would be very much appreciated...

thanks in advance
Jeff Omick
http://msetimon.sourceforge.net

Re: [perl-win32-gui-users] Win32::GUI::DragDrop

[Johan L. <jo...@ba...>]

John wrote:
> > 1- has anyone used this sucessfully? if so, do you have any
> > code to share?

The POD contains a complete example program.


>AFAIK    DragDrop.pm came from the GUI LOFT by Johan Lindström,and was not
>part of the original
>WIN32::GUI.   http://www.bahnhof.se/~johanl/perl/Loft/

It's actually a standalone module, but it is used in TGL.


>If you download and run the binary gui loft, you could then copy the gui.dll
>from your temp folder to
>your perl installation (C:\Perl\site\lib\auto\Win32\GUI)

Whoa, tricky :)


/J

-------- ------ ---- --- -- --  --  -    -     -      -         -
Johan Lindström    Sourcerer @ Boss Casinos     jo...@ba...

Latest bookmark: "AICategorize - Automatically categorize docu..."
<http://search.cpan.org/doc/KWILLIAMS/AI-Categorize-0.06/Categorize.pm>

[perl-win32-gui-users] This code runs on W2000, but not W98...???

[Mark W. <ma...@il...>]

Hi group!

I'm stumped.  I have a bit of code that I designed on my W2000 machine.
Perfect.  But when I moved it to my Win98 machine it didn't work.  I have
narrowed it down to the Win32GUI part, and attach the trimmed-down relevant
(simple) sections of code to this message.  The script and module I attach
here have been tested on both machines and I see the same result:  things
work as expected on the W2000, but on W98 the menu is never drawn - it is
just a transparent bar along the top of the window.

AFAIK my two installations of Win32GUI are identical (they should be since
I only downloaded it once, and then passed it between my machines over my
LAN).

I don't know if it is the underlying OS that is causing the problem, or if
there is something else different between the two machines, but it is
certainly the first time I have ever seen a Perl script work on one machine
and not another!  I was amazed!!

Any advice is appreciated :-)

Mark

RE: [perl-win32-gui-users] Win32::GUI::DragDrop

[Rogers, J. <rog...@oc...>]

>=20
> couple questions:=20
> 1- has anyone used this sucessfully? if so, do you have any=20
> code to share?
AFAIK    DragDrop.pm came from the GUI LOFT by Johan Lindstr=F6m,and =
was not
part of the original
WIN32::GUI.   http://www.bahnhof.se/~johanl/perl/Loft/

you can use it for your own windows. see sample attached zip you will =
need
to install LOFT to run it through.


> 2- reading the POD for this it says you need to add some=20
> lines to the GUI.xs
> and nmake it. I do not have nmake on my NT4 system. Can I ftp=20
> gui.xs to a
> unix box, nmake it there, and ftp it back? (would that work?)
>
if you spend a long time, and put the right libarys on your nix this =
might
not work !

If you download and run the binary gui loft, you could then copy the =
gui.dll
from your temp folder to
your perl installation (C:\Perl\site\lib\auto\Win32\GUI)


JohnR

[perl-win32-gui-users] Win32::GUI::DragDrop

[Peter E. <Pet...@at...>]

couple questions: 
1- has anyone used this sucessfully? if so, do you have any code to share?
2- reading the POD for this it says you need to add some lines to the GUI.xs
and nmake it. I do not have nmake on my NT4 system. Can I ftp gui.xs to a
unix box, nmake it there, and ftp it back? (would that work?)

thx,
Pete

Re: [perl-win32-gui-users] Menu items inactive(grey) andunusable by default??

[Mark W. <ma...@il...>]

Marcus wrote:

> I have seen something like that when I experimented with using both
> GUIs together. Did you create an executable and try it outside of your
> development environment?

no, but that is the next thing on my list.


> I think what I did was to place the call to Tk in the BEGIN routine I
> use for the splash screen. I didn't investigate why it was neccessary
> because I then decided to re-write what I needed in Win32::GUI.

that doesn't clarify why it would be fine in some environments (my two),
but not in others (his)...


> Anyhow, try a BEGIN { }.

that actually doesn't work for me so well, as I have to issue the MainLoop
statement in several locations depending on how the program is initialized
post-startup... but I'll see if I can rearrange things to make it work.

thanks for the info!

M

Re: [perl-win32-gui-users] Menu items inactive(grey) and unusable by default??

[Marcus <li...@wo...>]

On 17.12.01 at 18:10 Mark Wilkinson wrote:
>I sent it to my client the other day and when he
>starts it
>up all menu buttons are greyed out and inoperative right from the
start...
>P.S.  It is a joint Win32GUI & Tk application... could that be causing
the
>problem?

I have seen something like that when I experimented with using both
GUIs together. Did you create an executable and try it outside of your
development environment?

I think what I did was to place the call to Tk in the BEGIN routine I
use for the splash screen. I didn't investigate why it was neccessary
because I then decided to re-write what I needed in Win32::GUI.

Anyhow, try a BEGIN { }.

Marcus

[perl-win32-gui-users] Menu items inactive(grey) and unusable by default??

[Mark W. <ma...@il...>]

Hi Group,

This is a weird one!  I have an app that runs just perfectly on both of my
machines (98/2000).  I sent it to my client the other day and when he starts it
up all menu buttons are greyed out and inoperative right from the start... so
he can't do anything.

I have never seen anything like it.

Any ideas??

M

P.S.  It is a joint Win32GUI & Tk application... could that be causing the
problem?

RE: [perl-win32-gui-users] DoEvents() warning

[Peter E. <Pet...@at...>]

that usually happens when you ask it to do something with a widget that is
either out of scope or not yet defined. need more detail to be more
specific, tho'

-Pete


> -----Original Message-----
> From: Marcus [mailto:li...@wo...]
> Sent: 12 December 2001 19:09
> To: per...@li...
> Subject: [perl-win32-gui-users] DoEvents() warning
> 
> 
> I have a loop for a cancel button (as previously discussed) which uses
> Win32::GUI::DoEvents(). Problem is, I'm getting unitialized value
> warnings from Win32::GUI::DoEvents().
> 
> This is not a "show stopper", but I would like to know what DoEvents()
> is expecting and how to return a value. If that's what it wants?
> 
> Thanks,
> 
> Marcus
> 
> 
> 
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Per...@li...
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
> 

[perl-win32-gui-users] DoEvents() warning

[Marcus <li...@wo...>]

I have a loop for a cancel button (as previously discussed) which uses
Win32::GUI::DoEvents(). Problem is, I'm getting unitialized value
warnings from Win32::GUI::DoEvents().

This is not a "show stopper", but I would like to know what DoEvents()
is expecting and how to return a value. If that's what it wants?

Thanks,

Marcus