Re: [perl-win32-gui-users] Win32-GUI Release 0.0.670

2003-12-15 Thread Laurent ROCHER
> >A new Win32::GUI release is availlable.
> >This release come from 0.0.665 Fix CVS branch.
>
> Is there a list of fixes?
>

Oups ;o)
I mention fix list in note on Win32::GUI sources download :
http://sourceforge.net/project/shownotes.php?group_id=16572&release_id=203389

I rework it, with more detail :

this release of Win32::GUI introduces many bug fix and new features the most
important being:

New :

  - add Hook/UnHook methods
  - new DateTime styles and methods
  - new RichEdit methods
  - improve GetOpenFileName / GetSaveFileName.
  - new _DropFiles Events
  - SendMessage now support a pointer to a string or a struct in LPARAM.
  - NEM KeyDown and KeyUp receive new parameter with virtual key value.
  - NEM Timer event

Bug:

  - Fix accelerator keys
  - Fix ImageList bug
  - Fix Windows XP Color
  - Fix options parsing for TextField
  - Fix -prompt support on Textfield with -pos and -size option.
  - Fix DoEvents double events
  - Fix PeekMessage warm message
  - Fix menu enabled option.

Build :
  - MinGW support
  - ActivePerl 5.005 support

Laurent




Re: [perl-win32-gui-users] Win32-GUI Release 0.0.670

2003-12-15 Thread Morbus Iff

>this release of Win32::GUI introduces many bug fix
>and new features the most important being:
>
>New :
>
>  - add Hook/UnHook methods
>  - new DateTime styles and methods
>  - new RichEdit methods

I'm assuming the documentation has been updated to mention the
new methods, etc.? Also, this has been bugging me for a while,
but due to my own lack of time, I've yet to research the
equivalent:

  Win32::GUI: the -style option is deprecated!
  Win32::GUI: the -style option is deprecated!
  Win32::GUI: the -exstyle option is deprecated!

The last error correlates to a RichEdit control - removing the -exstyle had 
no adverse affects, so I just left it as is. The other two are related to a 
bitmap and richedit:


   # create our pretty logo.
   $window->AddLabel( -text=> "",
  -name=> "Bitmap",
  -left=> -34,
  -top => -3,
  -width   => 505,
  -height  => 116,
  -style   => 14,
  -visible => 1,

);


   # create the log box which is gonna hold all our info.
   $logbox = $window->AddRichEdit( -name=>
 "AmphetaDesk::OS::Windows::_RichEdit",
-font=> $font,
-top => 116,
-left=> 0,
-width   => 505,
-height  => 240,
-tabstop => 1,
-style   => WS_CHILD | WS_VISIBLE | ES_LEFT |
ES_MULTILINE | ES_AUTOVSCROLL |
WS_VSCROLL | ES_READONLY,
-exstyle => WS_EX_CLIENTEDGE
   );

Removing the style, at least on the AddLabel, totally breaks my bitmap 
image.  I've yet to fiddle with the -style on the RichEdit. What should 
those be changed too?


>  - Fix DoEvents double events
>  - Fix PeekMessage warm message

Rocking. Those both annoyed me... ;)


--
Morbus Iff ( i put the demon back in codemonkey )
Culture: http://www.disobey.com/ and http://www.gamegrene.com/
Spidering Hacks: http://amazon.com/exec/obidos/ASIN/0596005776/disobeycom
icq: 2927491 / aim: akaMorbus / yahoo: morbus_iff / jabber.org: morbus




Re: [perl-win32-gui-users] Win32-GUI Release 0.0.670

2003-12-15 Thread Laurent ROCHER
>
> I'm assuming the documentation has been updated to mention the
> new methods, etc.?

I have regenerate html doc from source and include it in PPM distribution.
You can found it in ActiveState package index documentation.
But, dont know if documentation is very update ;o)

> Also, this has been bugging me for a while,
> but due to my own lack of time, I've yet to research the
> equivalent:
>
>Win32::GUI: the -style option is deprecated!
>Win32::GUI: the -style option is deprecated!
>Win32::GUI: the -exstyle option is deprecated!

Yes it's a know problem.
We probably add a special Win32::GUI option for disable it.
Not yet implemented.

>
> The last error correlates to a RichEdit control - removing the -exstyle
had
> no adverse affects, so I just left it as is. The other two are related to
a
> bitmap and richedit:
>
> # create our pretty logo.
> $window->AddLabel( -text=> "",
>-name=> "Bitmap",
>-left=> -34,
>-top => -3,
>-width   => 505,
>-height  => 116,
>-style   => 14,
>-visible => 1,
>
>  );

I think you can replace -style   => 14 by -bitmap => 0.
-bitmap theoricly take a bitmap handle but with 0 only SS_BITMAP style is
set.

> # create the log box which is gonna hold all our info.
> $logbox = $window->AddRichEdit( -name=>
>   "AmphetaDesk::OS::Windows::_RichEdit",
>  -font=> $font,
>  -top => 116,
>  -left=> 0,
>  -width   => 505,
>  -height  => 240,
>  -tabstop => 1,
>  -style   => WS_CHILD | WS_VISIBLE | ES_LEFT |
>  ES_MULTILINE | ES_AUTOVSCROLL |
>  WS_VSCROLL | ES_READONLY,
>  -exstyle => WS_EX_CLIENTEDGE
> );
>
> Removing the style, at least on the AddLabel, totally breaks my bitmap
> image.  I've yet to fiddle with the -style on the RichEdit. What should
> those be changed too?

For RichEdit control default style is :

perlcs.cs.style = WS_VISIBLE | WS_CHILD | ES_MULTILINE |
ES_AUTOHSCROLL | ES_AUTOVSCROLL;
perlcs.cs.dwExStyle = WS_EX_CLIENTEDGE;

You only need to add WS_VSCROLL, ES_LEFT and ES_READONLY.
You can use -addstyle for this or use specific option.

WS_VSCROLL can be set with -vscroll => 1
ES_LEFTcan be set with -align => 'left'
ES_READONLY can be set with -readonly => 1

I think your tabstop option doesn't work because it's before -style option.
-style option ovewrite all previous style setting.

I forget to mention it in fix list but now -remstyle only remove set style.
So, you can do something like this (but not very nice) :
-remstyle => 0x,
-addstyle => WS_CHILD | WS_VISIBLE | ES_LEFT | ES_MULTILINE |
ES_AUTOVSCROLL | WS_VSCROLL | ES_READONLY

Laurent.




Re: [perl-win32-gui-users] Win32-GUI Release 0.0.670

2003-12-15 Thread Glenn Linderman
If there are additional enhancements you need for TGL, maybe you could 
send a list of them to [EMAIL PROTECTED] ?


I can only speak for myself, but it seems that TGL is a reasonably 
significant application of Win32-GUI, and supporting it is in the best 
interests of the Win32-GUI community.  But I have no clue what you need, 
until you tell me, nor would anyone else.  Perhaps you've mentioned it 
in the archives, but most of the archives are filled with questions from 
people that needed to add "-name" to their window parameters :)  And in 
scanning the archives looking for stuff, it would be very easy to 
overlook something.


On approximately 12/14/2003 11:45 AM, came the following characters from
the keyboard of Johan Lindstrom:


At 20:04 2003-12-14, Laurent ROCHER wrote:


A new Win32::GUI release is availlable.
This release come from 0.0.665 Fix CVS branch.



Excellent work guys!

(but still no DnD support it seems, so I can't actually use it for TGL 
without tweaking :)



/J

 --  --- -- --  --  -- -  - -
Johan LindströmSourcerer @ Boss Casinos [EMAIL PROTECTED]

Latest bookmark: "ONLamp.com Generating Database Server-Side Cros..."
http://www.onlamp.com/pub/a/onlamp/2003/12/04/crosstabs.html
dmoz (1 of 30): /Computers/Software/Databases/MySQL/ 142



---
This SF.net email is sponsored by: SF.net Giveback Program.
Does SourceForge.net help you be more productive?  Does it
help you create better code?  SHARE THE LOVE, and help us help
YOU!  Click Here: http://sourceforge.net/donate/
___
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users




--
Glenn -- http://nevcal.com/
===
Like almost everyone, I receive a lot of spam every day, much of it
offering to help me get out of debt or get rich quick.  It's ridiculous.
-- Bill Gates

And here is why it is ridiculous:
 The division that includes Windows posted an operating profit of $2.26 
 billion on revenue of $2.81 billion.
 --from Reuters via 
http://biz.yahoo.com/rc/031113/tech_microsoft_msn_1.html


So that's profit of over 400% of investment... with a bit more 
investment in Windows technology, particularly in the area of 
reliability, the profit percentage might go down, but so might the bugs 
and security problems?  Seems like it would be a reasonable tradeoff. 
WalMart earnings are 3.4% of investment.





Re: [perl-win32-gui-users] Win32-GUI Release 0.0.670

2003-12-15 Thread Johan Lindstrom

At 22:27 2003-12-15, Glenn Linderman wrote:
If there are additional enhancements you need for TGL, maybe you could 
send a list of them to [EMAIL PROTECTED] ?


Ok, what I did was I installed the PPM with 0.670 for 5.6.1 and then 
launched TGL from the source. And the DnD didn't work, so I assumed it 
wasn't added in this release. But then I found it in the changelog.


Maybe I failed to install 0.0.670 for some reason, I didn't check that out. 
Maybe the new event isn't entirely backwards compatible with my home-grown 
version. I'll look into this.



/J

 --  --- -- --  --  -- -  - -
Johan LindströmSourcerer @ Boss Casinos [EMAIL PROTECTED]

Latest bookmark: "Software Reality"
http://www.softwarereality.com/
dmoz (1 of 10): /Society/Relationships/Dating/Advice/ 26




[perl-win32-gui-users] contribution

2003-12-15 Thread sergy
Hi,

I just joined this e-mail list and would like to contribute to this community. I have developed a configuration file parser which converts descriptions from a file into a Win32::GUI working code.

It has saved me quite alot of time so far and I hope this could help others as well.

http://www.stouk.com/CreateGui

Respectfully,

Sergy Stouk.

 Hi,

I just joined this e-mail list and would like to
contribute to this community. I have developed a
configuration file parser which converts
descriptions from a file into a Win32::GUI working
code.

It has saved me quite alot of time so far and I
hope this could help others as well.

http://www.stouk.com/CreateGui

Respectfully,

Sergy Stouk.