wxperl-users — For wxPerl users

[wxperl-users] CVS Does not compile with 2.7.0

[Mark D. <mar...@zn...>]

Hi,

A few of the version checks in current CVS code are using ......_GE( 2,
7, 0 ) when I think they should be using ......_GE( 2, 7, 1 ). These
cover changes in current wxWidgets CVS ( which I assume will become
2.7.1) which are not in the released wxWidgets 2.7.0

Checks I needed to change to get current wxPerl CVS to compile with
wxWidgets 2.7.0 are below.

--------------------------------------------------------------------
../XS/ArtProvider.xsp
--------------------------------------------------------------------
line 106
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
---------------------------------------------------------------------
../XS/Geom.xs
---------------------------------------------------------------------
line 293
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
---------------------------------------------------------------------
../XS/App.xs
---------------------------------------------------------------------
line 219
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
------------------------------------------------------------------------
../XS/Constant.xs
------------------------------------------------------------------------
line 604
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
------------------------------------------------------------------------
line 1177
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
-    r( wxID_HELP_SEARCH );              // id
-    r( wxID_HELP_INDEX );               // id
-    r( wxID_PAGE_SETUP );               // id
-#endif
+#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+    r( wxID_HELP_SEARCH );              // id
+    r( wxID_HELP_INDEX );               // id
+#endif
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
+    r( wxID_PAGE_SETUP );               // id
+#endif
------------------------------------------------------------------------
line 1407
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
------------------------------------------------------------------------
../XS/Colour.xs
------------------------------------------------------------------------
line 24
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
------------------------------------------------------------------------
line 81
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
------------------------------------------------------------------------
../Window.xs
------------------------------------------------------------------------
line 1145
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
------------------------------------------------------------------------
../XS/Accelerators.xs
------------------------------------------------------------------------
line 23
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )
------------------------------------------------------------------------
../XS/Sizers.xs
------------------------------------------------------------------------
line 130
-#if WXPERL_W_VERSION_GE( 2, 7, 0 )
+#if WXPERL_W_VERSION_GE( 2, 7, 1 )


Best Regards

Mark

Re: [wxperl-users] Creating a BMP from scalar...

[Mattia B. <mat...@li...>]

On Tue, 19 Sep 2006 21:04:57 -0700
"Bradley K. Embree" <bk...@bk...> wrote:

<snip>

> I've since tried this on an Ubuntu box which also failed. I've attached 
> the output of perl -V from both my Windows 2000 PC and my Ubuntu PC.
> 
> On the Ubuntu PC I had:
> 
> Alien::wxWidgets 0.21
> wxPerl 0.57
> wxWidgets 2.6.3
> 
> and still no luck. Not sure if that helps or not. :)

  More data always helps :-) I found the bug. The quick fix is below,
the full fix (rewriting cpp/stream.cpp/h) should be in wxPerl 0.58.

Regards
Mattia

Index: cpp/streams.cpp
===================================================================
RCS file: /cvsroot/wxperl/wxPerl/cpp/streams.cpp,v
retrieving revision 1.14
diff -u -2 -r1.14 streams.cpp
--- cpp/streams.cpp     27 Aug 2006 15:26:18 -0000      1.14
+++ cpp/streams.cpp     22 Sep 2006 20:10:27 -0000
@@ -18,8 +18,8 @@

 // thread KO
-const char sub_read[] = "sub { sysread $_[0], $_[1], $_[2] }";
-const char sub_seek[] = "sub { sysseek $_[0], $_[1], $_[2] }";
-const char sub_tell[] = "sub { sysseek $_[0], 0, 1 }";
-const char sub_write[] = "sub { syswrite $_[0], $_[1] }";
+const char sub_read[] = "sub { read $_[0], $_[1], $_[2] }";
+const char sub_seek[] = "sub { seek $_[0], $_[1], $_[2] }";
+const char sub_tell[] = "sub { seek $_[0], 0, 1 }";
+const char sub_write[] = "sub { print { $_[0] } $_[1] }";
 const char sub_length[] = "sub { ( stat $_[0] )[7] }";

 

Re: [wxperl-users] Creating a BMP from scalar...

[Bradley K. E. <bk...@bk...>]

Bradley K. Embree wrote:
> Mattia Barbon wrote:
>> On Sun, 17 Sep 2006 21:58:56 -0700
>> "Bradley K. Embree" <bk...@bk...> wrote:
>>
>>   Hi,
>>  
>>> open my $fh, '<', \$chart_bmp or die "cannot open: $!";
>>> $bmp = Wx::Bitmap->new(
>>>     Wx::Image->new( $fh, wxBITMAP_TYPE_BMP, -1 )
>>> );
>>>
>>> Which gives me an error of 'DIB Header: Image width > 32767 pixels 
>>> for file.'.
>>
>>   This should work, though. I will have a look at it.
>> Which wxPerl/wxWidgets versions and platform are you using?
>>  
> 
> OS:         Windows 2000 SP4
> Perl:        v5.8.7 built for MSWin32-x86-multi-thread
>         Binary build 815 [211909] provided by ActiveState
> wxPerl:     0.5 installed from www.gigi.co.uk.
> wxWidgets:     2.6.3
> 
> 
> I installed the latest perl from ActiveState (5.8.8 build 819) and got 
> the same error message using wxPerl 0.5.
> 
> I then installed the latest wxPerl PPMs (compiled against wxWidgets 
> 2.7.0) from www.gigi.co.uk and got the same error:
> 
> wxPerl:     0.56
> wxWidgets:     2.7.0
> 
> 
> I plan on getting my Ubuntu machine up and running so I can test on 
> there as well, and will let you know the results.

I've since tried this on an Ubuntu box which also failed. I've attached 
the output of perl -V from both my Windows 2000 PC and my Ubuntu PC.

On the Ubuntu PC I had:

Alien::wxWidgets 0.21
wxPerl 0.57
wxWidgets 2.6.3

and still no luck. Not sure if that helps or not. :)

Brad

Re: [wxperl-users] wxTreeCtrl::SetItemDropHighlight

[Lucian D. <lu...@eu...>]

Hi,

I've tested in both Linux and Windows, and it seems working :)
( Gentoo Linux, stock wxGTK 2.6.3.2, wxperl 0.57 with patch ).

Regards,
Lucian Dragus

> -----Original Message-----
> Hi,
>
> I added this to CVS on Sep 5th (only supported by wxWidgets on WXMSW).
>
> Regards
> Mark
>
> > -----Original Message-----
> > From: wxp...@li...
> > [mailto:wxp...@li...] On Behalf
> > Of Lucian Dragus
> > Sent: 19 September 2006 10:43 AM
> > To: wxp...@li...
> > Subject: [wxperl-users] wxTreeCtrl::SetItemDropHighlight
> >
> > Hello Mattia,
> >
> > Can you please add SetItemDropHighlight in TreeCtrl.xs ?
> >
> > (patch against Wx-0.57/XS/TreeCtrl.xs)
> > ------------------------------------
> > --- TreeCtrl.xs.orig	2006-08-19 21:26:52.000000000 +0300
> > +++ TreeCtrl.xs	2006-09-19 11:15:46.000000000 +0300
> > @@ -648,6 +648,12 @@
> >      THIS->SetItemData( *item, data ? new wxPliTreeItemData(
> > data ) : 0 );
> >
> >  void
> > +wxTreeCtrl::SetItemDropHighlight( item, highlight = true )
> > +    wxTreeItemId* item
> > +    bool highlight
> > +  C_ARGS: *item, highlight
> > +
> > +void
> >  wxTreeCtrl::SetItemFont( item, font )
> >      wxTreeItemId* item
> >      wxFont* font
> > ------------------------------------
> >
> > Thank you,
> >
> > Lucian Dragus

Re: [wxperl-users] wxTreeCtrl::SetItemDropHighlight

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

Hi,

I added this to CVS on Sep 5th (only supported by wxWidgets on WXMSW).

Regards
Mark

> -----Original Message-----
> From: wxp...@li... 
> [mailto:wxp...@li...] On Behalf 
> Of Lucian Dragus
> Sent: 19 September 2006 10:43 AM
> To: wxp...@li...
> Subject: [wxperl-users] wxTreeCtrl::SetItemDropHighlight
> 
> Hello Mattia,
> 
> Can you please add SetItemDropHighlight in TreeCtrl.xs ?
> 
> (patch against Wx-0.57/XS/TreeCtrl.xs)
> ------------------------------------
> --- TreeCtrl.xs.orig	2006-08-19 21:26:52.000000000 +0300
> +++ TreeCtrl.xs	2006-09-19 11:15:46.000000000 +0300
> @@ -648,6 +648,12 @@
>      THIS->SetItemData( *item, data ? new wxPliTreeItemData( 
> data ) : 0 );
>  
>  void
> +wxTreeCtrl::SetItemDropHighlight( item, highlight = true )
> +    wxTreeItemId* item
> +    bool highlight
> +  C_ARGS: *item, highlight
> +
> +void
>  wxTreeCtrl::SetItemFont( item, font )
>      wxTreeItemId* item
>      wxFont* font
> ------------------------------------
> 
> Thank you,
> 
> Lucian Dragus
> 
> 

[wxperl-users] wxTreeCtrl::SetItemDropHighlight

[Lucian D. <lu...@eu...>]

Hello Mattia,

Can you please add SetItemDropHighlight in TreeCtrl.xs ?

(patch against Wx-0.57/XS/TreeCtrl.xs)
------------------------------------
--- TreeCtrl.xs.orig	2006-08-19 21:26:52.000000000 +0300
+++ TreeCtrl.xs	2006-09-19 11:15:46.000000000 +0300
@@ -648,6 +648,12 @@
     THIS->SetItemData( *item, data ? new wxPliTreeItemData( data ) : 0 );
 
 void
+wxTreeCtrl::SetItemDropHighlight( item, highlight = true )
+    wxTreeItemId* item
+    bool highlight
+  C_ARGS: *item, highlight
+
+void
 wxTreeCtrl::SetItemFont( item, font )
     wxTreeItemId* item
     wxFont* font
------------------------------------

Thank you,

Lucian Dragus

Re: [wxperl-users] Creating a BMP from scalar...

[Bradley K. E. <bk...@bk...>]

Mattia Barbon wrote:
> On Sun, 17 Sep 2006 21:58:56 -0700
> "Bradley K. Embree" <bk...@bk...> wrote:
> 
>   Hi,
>  
>> open my $fh, '<', \$chart_bmp or die "cannot open: $!";
>> $bmp = Wx::Bitmap->new(
>> 	Wx::Image->new( $fh, wxBITMAP_TYPE_BMP, -1 )
>> );
>>
>> Which gives me an error of 'DIB Header: Image width > 32767 pixels for 
>> file.'.
> 
>   This should work, though. I will have a look at it.
> Which wxPerl/wxWidgets versions and platform are you using?
>  

OS: 		Windows 2000 SP4
Perl:		v5.8.7 built for MSWin32-x86-multi-thread
		Binary build 815 [211909] provided by ActiveState
wxPerl: 	0.5 installed from www.gigi.co.uk.
wxWidgets: 	2.6.3


I installed the latest perl from ActiveState (5.8.8 build 819) and got 
the same error message using wxPerl 0.5.

I then installed the latest wxPerl PPMs (compiled against wxWidgets 
2.7.0) from www.gigi.co.uk and got the same error:

wxPerl: 	0.56
wxWidgets: 	2.7.0


I plan on getting my Ubuntu machine up and running so I can test on 
there as well, and will let you know the results.

Thanks Mattia,

Brad

Re: [wxperl-users] Creating a BMP from scalar...

[Mattia B. <mat...@li...>]

On Sun, 17 Sep 2006 21:58:56 -0700
"Bradley K. Embree" <bk...@bk...> wrote:

  Hi,

> I have a scalar containing a bmp (generated by ChartDirector 
> (http://www.advsofteng.com/cdperl.html)) that I would like to create a 
> Wx::Bitmap from, which I will then draw on a panel.
> 
> Wx::Bitmap does not seem to be able to do this directly, but I thought I 
> could create a Wx::Bitmap from a Wx::Image.

  Correct.
 
> open my $fh, '<', \$chart_bmp or die "cannot open: $!";
> $bmp = Wx::Bitmap->new(
> 	Wx::Image->new( $fh, wxBITMAP_TYPE_BMP, -1 )
> );
> 
> Which gives me an error of 'DIB Header: Image width > 32767 pixels for 
> file.'.

  This should work, though. I will have a look at it.
Which wxPerl/wxWidgets versions and platform are you using?
 
> I've tested the contents of $chart_bmp by opening a filehandle and 
> printing the contents to the file and it is a valid bitmap. So I am a 
> bit lost as far as where to go next.
> 
> Is it possible to create a stream from a scalar? I've looked at 
> wxInputStream but the docs indicate that it is not implemented in wxPerl.

  Perl strams should be transparently wrapped into wxInputStreams.

Regards
Mattia

[wxperl-users] Creating a BMP from scalar...

[Bradley K. E. <bk...@bk...>]

Hello All,

I have a scalar containing a bmp (generated by ChartDirector 
(http://www.advsofteng.com/cdperl.html)) that I would like to create a 
Wx::Bitmap from, which I will then draw on a panel.

Wx::Bitmap does not seem to be able to do this directly, but I thought I 
could create a Wx::Bitmap from a Wx::Image.

So code looks like:

# create a scalar containing the bmp data
my $chart_bmp = $chart_object->makeChart2($perlchartdir::BMP);

my $bmp = Wx::Bitmap->new(
	Wx::Image->new( ... )
);

The ... is where I am having problems. I've tried the following forms of 
the Wx::Image constructor:

Wx::Image->new( width, height, data ):

my $bmp = Wx::Bitmap->new(
	Wx::Image->new( 200, 200, $chart_bmp )
);

Gives me an error message of 'not enough data in image constructor at ...'.

Wx::Image->new( stream, type, index ):

First naive attempt:
$bmp = Wx::Bitmap->new(
	Wx::Image->new( $chart_bmp, wxBITMAP_TYPE_BMP, -1 )
);

Gives me an error message  indicating the file does not exist so I 
assume the constructor thinks that $chart_bmp is a file name.

Next attempt:
$bmp = Wx::Bitmap->new(
	Wx::Image->new( \$chart_bmp, wxBITMAP_TYPE_BMP, -1 )
);

Which gives an error message that it is not a GLOB reference.

So stream == filehandle. But the point of this is that I don't want to 
write $chart_bmp to a file, so I tried opening $chart_bmp as an "in 
memory" file:

open my $fh, '<', \$chart_bmp or die "cannot open: $!";
$bmp = Wx::Bitmap->new(
	Wx::Image->new( $fh, wxBITMAP_TYPE_BMP, -1 )
);

Which gives me an error of 'DIB Header: Image width > 32767 pixels for 
file.'.

I've tested the contents of $chart_bmp by opening a filehandle and 
printing the contents to the file and it is a valid bitmap. So I am a 
bit lost as far as where to go next.

Is it possible to create a stream from a scalar? I've looked at 
wxInputStream but the docs indicate that it is not implemented in wxPerl.

Am I am being a complete moron and missing something obvious here?

Any help/pointers would be greatly appreciated.

Thanks,

Brad

[wxperl-users] [ wxperl-Feature Requests-1559372 ] Really dumb install question

[SourceForge.net <no...@so...>]

Feature Requests item #1559372, was opened at 2006-09-15 07:31
Message generated for change (Tracker Item Submitted) made by Item Submitter
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=365655&aid=1559372&group_id=15655

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: None
Group: None
Status: Open
Priority: 5
Submitted By: Nobody/Anonymous (nobody)
Assigned to: Nobody/Anonymous (nobody)
Summary: Really dumb install question

Initial Comment:
The wxPerl page describes wxPerl as a wrapper for 
wxWidgets. Does this mean that I have to download 
wxWidgets in order for wxPerl to work? Or is wxPerl 
standalone?

Thank you,
   Paul Charran

Dev...@ya...

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=365655&aid=1559372&group_id=15655

Re: [wxperl-users] Some more Questions

[Mark D. <mar...@zn...>]

Hi Daniel

DanielMS wrote:
> Hi Mark,

> I'm not sure of what exactly means $panel->{button}{"pl_button"} but it
> works fine! I found this in another sample programm.

That's perl 'auto instancing' for you.

$panel is a reference to (I assume) a panel object which is a perl hash
and panel class.

So I could do:
$panel->{myvalue} = 1;
$panel->{myothervalue} = 2;

and the keys 'myvalue' and 'myothervalue' would be paired with the
values 1 & 2 in my hash.

if I do

$panel->{another}{thing} = 5;

then perl works out that I want the key 'another' in my panel hash to be
paired with an anonymous hash, and I want the key 'thing' in that second
hash to be paired with the value 5;

So:

$panel->{button}{plbutton} = Wx::Button->new(....);

just means that $panel->{button}{plbutton} is exactly the same as above
except that the value held is a Wx::Button object.

$panel->{x}{y} = Wx::Button->new(....);

would work exactly the same.

If you are just starting out with Perl, not just wxPerl, I think you
will find wxPerl quite difficult to get to grips with just from example
code - not least because Perl allows you to do everything in 101
different ways. Its hard work at first, but you just have to read the
'perldocs'. Once you are comfortable with how hashes, arrays and
references work in perl, you'll find wxPerl much easier to progress
with. Good luck - and don't give up!

best regards

Mark

Re: [wxperl-users] Some more Questions

[DanielMS <dan...@ya...>]

Hi Mark,

thank you for your answer.

In the meantime I changed my code to somthing like this for each button:

#-----------------------------------------------------------
    EVT_BUTTON($panel, $panel->{button}{"pl_button"}, sub {=20
                     =20
                      my $anzahl =3D $rightchecklistbox->GetCount();
                      my @items;
                     =20
                      for (0..$anzahl) {
                        #der gr=C3=B6=C3=9Fte Index zuerst, damit das l=C3=
=B6schen
funktioniert
                        unshift(@items,$_) if
$rightchecklistbox->IsChecked($_);=20
                      }
                     =20
                      foreach (@items) {
                        $rightchecklistbox->Delete($_)
                      }
                     =20
                      $self -> SetStatusText("Pakete wurden aus der Liste
gel=C3=B6scht!");
                     =20
                    } );

#-----------------------------------------------------------

Therefore I had to create the buttons like that:

#-----------------------------------------------------------
    $panel->{button}{"pl_button"} =3D Wx::Button->new( $panel,         #
parent window

    ....
#-----------------------------------------------------------

I'm not sure of what exactly means $panel->{button}{"pl_button"} but it
works fine! I found this in another sample programm.

PW-Dialog works! But as far as I understand the wxwindows doc, the common
dialogs have only one text entry field, is that right? So if I need a dialo=
g
for username and pw, I have to create it on my own?=20

The other thing with the icon I will try later.

best regards
Daniel

--=20
View this message in context: http://www.nabble.com/Some-more-Questions-tf2=
248962.html#a6274707
Sent from the wxperl-users forum at Nabble.com.

Re: [wxperl-users] Some more Questions

[Mark D. <mar...@zn...>]

Hi Daniel

DanielMS wrote:
> In line 23 I use the wxPerl Icon. How can I use my own one (png-Iconfile)?

I'm not entirely sure of which icon types are OK on which playforms.
According to docs PNG is only supported on wxGTK, but I'm sure I've used
them on wxMSW?

Anyhow, depending on your platform one or both of the following should work:

$self->SetIcon( Wx::Icon->new('pathtomypng.png', wxBITMAP_TYPE_PNG) );
$self->SetIcon( Wx::Icon->new('pathtomyico.ico', wxBITMAP_TYPE_ICO) );


> 
> In line 139 I want to use the Wx::PasswordEntryDialog but it seems not to be
> available. Why?

Not all the functions from wxWidgets are wrapped. This is often because
functions are duplicated or there are better alternatives in perl.

In this case, you need:

#-----------------------------------------------------------
  my $dialog = Wx::TextEntryDialog->new
    ( $this,
      "Enter Your Password",
      "Wx::TextEntryDialog Password Example",
      "",
      wxOK|wxCANCEL|wxCENTRE|wxTE_PASSWORD);

  if( $dialog->ShowModal == wxID_CANCEL ) {
    Wx::LogMessage( "User cancelled the dialog" );
  } else {
    Wx::LogMessage( "Password !: %s", $dialog->GetValue );
  }
  $dialog->Destroy;
#-----------------------------------------------------------

By the way - wxDemo, downloadable or browseable in CVS, contains many
examples which will probably answer most of your questions about wxPerl


> I use only one function for all buttons when pressed. So how can i figure
> out, which one caused the event (line 163)?

An event object has a function 'GetId' which in the case of EVT_BUTTON
returns the button ID.  (my $buttonid = $event->GetId(); )

You can either use a known ID when you create your button (instead of
passing '-1', or you could call $button->GetId() just after creation and
perhaps store the value in a hash for later lookup in your event handler.

>From much of the example code I have seen, it seems to be common
practice not to do this and to attach the EVT_BUTTON for each button to
a separate event handler.

If you want to create buttons 'dynamically' at runtime, then perhaps an
OO approach would be much neater.

Create a base class for your buttons deriving from Wx::Button. Handle
the button click event initially inside your button class - so every
button click calls the handler in its own instance.


Best regards

Mark

Re: [wxperl-users] Wx::ActiveX abandoned?

[Donovan A. <al...@Zo...>]

Doh, I then went to the Sourceforge message you linked.  Hmm...yes, I =
don't think it worked like Jan had posted it.  I don't have the source =
accessible atm, but I as I recall, ripping the guts out of AxWindows =
solved both issues I had.=20

________________________________

From: wxp...@li... on behalf of Donovan =
Allen
Sent: Mon 9/11/2006 3:04 PM
To: Mattia Barbon; Eric Wilhelm
Cc: wxperl-users
Subject: Re: [wxperl-users] Wx::ActiveX abandoned?



Oh gosh, sorry, I was on a camping trip!  Looks like you got it solved, =
but yes, it did end up working for me.=20

I pillaged a recent AxWindows (since one is obviously based on the other =
anyway), just as you have done, but I forgot to clean it up and resubmit =
it. :-(=20

I spent so many dang hours on that problem and then getting everything =
to compile, I apologize for letting someone else endure the same pain.

Seems like there was something else that got fixed from my process, but =
I will have to see if I have any notes on what it was.


________________________________

From: wxp...@li... on behalf of Mattia =
Barbon
Sent: Sun 9/10/2006 7:20 AM
To: Eric Wilhelm
Cc: wxperl-users
Subject: Re: [wxperl-users] Wx::ActiveX abandoned?



On Sun, 10 Sep 2006 03:48:43 -0700
Eric Wilhelm <scr...@gm...> wrote:

> Hi,
>
> I'm using PAR to package an app which uses Wx::ActiveX and running =
into
> the same problem as described in this thread from one year ago.
>
>   http://sourceforge.net/mailarchive/message.php?msg_id=3D12836096
>
> Can anyone (Donovan?) confirm that that fix works?  Is there a
> workaround that I'm unable to find?
>
> No new releases to ActiveX since 2003?

  Graciliano seems MIA. I sent a couple of emails once but
no answer came. I think somebody should take over Wx::ActiveX
if he can no longer be contacted.

Regards
Mattia

-------------------------------------------------------------------------=

Using Tomcat but need to do more? Need to support web services, =
security?
Get stuff done quickly with pre-integrated technology to make your job =
easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache =
Geronimo
http://sel.as-us.falkag.net/sel?cmd=3Dlnk&kid=3D120709&bid=3D263057&dat=3D=
121642
_______________________________________________
wxperl-users mailing list
wxp...@li...
https://lists.sourceforge.net/lists/listinfo/wxperl-users



-------------------------------------------------------------------------=

Using Tomcat but need to do more? Need to support web services, =
security?
Get stuff done quickly with pre-integrated technology to make your job =
easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache =
Geronimo
http://sel.as-us.falkag.net/sel?cmd=3Dlnk&kid=3D120709&bid=3D263057&dat=3D=
121642
_______________________________________________
wxperl-users mailing list
wxp...@li...
https://lists.sourceforge.net/lists/listinfo/wxperl-users

Re: [wxperl-users] Wx::ActiveX abandoned?

[Donovan A. <al...@Zo...>]

Oh gosh, sorry, I was on a camping trip!  Looks like you got it solved, =
but yes, it did end up working for me. =20
=20
I pillaged a recent AxWindows (since one is obviously based on the other =
anyway), just as you have done, but I forgot to clean it up and resubmit =
it. :-( =20
=20
I spent so many dang hours on that problem and then getting everything =
to compile, I apologize for letting someone else endure the same pain.
=20
Seems like there was something else that got fixed from my process, but =
I will have to see if I have any notes on what it was.
=20

________________________________

From: wxp...@li... on behalf of Mattia =
Barbon
Sent: Sun 9/10/2006 7:20 AM
To: Eric Wilhelm
Cc: wxperl-users
Subject: Re: [wxperl-users] Wx::ActiveX abandoned?



On Sun, 10 Sep 2006 03:48:43 -0700
Eric Wilhelm <scr...@gm...> wrote:

> Hi,
>
> I'm using PAR to package an app which uses Wx::ActiveX and running =
into
> the same problem as described in this thread from one year ago.
>
>   http://sourceforge.net/mailarchive/message.php?msg_id=3D12836096
>
> Can anyone (Donovan?) confirm that that fix works?  Is there a
> workaround that I'm unable to find?
>
> No new releases to ActiveX since 2003?

  Graciliano seems MIA. I sent a couple of emails once but
no answer came. I think somebody should take over Wx::ActiveX
if he can no longer be contacted.

Regards
Mattia

-------------------------------------------------------------------------=

Using Tomcat but need to do more? Need to support web services, =
security?
Get stuff done quickly with pre-integrated technology to make your job =
easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache =
Geronimo
http://sel.as-us.falkag.net/sel?cmd=3Dlnk&kid=3D120709&bid=3D263057&dat=3D=
121642
_______________________________________________
wxperl-users mailing list
wxp...@li...
https://lists.sourceforge.net/lists/listinfo/wxperl-users

Re: [wxperl-users] Wx::ActiveX GetOLE (again) -- with success though!

[Eric W. <scr...@gm...>]

# from Eric Wilhelm
# on Sunday 10 September 2006 04:50 pm:

>I'll push these changes out to CPAN as soon as I am able (read that
> as: "hey, frustrated programmer in 2007, ping me if I haven't done it
> yet.")

Meanwhile, if anyone would like to test this, please let me know how 
well it works for you.

  http://scratchcomputing.com/tmp/Wx-ActiveX-0.05_01.tar.gz

Thanks,
Eric
-- 
Entia non sunt multiplicanda praeter necessitatem.
--Occam's Razor
---------------------------------------------------
    http://scratchcomputing.com
---------------------------------------------------

Re: [wxperl-users] Wx::ActiveX GetOLE (again) -- with success though!

[Eric W. <scr...@gm...>]

# from Mark Dootson
# on Sunday 10 September 2006 02:28 pm:

>As a temp fix assuming you are using wxWidgets 2.6.x or later
>you can comment out the three lines for
>SetTransparent()
>CleanUpClasses
>InitializeClasses
>
>for the wxLogTrace stuff, you can either comment them out or change
>
>from
>wxLogTrace(wxT('My Message'))
>to
>wxLogTrace('%s', wxT('My Message'))

Thanks, that does get it to build and it seems to still work outside the 
par.  Now we're back to only the one (original) problem.

>With regard to your earlier question (packaging Win32::OLE), have you
>tried simply loading Win32::OLE before you load Wx::ActiveX?

That doesn't seem to help.  The trouble seems to be with these 
LoadLibrary() and GetModuleHandle() calls (windows api?)

And (now that I can actually try it), neither does the suggestion from 
the older thread of using:

  SV *sv = get_sv("PerlApp::Win32_OLE", FALSE);
  hmodule = GetModuleHandle(sv ? SvPV_nolen(sv) : "OLE");

because hmodule == 0

  if (hmodule != 0) {

we never get to the important bit.

But, I managed to follow-up on the rather vague reference to this having 
been fixed before and located the "Try to find using Dynaloader" code 
in Win32::GUI::AxWindow

  http://search.cpan.org/src/LROCHER/Win32-GUI-AxWindow-0.07/AxWindow.xs

And now all is well (except for the many hours which are now dead and 
gone.)

I'll push these changes out to CPAN as soon as I am able (read that as: 
"hey, frustrated programmer in 2007, ping me if I haven't done it 
yet.")

--Eric
-- 
I arise in the morning torn between a desire to improve the world and a
desire to enjoy the world. This makes it hard to plan the day.
--E.B. White
---------------------------------------------------
    http://scratchcomputing.com
---------------------------------------------------

Re: [wxperl-users] Wx::ActiveX abandoned?

[Mark D. <mar...@zn...>]

Eric,

As a temp fix assuming you are using wxWidgets 2.6.x or later
you can comment out the three lines for
SetTransparent()
CleanUpClasses
InitializeClasses

for the wxLogTrace stuff, you can either comment them out or change

from
wxLogTrace(wxT('My Message'))
to
wxLogTrace('%s', wxT('My Message'))

That done, it should build. (it builds on a VC6 built perl)
Whether it works or not is a different question :-)

With regard to your earlier question (packaging Win32::OLE), have you
tried simply loading Win32::OLE before you load Wx::ActiveX?

So 'use Win32::OLE;' at the top of your script?


Regards

Mark


Eric Wilhelm wrote:
> # from Mattia Barbon
> # on Sunday 10 September 2006 07:20 am:
> 
>>   Graciliano seems MIA. I sent a couple of emails once but
>> no answer came. I think somebody should take over Wx::ActiveX
>> if he can no longer be contacted.
> 
> I would love to, but I can't get it to build.  I might have something 
> wrong in my setup, but it looks like there's a problem of it being 
> built for 2.4 compatibility.  I get lots of errors about wxLogTrace() 
> having a different prototype as well as SetTransparent() undeclared 
> (and looking in the include/wx/msw/window.h source I find that inside 
> of "#if WXWIN_COMPATIBILITY_2_4".)
> 
> But the real showstopper appears to be:
> 
>   ActiveX.xs: In function
>     `void boot_Wx__ActiveX(PerlInterpreter*, CV*)':
>   ActiveX.xs:36: error: 
>     `CleanUpClasses' is not a member of `wxClassInfo'
>   ActiveX.xs:37: error: 
>     `InitializeClasses' is not a member of `wxClassInfo'
> 
> We've been using the binary build off of sourceforge, but I don't see 
> any source there.  What's the secret to getting this to build?
> 
> I'm using the camelpack, and never did get WxPerl to build from source 
> either, so I've probably got troubles.  I'm not sure how to get 
> wxWidgets to build from source either -- think the configure or 
> something was the trouble.
> 
> Thanks,
> Eric

Re: [wxperl-users] Wx::ActiveX abandoned?

[Eric W. <scr...@gm...>]

# from Mattia Barbon
# on Sunday 10 September 2006 07:20 am:

>=A0 Graciliano seems MIA. I sent a couple of emails once but
>no answer came. I think somebody should take over Wx::ActiveX
>if he can no longer be contacted.

I would love to, but I can't get it to build.  I might have something=20
wrong in my setup, but it looks like there's a problem of it being=20
built for 2.4 compatibility.  I get lots of errors about wxLogTrace()=20
having a different prototype as well as SetTransparent() undeclared=20
(and looking in the include/wx/msw/window.h source I find that inside=20
of "#if WXWIN_COMPATIBILITY_2_4".)

But the real showstopper appears to be:

  ActiveX.xs: In function
    `void boot_Wx__ActiveX(PerlInterpreter*, CV*)':
  ActiveX.xs:36: error:=20
    `CleanUpClasses' is not a member of `wxClassInfo'
  ActiveX.xs:37: error:=20
    `InitializeClasses' is not a member of `wxClassInfo'

We've been using the binary build off of sourceforge, but I don't see=20
any source there.  What's the secret to getting this to build?

I'm using the camelpack, and never did get WxPerl to build from source=20
either, so I've probably got troubles.  I'm not sure how to get=20
wxWidgets to build from source either -- think the configure or=20
something was the trouble.

Thanks,
Eric
=2D-=20
"I've often gotten the feeling that the only people who have learned
from computer assisted instruction are the authors."
=2D-Ben Schneiderman
=2D--------------------------------------------------
    http://scratchcomputing.com
=2D--------------------------------------------------

[wxperl-users] Some more Questions

[DanielMS <dan...@ya...>]

So i did some steps forward but now I have some more questions, I think for
you it is only a little thing but unfortunally not for me. So if you can
give me a hint, you would make me happy.

I have marked the lines in the code 
http://www.nabble.com/user-files/235940/test1.pl test1.pl  with
"Question:..."

In line 23 I use the wxPerl Icon. How can I use my own one (png-Iconfile)?

In line 139 I want to use the Wx::PasswordEntryDialog but it seems not to be
available. Why?

I use only one function for all buttons when pressed. So how can i figure
out, which one caused the event (line 163)?

Thats all for now. Thank you!

Regards
Daniel

-- 
View this message in context: http://www.nabble.com/Some-more-Questions-tf2248962.html#a6237396
Sent from the wxperl-users forum at Nabble.com.

Re: [wxperl-users] Wx::ActiveX abandoned?

[Mattia B. <mat...@li...>]

On Sun, 10 Sep 2006 03:48:43 -0700
Eric Wilhelm <scr...@gm...> wrote:

> Hi,
> 
> I'm using PAR to package an app which uses Wx::ActiveX and running into 
> the same problem as described in this thread from one year ago.
> 
>   http://sourceforge.net/mailarchive/message.php?msg_id=12836096
> 
> Can anyone (Donovan?) confirm that that fix works?  Is there a 
> workaround that I'm unable to find?
> 
> No new releases to ActiveX since 2003?

  Graciliano seems MIA. I sent a couple of emails once but
no answer came. I think somebody should take over Wx::ActiveX
if he can no longer be contacted.

Regards
Mattia

Re: [wxperl-users] Call for (more) Volunteers

[Jouke V. <jo...@pv...>]

> If you're interested, email me offline, or keep your eye on my 
offline? email offline? off-list was what I meant ;-)

Jouke

[wxperl-users] Call for (more) Volunteers

[Jouke V. <jo...@pv...>]

Hi wxperl-users,

As you may know, I've been working on Accessible software for disabled 
people since 2001. The best-known example of this is pVoice, but I've 
created many more of these kinds of programs (not all of them have been 
released in the wild).

As a spin-off of pVoice, I've released AAC::Pvoice a couple of years ago 
as a module set which enables the programmer to build switch-enabled GUI 
programs, but this module has been really specific for the audience that 
pVoice has. Not surprisingly, there weren't many people interested in 
working on that.

At YAPC::Europe in Birmingham I presented the first beginnings of the OA 
module. OA stands for Open Accessibility or Open Assistive. It's a new 
framework that uses wxPerl and aims to let you transform any 
wxPerl-based application into something that can be used by people with 
all kinds of disabilities, without having to write more than just a few 
lines of extra code. Features that it will include are (for example, but 
not limited to)

* Spoken (or audio) tooltips (for blind users)
* Switch access (for people who can't use a mouse or keyboard)
* Configurable on-screen keyboards for Text controls (where you can 
define the contents of the keyboard depending on what your textcontrol 
needs to accept)

I was able to give a short demonstration at the conference, and I got at 
least two people interested who will help, but more people are always 
welcome.

If you're interested, email me offline, or keep your eye on my 
use.perl.org journal at http://use.perl.org/~jouke

Cheers,

Jouke Visser

There's still a lot of work to be done

[wxperl-users] Wx::ActiveX abandoned?

[Eric W. <scr...@gm...>]

Hi,

I'm using PAR to package an app which uses Wx::ActiveX and running into 
the same problem as described in this thread from one year ago.

  http://sourceforge.net/mailarchive/message.php?msg_id=12836096

Can anyone (Donovan?) confirm that that fix works?  Is there a 
workaround that I'm unable to find?

No new releases to ActiveX since 2003?

Thanks,
Eric
-- 
Moving pianos is dangerous.
Moving pianos are dangerous.
Buffalo buffalo buffalo buffalo buffalo buffalo buffalo.
---------------------------------------------------
    http://scratchcomputing.com
---------------------------------------------------

Re: [wxperl-users] Trouble with status bar

[Mark D. <mar...@zn...>]

Daniel,

......
my $status = Wx::StatusBar->new( $self, -1 );
$status -> SetFieldsCount( 1 );
$status -> SetStatusText( "Ich bin ein Statustext!" );
$self->SetStatusBar($status);
return $self;
.......


Regards

Mark



DanielMS wrote:
> I do my first steps with wxPerl, and at the moment I do not understand the
> following:
> 
> If I put the lines 
> #    my $status = Wx::StatusBar->new( $self, -1 );
>   
> #    $status -> SetFieldsCount( 1 );
> #    $status -> SetStatusText( "Ich bin ein Statustext!" );
> 
> on, I will get a statusbar, but on top of the frame and all the other
> objects will not be displayed. Can anyone tell me why?
> 
> http://www.nabble.com/user-files/235932/test1.pl test1.pl 
> 
> Thanks and regards
> Daniel