perl-win32-gui-users Mailing List for Win32::GUI

Hi,

I'm not sure why it's not working - as a test I downloaded V1 from 
sourceforge and did the following (previously I was using manually built 
win32::gui). It installed ok, and my apps are running correctly - the only 
issue I can see is that most of the documentation isn't included in the 
binary for some reason.

Cheers,

jez.
----

C:\development>cd Win32-GUI-1.0-PPM-5.6

C:\development\Win32-GUI-1.0-PPM-5.6>ppm install Win32-GUI.ppd
Installing package 'Win32-GUI.ppd'...
Installing C:\Perl\site\lib\auto\Win32\GUI\GUI.dll
Installing C:\Perl\site\lib\auto\Win32\GUI\GUI.exp
Installing C:\Perl\site\lib\auto\Win32\GUI\GUI.lib
Installing C:\Perl\html\lib\Win32\GUI\GUI.html
Installing C:\Perl\site\lib\Win32\GUI.pm

C:\development\Win32-GUI-1.0-PPM-5.6>perl -v

This is perl, v5.6.1 built for MSWin32-x86-multi-thread
(with 1 registered patch, see perl -V for more detail)

Copyright 1987-2001, Larry Wall

Binary build 638 provided by ActiveState Corp. http://www.ActiveState.com
ActiveState is a division of Sophos.
Built Apr 13 2004 19:24:21

----- Original Message ----- 
From: "Ronald" <on...@th...>
To: "Jez White" <je...@je...>; 
<per...@li...>
Sent: Wednesday, December 15, 2004 4:08 AM
Subject: Re: [perl-win32-gui-users] PERL Win32 and Perl Version


> Hi Jez,
>
> Output from running PPM install attached below.
>
> I tried it with both 5.6 and 5.8 - and received the same
> message in both cases.
>
>
> Ronald
>
> ====
> C:\temp\Win32GUI1.0\Win32-GUI-1.0-PPM-5.6>perl -v
>
> This is perl, v5.6.1 built for MSWin32-x86-multi-thread
> (with 1 registered patch, see perl -V for more detail)
>
> Copyright 1987-2001, Larry Wall
>
> Binary build 635 provided by ActiveState Corp.
> http://www.ActiveState.com
> Built 15:34:21 Feb  4 2003
>
>
> Perl may be copied only under the terms of either the Artistic
> License or the
> GNU General Public License, which may be found in the Perl 5
> source kit.
>
> Complete documentation for Perl, including FAQ lists, should
> be found on
> this system using `man perl' or `perldoc perl'.  If you have
> access to the
> Internet, point your browser at http://www.perl.com/, the Perl
> Home Page.
>
>
> C:\temp\Win32GUI1.0\Win32-GUI-1.0-PPM-5.6>type win32-gui.ppd
> <SOFTPKG NAME="Win32-GUI" VERSION="1,0,0,0">
>        <TITLE>Win32-GUI</TITLE>
>        <ABSTRACT>Perl-Win32 Graphical User Interface
> Extension</ABSTRACT>
>        <AUTHOR>Aldo Calpini &lt;da...@pe...&gt;</AUTHOR>
>        <IMPLEMENTATION>
>                <OS NAME="MSWin32" />
>                <ARCHITECTURE NAME="MSWin32-x86-multi-thread" />
>                <CODEBASE HREF="Win32-GUI.tar.gz" />
>        </IMPLEMENTATION>
> </SOFTPKG>
>
> C:\temp\Win32GUI1.0\Win32-GUI-1.0-PPM-5.6>ppm install
> .\Win32-GUI.ppd
> Installing package '.\Win32-GUI.ppd'...
> Error installing package '.\Win32-GUI.ppd': Read a PPD for
> '.\Win32-GUI.ppd', but it is not intended for this build of
> Perl (MSWin32-x86-multi-thread)
>
>
>
>
> 

The workaround is to call the Win32::GUI::SendMessage function instead of 
the Pos function.
If you call the Pos funtion first it seems to disable future calls...

<code>
#!perl
use Win32::GUI;

$Window = new GUI::Window(
    -title    => "Win32::GUI::Slider test",
    -left     => 100,
    -top      => 100,
    -width    => 300,
    -height   => 100,
    -name     => "Window",
);

$Window->AddSlider(
    -left   => 10,
    -top    => 10,
    -height => 150,
    -width  => 150,
    -name   => "Slider",
);

$Window->Slider->Min(0);
$Window->Slider->Max(10);
my $pos=3;
my $hwnd=$Window->Slider->{-handle};
print "$hwnd\n";
#$Window->Slider->Pos(3);
#Win32::GUI::SendMessage works as long as you do not call the Pos function 
before
Win32::GUI::SendMessage($hwnd, 1029, 1,$pos);
$Window->Show;
Win32::GUI::Dialog();

sub Window_Terminate {
    return -1;
}


</code>
----- Original Message ----- 
From: "Glenn Linderman" <pe...@ne...>
To: "Steven Lloyd" <sl...@ti...>
Cc: <per...@li...>
Sent: Wednesday, December 29, 2004 11:35 PM
Subject: Re: [perl-win32-gui-users] Slider Position


> Hmm.  Yes, this is very interesting.  Any mouse clicks in the region of 
> the slider (even if not on the active area), cause the slider to jump 
> immediately to the expected initial position.  So it is not like the code 
> has no effect, but it does not have the desired visual effect, until other 
> interaction happens.
>
> It is almost like some default redraw operation got stuck or ignored, or 
> didn't get generated.
>
> Well, I can confirm it is an inappropriate behavior.  I'd suggest that you 
> submit a bug report for it on Sourceforge.  I don't have time to 
> investigate it further at present.  Maybe someone else will... the bug 
> will ensure that we don't lose track of the issue.
>
>
> On approximately 12/29/2004 10:00 PM, came the following characters from 
> the keyboard of Steven Lloyd:
>
>> The following code demonstrates the slider problem - pos does not seem to 
>> set the position anymore
>>
>> ---------------------------------------------------------------------------------------
>>
>> #!perl
>> use Win32::GUI;
>>
>> $Window = new GUI::Window(
>>    -title    => "Win32::GUI::Slider test",
>>    -left     => 100,
>>    -top      => 100,
>>    -width    => 300,
>>    -height   => 100,
>>    -name     => "Window",
>> );
>>
>> $Window->AddSlider(
>>    -left   => 10,
>>    -top    => 10,
>>    -height => 150,
>>    -width  => 150,
>>    -name   => "Slider",
>> );
>>
>> $Window->Slider->Min(0);
>> $Window->Slider->Max(10);
>> #The following line should set the slider position to the 3rd tick from 
>> the left but it does not.
>> $Window->Slider->Pos(3);
>> $Window->Show;
>> Win32::GUI::Dialog();
>>
>> sub Window_Terminate {
>>    return -1;
>> }
>>
>> ---------------------------------------------------------------------------------------
>>
>> ----- Original Message ----- From: "Glenn Linderman" <pe...@ne...>
>> To: "Steven Lloyd" <sl...@ti...>
>> Cc: <per...@li...>
>> Sent: Wednesday, December 29, 2004 1:08 PM
>> Subject: Re: [perl-win32-gui-users] Slider Position
>>
>>
>>> On approximately 12/29/2004 7:40 AM, came the following characters from 
>>> the keyboard of Steven Lloyd:
>>>
>>>> looks like setting a slider position using $Window->Slider->Pos(4) no 
>>>> longer works in version 1.0.
>>>> Any workarounds?
>>>
>>>
>>> Not something I've used... can you make a short script demonstrating the 
>>> problem for testing/investigation?
>>>
>>> -- 
>>> Glenn -- http://nevcal.com/
>>> ===========================
>>> Having identified a vast realm of ignorance, Wolfram is saying that much
>>> of this realm lies forever outside the light cone of human knowledge.
>>>                           -- Michael Swaine, Dr Dobbs Journal, Sept 2002
>>>
>>
>>
>>
>> -------------------------------------------------------
>> The SF.Net email is sponsored by: Beat the post-holiday blues
>> Get a FREE limited edition SourceForge.net t-shirt from ThinkGeek.
>> It's fun and FREE -- well, almost....http://www.thinkgeek.com/sfshirt
>> _______________________________________________
>> Perl-Win32-GUI-Users mailing list
>> Per...@li...
>> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>>
>>
>>
>
> -- 
> Glenn -- http://nevcal.com/
> ===========================
> Having identified a vast realm of ignorance, Wolfram is saying that much
> of this realm lies forever outside the light cone of human knowledge.
>                           -- Michael Swaine, Dr Dobbs Journal, Sept 2002
> 

Hello

To solve the problem, i just changed the line :

$main->AddLabel(-text =>  "Hello, world");

by :

$main->AddLabel(-name => 'montext',
                -text =>  "Hello, world");

Thanks a lot to Stuart and Glenn

Thanks also to Erick, for the CODE samples provided

May the Win32::GUI documentation be updated with this.

_________________________________________________________________
Nouveau MSN Hotmail : créez une adresse @hotmail.fr qui vous ressemble ! 
http://www.msn.fr/newmsnhotmail

The following code demonstrates the slider problem - pos does not seem to 
set the position anymore

---------------------------------------------------------------------------------------
#!perl
use Win32::GUI;

$Window = new GUI::Window(
    -title    => "Win32::GUI::Slider test",
    -left     => 100,
    -top      => 100,
    -width    => 300,
    -height   => 100,
    -name     => "Window",
);

$Window->AddSlider(
    -left   => 10,
    -top    => 10,
    -height => 150,
    -width  => 150,
    -name   => "Slider",
);

$Window->Slider->Min(0);
$Window->Slider->Max(10);
#The following line should set the slider position to the 3rd tick from the 
left but it does not.
$Window->Slider->Pos(3);
$Window->Show;
Win32::GUI::Dialog();

sub Window_Terminate {
    return -1;
}

---------------------------------------------------------------------------------------
----- Original Message ----- 
From: "Glenn Linderman" <pe...@ne...>
To: "Steven Lloyd" <sl...@ti...>
Cc: <per...@li...>
Sent: Wednesday, December 29, 2004 1:08 PM
Subject: Re: [perl-win32-gui-users] Slider Position


> On approximately 12/29/2004 7:40 AM, came the following characters from 
> the keyboard of Steven Lloyd:
>
>> looks like setting a slider position using $Window->Slider->Pos(4) no 
>> longer works in version 1.0.
>> Any workarounds?
>
> Not something I've used... can you make a short script demonstrating the 
> problem for testing/investigation?
>
> -- 
> Glenn -- http://nevcal.com/
> ===========================
> Having identified a vast realm of ignorance, Wolfram is saying that much
> of this realm lies forever outside the light cone of human knowledge.
>                           -- Michael Swaine, Dr Dobbs Journal, Sept 2002
> 

looks like setting a slider position using $Window->Slider->Pos(4) no =
longer works in version 1.0.
Any workarounds?

Hello,

I try to use Win32::GUI, but it doesn't work.
I'm working on a Windows 2000 Pro 5.00 Patch 4.
PERL version is ActivePerl-5.8.3.809
Win32-GUI.zip is the latest one.

The Error Message is the following :
The instruction at "..." referenced memory at "...". The memory could not be 
"read".

I may have done something wrong. Reinstalling Win32-GUI.zip, rebooting the 
PC didn't give anything better


The program is the following one (Hello World)

use Win32::GUI;
    $main = Win32::GUI::Window->new(
                -name   => 'Main',
                -width  => 100,
                -height => 100,
        );
    $main->AddLabel(-text => "Hello, world");
    $main->Show();
    Win32::GUI::Dialog();


    sub Main_Terminate {
        -1;
    }

_________________________________________________________________
MSN Actions Solidaires : volontaire à l'étranger 
http://www.msn.fr/actionssolidaires/Default.asp?Ath=f

Hello everyone,

Iam expermenting with AxWindow to host IE browser window,
Everything works fine except I am unable (or do not know) how to set
properties to display IE tools bar, menus etc.

I am trying SetPropert like this:

$Control->SetProperty("ToolBar", 1);

but it does not work

Tried also

$Control->CallMethod("PutProperty", "ToolBar", 1);

but it does not work also.
Can anyone tell me how to set these properies.
Is there any more docuemtations of this issue in general also

The code I used below

Thank you everyone
Ramy

# perl -w
#
#  Hosting WebBrowser
#    - Create a WebBrowser control and get a Win32::OLe handler.
#    - Navigate on Google.fr
#    - When document loaded (DoucmentComplete event), set =
Win32::GUI::AxWindow in serach edit then submit
#       If Google Html page change, must change Item index.
#
use Cwd;
use Win32::GUI;
use Win32::OLE;
use Win32::GUI::AxWindow;

# main Window
$Window =3D new Win32::GUI::Window (
    -title    =3D> "Win32::GUI::AxWindow and Win32::OLE",
    -pos     =3D> [100, 100],
    -size    =3D> [400, 400],
    -name     =3D> "Window",
) or die "new Window";

# Create AxWindow with a webbrowser
$Control =3D new Win32::GUI::AxWindow  (
               -parent  =3D> $Window,
               -name    =3D> "Control",
               -pos     =3D> [0, 100],
               -size    =3D> [400, 300],
               -control =3D> "Shell.Explorer.2",
 ) or die "new Control";

# Register Event
$Control->RegisterEvent ("DocumentComplete", "DocumentComplete_Event" );

# Get Ole object
$OLEControl =3D $Control->GetOLE();

# Navigate to google
$Control->CallMethod("Navigate", 'http://www.google.fr/');

$Control->SetProperty("ToolBar", 1);
$Control->SetProperty("MenuBar", 1);
$Control->SetProperty("TheaterMode", "1");
$Control->SetProperty("AddressBar", 1);

# Event loop
$Window->Show();
Win32::GUI::Dialog();

# Event handler
sub DocumentComplete_Event {=20
 =20
  # print $OLEControl->{LocationUrl}, "\n";
  return unless $OLEControl->{LocationUrl} eq 'http://www.google.fr/';
 =20
  print "Search Win32::GUI::AXWindow\n";

  my $all =3D $OLEControl->{Document}->{all};

  # List all HTML TAG
  # for $i (0..$all->length) {
  #  my $item =3D $all->item($i);
  #   print "$i =3D ", $item->outerHTML , "\n\n";    =20
  # }

  # Input texte
  my $inputTexte =3D $all->item(49);   =20
  $inputTexte->{value} =3D "Win32::GUI::AxWindow";

  # Submit
  my $Submit     =3D $all->item(55);
  $Submit->click;
}=20

# Main window event handler

sub Window_Terminate {

  # Release all before destroy window
  undef $OLEControl;
  # $Control->Release();

  return -1;
}

sub Window_Resize {

  if (defined $Window) {
    ($width, $height) =3D ($Window->GetClientRect)[2..3];
    $Control->Move   (0, 0);
    $Control->Resize ($width, $height);
  }
}

Glenn_1,

When I searched the list for this, I found a number of questions, but no
answers. Someone already pointed out that 'Change' doesn't work (and I
confirmed that), so I started looking at the Tooltip package, but couldn't
make it work.

In any case, using the -tip option is easier. It creates a Tooltip object
internally, but I couldn't see how to get at the object. The kludge is in
passing the object handle (which I found by examining the $mw hash using
Data::Dumper) to 'UpdateTipText'. If someone can figure out how to access
that object in an OO manner, it would be cleaner (and safer).

Glenn_2

-----Original Message-----
From: per...@li...
[mailto:per...@li...] On Behalf Of Glenn
Linderman
Sent: Thursday, December 23, 2004 18:57
To: Glenn W Munroe
Cc: 'Glenn Linderman'; per...@li...
Subject: Re: [perl-win32-gui-users] Tooltips again

Glenn_2,

That looks nice.  Change (if it works) (per my previous, read the mail
sequentially and not yet awake enough to think of looking for more followups
first) would be simpler, but it is nice to  know there is a solution.

Glenn_1

On approximately 12/23/2004 4:47 AM, came the following characters from the
keyboard of Glenn W Munroe:

> Four hours later and I think I've got it. It's a bit of a kludge, but 
> it works. Click on the button to change the tip:
> 
> use Win32::GUI;
> 
> my $mw = new Win32::GUI::Window(
> 	-name   => "mw",
>       -text   => "Tooltip Test",
> 	-size   => [ 200, 100 ],
> 	-pos	=> [ 100, 100 ],
>       );
> 		
> $mw->AddButton(
> 	-name   => "btTest",
>       -text	=> "Tooltip Test",
> 	-size	=> [ 80, 20 ],
> 	-pos	=> [ 40, 20 ],
> 	-tip	=> "Initial Tooltip",
> 	);
> 
> $mw->Show();
> Win32::GUI::Dialog();
> 
> sub btTest_Click {
> 	Win32::GUI::Tooltip::UpdateTipText($mw->{-tooltip},
> 					$mw->btTest, "Updated Tooltip");
> }
> 
> 
> Glenn
> 
> -----Original Message-----
> From: per...@li...
> [mailto:per...@li...] On Behalf Of 
> Glenn W Munroe
> Sent: Thursday, December 23, 2004 10:32
> To: 'Glenn Linderman'; per...@li...
> Subject: RE: [perl-win32-gui-users] Tooltips again
> 
> Glenn_1,
> 
> Yes, that works OK, but how do you change it once the program is running?
> 
> There is an entire package for this (Win32::GUI::Tooltip), but that is 
> what I can't get to work.
> 
> Glenn_2
> 
> -----Original Message-----
> From: Glenn Linderman [mailto:pe...@ne...]
> Sent: Thursday, December 23, 2004 10:13
> To: Glenn W Munroe
> Subject: Re: [perl-win32-gui-users] Tooltips again
> 
> On approximately 12/22/2004 11:59 PM, came the following characters 
> from the keyboard of Glenn W Munroe:
> 
> 
>>Has anybody been able to get the Tooltip package to work? The only 
>>example I've found is in Johan's Loft examples, but it doesn't work on 
>>my system and I can't figure out the correct parameters to make it work.
>> 
>>Alternatively, has anybody been able to change the tooltip created 
>>with the -tip option to a control dynamically? This would appear to be 
>>a much easier route to the same goal if it is possible.
>> 
>>Glenn
> 
> 
> Not sure exactly what you are trying to do, or what isn't working.
> 
> I just add
> 
>       -tip => "tooltip text",
> 
> into my Buttons and such, and it just seems to work...
> 
> --
> Glenn -- http://nevcal.com/
> ===========================
> Having identified a vast realm of ignorance, Wolfram is saying that 
> much of this realm lies forever outside the light cone of human knowledge.
>                            -- Michael Swaine, Dr Dobbs Journal, Sept 
> 2002
> 
> 
> 
> -------------------------------------------------------
> SF email is sponsored by - The IT Product Guide Read honest & candid 
> reviews on hundreds of IT Products from real users.
> Discover which products truly live up to the hype. Start reading now. 
> http://productguide.itmanagersjournal.com/
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Per...@li...
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
> 
> 
> 
> -------------------------------------------------------
> SF email is sponsored by - The IT Product Guide Read honest & candid 
> reviews on hundreds of IT Products from real users.
> Discover which products truly live up to the hype. Start reading now. 
> http://productguide.itmanagersjournal.com/
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Per...@li...
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
> 
> 
> 

--
Glenn -- http://nevcal.com/
===========================
Having identified a vast realm of ignorance, Wolfram is saying that much of
this realm lies forever outside the light cone of human knowledge.
                           -- Michael Swaine, Dr Dobbs Journal, Sept 2002


-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now. 
http://productguide.itmanagersjournal.com/
_______________________________________________
Perl-Win32-GUI-Users mailing list
Per...@li...
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users

Thanks for the replies Glenn, Jez, and Greg. 
For now the default handler for SIGQUIT will have to do to make sure
the Windows end program dialog does not appear and hold up the logout.
Everything in my program should already be cleaned up at exit anyhow...I
was just trying to practice good coding to make sure it cleans up if I
happened to miss something!
 
Happy holidays to all.
 
Calvin

>>> "Glenn W Munroe" <gw...@se...> 12/22/2004 11:13:29 PM >>>

Calvin,
 
From the ActiveState FAQ:

"Signals are unsupported by the Win32 API. The C Runtime provides crude
support for signals, but there are serious caveats, such as inability to
die() or exit() from a signal handler. Perl itself does not guarantee
that signal handlers will not interrupt critical operations such as
memory allocation, which means signal invocation may throw perl
internals into disarray. For these reasons, signals are unsupported at
this time."
So, I think that Jez is on the right track with his Windows shutdown
message idea. Having said that,  inserting this in your program does
prevent the Windows end program dialog from appearing at logoff:
 
$SIG{QUIT} = 'DEFAULT';
 
but I, too, was unable to install a different handler, probably for the
reasons stated in the FAQ.
 
Glenn



From: per...@li...
[mailto:per...@li...] On Behalf Of
Calvin Perine
Sent: Wednesday, December 22, 2004 19:17
To: jo...@ea...
Cc: per...@li...
Subject: [perl-win32-gui-users] terminate program at windows logoff



(Just as a note: I changed the subject to reflect the content of the
post!
It was originally [perl-win32-gui-users]
per...@li...  ~ by mistake)
 
Thanks Greg...but that didn't work.
I tried  $SIG{__DIE__} = $SIG{QUIT} = $SIG{HUP} = $SIG{INT} =
$SIG{KILL} = $SIG{QUIT} = $SIG{TERM} = $SIG{STOP} = $SIG{BREAK} =
$SIG{ABRT} = \&Main_Terminate;
where Main_Terminate is the method that I am using as the handler.
But no success for logoff.
I am getting a list of signals using the following at a cmd prompt in
Windows XP (SP2):
 
C:\>perl -e "print join(' ', keys %SIG)"
ABRT BREAK HUP NUM19 FPE CLD NUM12 NUM16 NUM18 NUM17 STOP NUM24 NUM10
INT SEGV 
QUIT KILL PIPE NUM05 CONT NUM06 NUM07 ILL TERM ALRM CHLD
 
I also tried the following instead of using the SIG hash:
 use sigtrap qw(handler Main_Terminate normal-signals error-signals);
which from what I understand should define the handler as
Main_Terminate for all signals in the normal and error lists
    normal = HUP, INT, PIPE, TERM
    error = ABRT, BUS, EMT, FPE, ILL, QUIT, SEGV, SYS, TRAP
    - according to O'Reilly's PERL Cookbook.
 
- Calvin Perine

>>> Greg Osborne <jo...@ea...> 12/22/2004 11:17:29 AM
>>>

I'm taking a stab in the dark here, but...

When a unix or linux system sees a user leave or lose connection, 
the SIGHUP signal is sent to any programs that person has opened.  
Typically this kills the programs, but some programs will catch the
signal 
and then perform tasks to stay alive (such as forking into the
background) 
or perform some save/cleanup code before exiting.  You might try
trapping 
that signal.

Another thought is SIGKILL or SIGQUIT, but those may not be as likely
to 
give what you want.

Hope it helps.

- Greg



>>> Greg Osborne <jo...@ea...> 12/22/2004 11:17:29 AM
>>>
I'm taking a stab in the dark here, but...

When a unix or linux system sees a user leave or lose connection, 
the SIGHUP signal is sent to any programs that person has opened.  
Typically this kills the programs, but some programs will catch the
signal 
and then perform tasks to stay alive (such as forking into the
background) 
or perform some save/cleanup code before exiting.  You might try
trapping 
that signal.

Another thought is SIGKILL or SIGQUIT, but those may not be as likely
to 
give what you want.

Hope it helps.

- Greg

Four hours later and I think I've got it. It's a bit of a kludge, but it
works. Click on the button to change the tip:

use Win32::GUI;

my $mw = new Win32::GUI::Window(
	-name   => "mw",
      -text   => "Tooltip Test",
	-size   => [ 200, 100 ],
	-pos	=> [ 100, 100 ],
      );
		
$mw->AddButton(
	-name   => "btTest",
      -text	=> "Tooltip Test",
	-size	=> [ 80, 20 ],
	-pos	=> [ 40, 20 ],
	-tip	=> "Initial Tooltip",
	);

$mw->Show();
Win32::GUI::Dialog();

sub btTest_Click {
	Win32::GUI::Tooltip::UpdateTipText($mw->{-tooltip},
					$mw->btTest, "Updated Tooltip");
} 


Glenn

-----Original Message-----
From: per...@li...
[mailto:per...@li...] On Behalf Of Glenn
W Munroe
Sent: Thursday, December 23, 2004 10:32
To: 'Glenn Linderman'; per...@li...
Subject: RE: [perl-win32-gui-users] Tooltips again

Glenn_1,

Yes, that works OK, but how do you change it once the program is running?

There is an entire package for this (Win32::GUI::Tooltip), but that is what
I can't get to work.

Glenn_2

-----Original Message-----
From: Glenn Linderman [mailto:pe...@ne...]
Sent: Thursday, December 23, 2004 10:13
To: Glenn W Munroe
Subject: Re: [perl-win32-gui-users] Tooltips again

On approximately 12/22/2004 11:59 PM, came the following characters from the
keyboard of Glenn W Munroe:

> Has anybody been able to get the Tooltip package to work? The only 
> example I've found is in Johan's Loft examples, but it doesn't work on 
> my system and I can't figure out the correct parameters to make it work.
>  
> Alternatively, has anybody been able to change the tooltip created 
> with the -tip option to a control dynamically? This would appear to be 
> a much easier route to the same goal if it is possible.
>  
> Glenn

Not sure exactly what you are trying to do, or what isn't working.

I just add

      -tip => "tooltip text",

into my Buttons and such, and it just seems to work...

--
Glenn -- http://nevcal.com/
===========================
Having identified a vast realm of ignorance, Wolfram is saying that much of
this realm lies forever outside the light cone of human knowledge.
                           -- Michael Swaine, Dr Dobbs Journal, Sept 2002



-------------------------------------------------------
SF email is sponsored by - The IT Product Guide Read honest & candid reviews
on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now. 
http://productguide.itmanagersjournal.com/
_______________________________________________
Perl-Win32-GUI-Users mailing list
Per...@li...
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users

Glenn_1,

Yes, that works OK, but how do you change it once the program is running?

There is an entire package for this (Win32::GUI::Tooltip), but that is what
I can't get to work.

Glenn_2

-----Original Message-----
From: Glenn Linderman [mailto:pe...@ne...] 
Sent: Thursday, December 23, 2004 10:13
To: Glenn W Munroe
Subject: Re: [perl-win32-gui-users] Tooltips again

On approximately 12/22/2004 11:59 PM, came the following characters from the
keyboard of Glenn W Munroe:

> Has anybody been able to get the Tooltip package to work? The only 
> example I've found is in Johan's Loft examples, but it doesn't work on 
> my system and I can't figure out the correct parameters to make it work.
>  
> Alternatively, has anybody been able to change the tooltip created 
> with the -tip option to a control dynamically? This would appear to be 
> a much easier route to the same goal if it is possible.
>  
> Glenn

Not sure exactly what you are trying to do, or what isn't working.

I just add

      -tip => "tooltip text",

into my Buttons and such, and it just seems to work...

--
Glenn -- http://nevcal.com/
===========================
Having identified a vast realm of ignorance, Wolfram is saying that much of
this realm lies forever outside the light cone of human knowledge.
                           -- Michael Swaine, Dr Dobbs Journal, Sept 2002

Has anybody been able to get the Tooltip package to work? The only example
I've found is in Johan's Loft examples, but it doesn't work on my system and
I can't figure out the correct parameters to make it work.
 
Alternatively, has anybody been able to change the tooltip created with the
-tip option to a control dynamically? This would appear to be a much easier
route to the same goal if it is possible.
 
Glenn

Calvin,
 
From the ActiveState FAQ:
"Signals are unsupported by the Win32 API. The C Runtime provides crude
support for signals, but there are serious caveats, such as inability to
die() or exit() from a signal handler. Perl itself does not guarantee that
signal handlers will not interrupt critical operations such as memory
allocation, which means signal invocation may throw perl internals into
disarray. For these reasons, signals are unsupported at this time."

So, I think that Jez is on the right track with his Windows shutdown message
idea. Having said that,  inserting this in your program does prevent the
Windows end program dialog from appearing at logoff:
 
$SIG{QUIT} = 'DEFAULT';
 
but I, too, was unable to install a different handler, probably for the
reasons stated in the FAQ.
 
Glenn


  _____  

From: per...@li...
[mailto:per...@li...] On Behalf Of
Calvin Perine
Sent: Wednesday, December 22, 2004 19:17
To: jo...@ea...
Cc: per...@li...
Subject: [perl-win32-gui-users] terminate program at windows logoff


(Just as a note: I changed the subject to reflect the content of the post!
It was originally [perl-win32-gui-users]
per...@li...  ~ by mistake)
 
Thanks Greg...but that didn't work.
I tried  $SIG{__DIE__} = $SIG{QUIT} = $SIG{HUP} = $SIG{INT} = $SIG{KILL} =
$SIG{QUIT} = $SIG{TERM} = $SIG{STOP} = $SIG{BREAK} = $SIG{ABRT} =
\&Main_Terminate;
where Main_Terminate is the method that I am using as the handler.
But no success for logoff.
I am getting a list of signals using the following at a cmd prompt in
Windows XP (SP2):
 
C:\>perl -e "print join(' ', keys %SIG)"
ABRT BREAK HUP NUM19 FPE CLD NUM12 NUM16 NUM18 NUM17 STOP NUM24 NUM10 INT
SEGV 
QUIT KILL PIPE NUM05 CONT NUM06 NUM07 ILL TERM ALRM CHLD
 
I also tried the following instead of using the SIG hash:
 use sigtrap qw(handler Main_Terminate normal-signals error-signals);
which from what I understand should define the handler as Main_Terminate for
all signals in the normal and error lists
    normal = HUP, INT, PIPE, TERM
    error = ABRT, BUS, EMT, FPE, ILL, QUIT, SEGV, SYS, TRAP
    - according to O'Reilly's PERL Cookbook.
 
- Calvin Perine

>>> Greg Osborne <jo...@ea...> 12/22/2004 11:17:29 AM >>>

I'm taking a stab in the dark here, but...

When a unix or linux system sees a user leave or lose connection, 
the SIGHUP signal is sent to any programs that person has opened.  
Typically this kills the programs, but some programs will catch the signal 
and then perform tasks to stay alive (such as forking into the background) 
or perform some save/cleanup code before exiting.  You might try trapping 
that signal.

Another thought is SIGKILL or SIGQUIT, but those may not be as likely to 
give what you want.

Hope it helps.

- Greg



>>> Greg Osborne <jo...@ea...> 12/22/2004 11:17:29 AM >>>

I'm taking a stab in the dark here, but...

When a unix or linux system sees a user leave or lose connection, 
the SIGHUP signal is sent to any programs that person has opened.  
Typically this kills the programs, but some programs will catch the signal 
and then perform tasks to stay alive (such as forking into the background) 
or perform some save/cleanup code before exiting.  You might try trapping 
that signal.

Another thought is SIGKILL or SIGQUIT, but those may not be as likely to 
give what you want.

Hope it helps.

- Greg

Hi,

I'm not sure if signals is the way to go - you might have a bit more joy =
with hooking the one of the windows shutdown messages

http://msdn.microsoft.com/library/default.asp?url=3D/library/en-us/sysinf=
o/base/system_shutdown_messages.asp

cheers,

jez.
  ----- Original Message -----=20
  From: Calvin Perine=20
  To: jo...@ea...=20
  Cc: per...@li...=20
  Sent: Wednesday, December 22, 2004 5:17 PM
  Subject: [perl-win32-gui-users] terminate program at windows logoff


  (Just as a note: I changed the subject to reflect the content of the =
post!
  It was originally [perl-win32-gui-users] =
per...@li...  ~ by mistake)

  Thanks Greg...but that didn't work.
  I tried  $SIG{__DIE__} =3D $SIG{QUIT} =3D $SIG{HUP} =3D $SIG{INT} =3D =
$SIG{KILL} =3D $SIG{QUIT} =3D $SIG{TERM} =3D $SIG{STOP} =3D $SIG{BREAK} =
=3D $SIG{ABRT} =3D \&Main_Terminate;
  where Main_Terminate is the method that I am using as the handler.
  But no success for logoff.
  I am getting a list of signals using the following at a cmd prompt in =
Windows XP (SP2):

  C:\>perl -e "print join(' ', keys %SIG)"
  ABRT BREAK HUP NUM19 FPE CLD NUM12 NUM16 NUM18 NUM17 STOP NUM24 NUM10 =
INT SEGV=20
  QUIT KILL PIPE NUM05 CONT NUM06 NUM07 ILL TERM ALRM CHLD

  I also tried the following instead of using the SIG hash:
   use sigtrap qw(handler Main_Terminate normal-signals error-signals);
  which from what I understand should define the handler as =
Main_Terminate for all signals in the normal and error lists
      normal =3D HUP, INT, PIPE, TERM
      error =3D ABRT, BUS, EMT, FPE, ILL, QUIT, SEGV, SYS, TRAP
      - according to O'Reilly's PERL Cookbook.

  - Calvin Perine

  >>> Greg Osborne <jo...@ea...> 12/22/2004 11:17:29 AM =
>>>

  I'm taking a stab in the dark here, but...

  When a unix or linux system sees a user leave or lose connection,=20
  the SIGHUP signal is sent to any programs that person has opened. =20
  Typically this kills the programs, but some programs will catch the =
signal=20
  and then perform tasks to stay alive (such as forking into the =
background)=20
  or perform some save/cleanup code before exiting.  You might try =
trapping=20
  that signal.

  Another thought is SIGKILL or SIGQUIT, but those may not be as likely =
to=20
  give what you want.

  Hope it helps.

  - Greg



  >>> Greg Osborne <jo...@ea...> 12/22/2004 11:17:29 AM =
>>>

  I'm taking a stab in the dark here, but...

  When a unix or linux system sees a user leave or lose connection,=20
  the SIGHUP signal is sent to any programs that person has opened. =20
  Typically this kills the programs, but some programs will catch the =
signal=20
  and then perform tasks to stay alive (such as forking into the =
background)=20
  or perform some save/cleanup code before exiting.  You might try =
trapping=20
  that signal.

  Another thought is SIGKILL or SIGQUIT, but those may not be as likely =
to=20
  give what you want.

  Hope it helps.

  - Greg

(Just as a note: I changed the subject to reflect the content of the
post!
It was originally [perl-win32-gui-users]
per...@li...  ~ by mistake)
 
Thanks Greg...but that didn't work.
I tried  $SIG{__DIE__} = $SIG{QUIT} = $SIG{HUP} = $SIG{INT} =
$SIG{KILL} = $SIG{QUIT} = $SIG{TERM} = $SIG{STOP} = $SIG{BREAK} =
$SIG{ABRT} = \&Main_Terminate;
where Main_Terminate is the method that I am using as the handler.
But no success for logoff.
I am getting a list of signals using the following at a cmd prompt in
Windows XP (SP2):
 
C:\>perl -e "print join(' ', keys %SIG)"
ABRT BREAK HUP NUM19 FPE CLD NUM12 NUM16 NUM18 NUM17 STOP NUM24 NUM10
INT SEGV 
QUIT KILL PIPE NUM05 CONT NUM06 NUM07 ILL TERM ALRM CHLD
 
I also tried the following instead of using the SIG hash:
 use sigtrap qw(handler Main_Terminate normal-signals error-signals);
which from what I understand should define the handler as
Main_Terminate for all signals in the normal and error lists
    normal = HUP, INT, PIPE, TERM
    error = ABRT, BUS, EMT, FPE, ILL, QUIT, SEGV, SYS, TRAP
    - according to O'Reilly's PERL Cookbook.
 
- Calvin Perine

>>> Greg Osborne <jo...@ea...> 12/22/2004 11:17:29 AM
>>>

I'm taking a stab in the dark here, but...

When a unix or linux system sees a user leave or lose connection, 
the SIGHUP signal is sent to any programs that person has opened.  
Typically this kills the programs, but some programs will catch the
signal 
and then perform tasks to stay alive (such as forking into the
background) 
or perform some save/cleanup code before exiting.  You might try
trapping 
that signal.

Another thought is SIGKILL or SIGQUIT, but those may not be as likely
to 
give what you want.

Hope it helps.

- Greg



>>> Greg Osborne <jo...@ea...> 12/22/2004 11:17:29 AM
>>>
I'm taking a stab in the dark here, but...

When a unix or linux system sees a user leave or lose connection, 
the SIGHUP signal is sent to any programs that person has opened.  
Typically this kills the programs, but some programs will catch the
signal 
and then perform tasks to stay alive (such as forking into the
background) 
or perform some save/cleanup code before exiting.  You might try
trapping 
that signal.

Another thought is SIGKILL or SIGQUIT, but those may not be as likely
to 
give what you want.

Hope it helps.

- Greg

Hello,
 
Is there any way to have a Win32::GUI app catch a signal for when a
windows system logs off the current user? What I want to happen is have
my program exit, preferably running some clean up code first, when a
user logs out of windows. Right now, when logging off of windows, an end
program dialog will appear to kill the program and wait until the user
clicks cancel or end before windows will finish the log out. 
I made an EXE out of my PERL code using p2e (PERL version 5.8.4) that
runs while a user is logged into windows. I am able to catch an
interrupt  from a command line using either the $SIG{INT} or the sigtrap
module with normal-signals or error-signals, but I can't seem to find
what signal I need for a log off 'event'. By adding an END block I am
able to perform my clean up code when the program exits normally, or
when the windows user forces and end program from the task manager, but
not for log off.  I have tried with both my program as an EXE and
running it from the command line with PERL. Same result.
 
Any ideas?

> Its not Tk - Win32::GUI:) What version are you using?
>
> Cheers,
>
> jez.

Oh - I guess so  :-)


package Win32::GUI::GridLayout;
says:
$VERSION = "0.03";

package Win32::GUI::BitmapInline;
says:
$VERSION = "0.01";


Mike

> I'm using Activstateperl 5.8.0 on Win2000 and it doesn't
> crash.  It opens the empty window and allows typing.
> After closing the window I need to interrupt the
> program to stop it.
> 
> Sorry, I don't know much about Tk.


Its not Tk - Win32::GUI:) What version are you using?

Cheers,

jez.


-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.296 / Virus Database: 265.6.2 - Release Date: 20/12/2004

>
> Hello,
>
> I'm using Activstateperl 5.8.4-810 and Win32::GUI 1.0.
>
> Following test code crashes when closing window.
>
> What's the problem?
> Is it bug?
>
> Thanks in advance.
>

snip


Howdy.

I'm using Activstateperl 5.8.0 on Win2000 and it doesn't
crash.  It opens the empty window and allows typing.
After closing the window I need to interrupt the
program to stop it.

Sorry, I don't know much about Tk.


Mike

Hi,

Yes there is a bug:

http://sourceforge.net/tracker/index.php?func=3Ddetail&aid=3D1064828&grou=
p_id=3D16572&atid=3D116572

You can get around it by keeping the richtext control in global scope -=20
although I couldn't get it to work with your example.

Cheers,

jez.

----- Original Message -----=20
From: "=EA=B0=95=EC=B0=A8=ED=9B=88" <cha...@ya...>
To: <da...@pe...>
Cc: <per...@li...>
Sent: Thursday, December 16, 2004 2:47 PM
Subject: [perl-win32-gui-users] Win32::GUI AddRichEdit crash problem.


> Hello,
>
> I'm using Activstateperl 5.8.4-810 and Win32::GUI 1.0.
>
> Following test code crashes when closing window.
>
> What's the problem?
> Is it bug?
>
> Thanks in advance.
>
> ----- cut here ----
> use Win32::GUI;
>
> $Window =3D new Win32::GUI::Window(
>    -name =3D> "Window",
>    -title =3D> "Test",
>    -left =3D> 100,
>    -top =3D> 100,
>    -width =3D> 400,
>    -height =3D> 500,
> );
>
> $Window->{-dialogui} =3D 1; #This will enable the tab
> stuff
>
> $text =3D "";
> $Textbox =3D $Window->AddRichEdit(
>    -name    =3D> "RichEdit",
>    -text    =3D> $text,
>    -left    =3D> 5,
>    -top     =3D> 50,
>    -width   =3D> $Window->ScaleWidth-10,
>    -height  =3D> $Window->ScaleHeight-56,
>    -addstyle   =3D> WS_CHILD | WS_VISIBLE | WS_VSCROLL
>    | ES_LEFT | ES_MULTILINE | ES_AUTOVSCROLL
> |ES_WANTRETURN,
>    -addexstyle =3D> WS_EX_CLIENTEDGE,
> );
>
>
> $Window->Show();
> Win32::GUI::Dialog();
>
> sub Window_Resize {
>    ($width, $height) =3D
> ($Window->GetClientRect)[2..3];
>    $Textbox->Resize($width-10, $height-56);
> }
> --------- cut here ---------
>
>
>
>
>
>
>
> ___________________________________
> =EA=B8=B0=EB=B3=B8 250MB =EC=B5=9C=EB=8C=80 1GB, =EB=8D=94 =EC=9D=B4=EC=
=83=81 =EC=9A=A9=EB=9F=89 =EA=B3=A0=EB=AF=BC=EC=97=86=EB=8A=94 - =EC=95=BC=
=ED=9B=84! =EB=A9=94=EC=9D=BC (http://mail.yahoo.co.kr)
> =EC=B5=9C=EC=8B=A0=EA=B3=A1, =EC=B6=94=EC=B2=9C=EA=B3=A1, =EA=B0=80=EC=9A=
=94, OST, =ED=8C=9D=EC=86=A1, =EB=AE=A4=EC=A7=81=EB=B9=84=EB=94=94=EC=98=A4=
 - =EC=95=BC=ED=9B=84! =EB=B9=84=ED=8A=B8=EB=B0=95=EC=8A=A4 (http://kr.mu=
sic.yahoo.com)
> =EC=B5=9C=EC=8B=A0 =ED=9C=B4=EB=8C=80=ED=8F=B0 =EC=A0=95=EB=B3=B4, =EB=B2=
=A8=EC=86=8C=EB=A6=AC, =EC=BA=90=EB=A6=AD=ED=84=B0, =EB=AC=B8=EC=9E=90=EB=
=A9=94=EC=84=B8=EC=A7=80 - =EC=95=BC=ED=9B=84! =EB=AA=A8=EB=B0=94=EC=9D=BC=
 (http://kr.mobile.yahoo.com)
>
>
> -------------------------------------------------------
> SF email is sponsored by - The IT Product Guide
> Read honest & candid reviews on hundreds of IT Products from real users=
.
> Discover which products truly live up to the hype. Start reading now.
> http://productguide.itmanagersjournal.com/
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Per...@li...
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users=20

> -----Original Message-----
> From: per...@li...=20
> [mailto:per...@li...] On=20
> Behalf Of Glenn Linderman
> Sent: Thursday, December 16, 2004 5:30 PM
> To: YorHel
> Cc: Win32-GUI
> Subject: Re: [perl-win32-gui-users] A need for a "native"=20
> HTML browser?
>=20
> I tend to agree with this assessment... if it is almost free=20
> to include it (not more than 4KB additional size would be my=20
> definition of almost free), then why not?  Well, one reason=20
> might be because of the multitude of security holes in IE...=20
> and that alone would make me prefer it being separate...
>=20
> Having it as a separately loadable module, but implementing=20
> fixes in Win32::GUI to support it fully, would be the optimum=20
> solution if it isn't almost free.  I'd be content to allow=20
> the distributions to be bundled as long as=20
> Win32::GUI::Browser didn't get loaded if it wasn't used...=20
> and if things like PAR & PerlApp would still package=20
> Win32::GUI without including Win32::GUI::Browser if it isn't=20
> needed for the application.
>=20
> I don't suppose anyone has figured out how to embed Mozilla? =20
> Now there'd be a solution I could go for!
>=20
>=20

Here.  I "believe" you have to install the Mozilla activeX control
seperatly from the browser though.  I did have some trouble with Events
causing a GPF, but am not sure if this is because of the way I coded or
not. =20


use Win32::GUI;
use Win32::OLE;
use Win32::GUI::AxWindow;

# main Window
$Window =3D new Win32::GUI::Window (
     -title    =3D> "Win32::GUI::AxWindow and Win32::OLE",
     -pos     =3D> [100, 100],
     -size    =3D> [600, 600],
     -name     =3D> "Window",
) or die "new Window";

# Create AxWindow
$Control =3D new Win32::GUI::AxWindow  (
                -parent  =3D> $Window,
                -name    =3D> "Control",
                -pos     =3D> [0, 0],
                -size    =3D> [400, 300],
                -control =3D> "MozillaBrowser.Application",
                -visible =3D> 1,

 ) or die "new Control";

# Get Ole object
$OLEControl =3D $Control->GetOLE();
$Control->RegisterEvent("DocumentComplete",
								sub {
=09
$self    =3D shift;
=09
$eventid =3D shift;
=09
my %event =3D $self->GetEventInfo();
=09
foreach $key (keys %event)
=09
{
=09
print $key, " =3D ", $event{$key}, "\n";
=09
}
								=09
								 } );
$Window->Show();

#Window_Resize();

my $MyURL =3D "http://msdn.microsoft.com";
$Control->CallMethod("Navigate", $MyURL);


Win32::GUI::Dialog();

# Main window event handler
sub Window_Terminate=20
{
   undef $OLEControl;
   return -1;
}
sub Window_Resize=20
{   =20
	if (defined $Window)=20
	{
		($width, $height) =3D ($Window->GetClientRect)[2..3];
		$Control->Move   (0, 0);
		$Control->Resize ($width, $height);
 	}
}

>I tend to agree with this assessment... if it is almost free to include it 
>(not more than 4KB additional size would be my definition of almost free), 
>then why not?  Well, one reason might be because of the multitude of 
>security holes in IE... and that alone would make me prefer it being 
>separate...

The C code compiles to a dll of about 20k - so this would be the minimum 
benchmark. Win32::GUI shouldn't take any longer to load, to initialise or 
take any extra CPU cycles in general use. The real benefit would be for 
people who use the current solution since you wouldn't need several big 
modules (win32::ole being one of them).

> Having it as a separately loadable module, but implementing fixes in 
> Win32::GUI to support it fully, would be the optimum solution if it isn't 
> almost free.  I'd be content to allow the distributions to be bundled as 
> long as Win32::GUI::Browser didn't get loaded if it wasn't used... and if 
> things like PAR & PerlApp would still package Win32::GUI without including 
> Win32::GUI::Browser if it isn't needed for the application.

Understood.

> I don't suppose anyone has figured out how to embed Mozilla?  Now there'd 
> be a solution I could go for!

:)

It might be worth pointing out that the main use of embedding a browser, is 
not to view pages on the web, but to render HTML pages that are generated on 
the fly by the host application. For example, you might generate a report 
and use some of the more advanced features to HTML to improve the layout or 
embed images etc.

Most GUI tool sets have a browser of somesort in the core - but since we 
have an alternative it may be worth putting on the back burner for a while?

In the meantime I've created a feature request on the sourceforge site:

http://sourceforge.net/tracker/index.php?func=detail&aid=1086958&group_id=16572&atid=366572

Cheers,

jez.

"Jez White" <je...@je...> writes:

> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
> <HTML><HEAD>
> <META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
> <META content="MSHTML 6.00.2900.2523" name=GENERATOR>
> <STYLE></STYLE>
> </HEAD>
> <BODY bgColor=#ffffff>
> <DIV><FONT face=Arial size=2>Hi,</FONT></DIV>
> <DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>


There is no need for a "native" HTML browser if you send e-mail in
plaintext format.

Jez,
I think a native version would be great.
I use AxWindow now for several apps.

It would be nice to be able to update both by updating Win32 GUI.

STeve


-----Original Message-----
From: per...@li... on behalf of Jez =
White
Sent: Thu 12/16/2004 1:55 PM
To: Win32-GUI
Subject: [SPAM] - [perl-win32-gui-users] A need for a "native" HTML =
browser? - Email found in subject
=20
Hi,

If you want to embed a HTML browser in a win32::gui app you can go down =
the Win32::GUI::AxWindow route:

http://rocherl.club.fr/Win32GUI.html#AxWindow

Would it make more sense to have a native version of this functionality =
built directly into the core of win32::gui ("win32::GUI::Browser" with =
all the events etc)? The following link contains a pure C example (so it =
should work under XS):

http://www.codeguru.com/Cpp/I-N/ieprogram/article.php/c4379/

Thoughts?

Cheers,

jez.


This email, and any files or previous email messages included with =
it,=A0may contain confidential and/or privileged material. If you are =
not the intended recipient please contact the sender=A0and delete all =
copies.

Hi,

as long as the module doesn't get a lot bigger in size, doesn't suck a
lot more memory, and doesn't need any more CPU to load, then I don't
see why not...
if it does, I dont see why it shouldn't be a seperate module, since
not everyone needs it in every application...
I'm happy with the performance of Win32::GUI now, and I hope that
doesn't change a lot because of new features which I dont need in
every application

just thoughts though :)


On Thu, 16 Dec 2004 20:55:56 -0000, Jez White
<je...@je...> wrote:
>  
> Hi, 
>   
> If you want to embed a HTML browser in a win32::gui app you can go down the
> Win32::GUI::AxWindow route: 
>   
> http://rocherl.club.fr/Win32GUI.html#AxWindow 
>   
> Would it make more sense to have a native version of this functionality
> built directly into the core of win32::gui ("win32::GUI::Browser" with all
> the events etc)? The following link contains a pure C example (so it should
> work under XS): 
>   
> http://www.codeguru.com/Cpp/I-N/ieprogram/article.php/c4379/ 
>   
> Thoughts? 
>   
> Cheers, 
>   
> jez. 
>   


-- 
Please excuse me for some bad english ;)